From Gustav at cactus.dk Wed Oct 1 02:28:11 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Wed, 01 Oct 2008 09:28:11 +0200 Subject: [AccessD] A2003: Disk or Network Error Message-ID: Hi Darren That is not normal behaviour and I think you should focus on the cause which probably is the backend machine or the connection to it including possible mis-settings of sleep mode, bad network devices or cabling, etc. I would replace the backend machine with a NAS device or machine running a server OS. If the problem persists, you have ruled out one source - if not, you have found the source. /gustav >>> darren at activebilling.com.au 01-10-2008 01:49 >>> Hi Team Apologies if I have asked this before I have a dB that speaks with the BE. That BE that sits on a machine here used as a file share/server (It's not running Server software - just XP) Quite often I'll leave for the night with my Access app happily displaying its main page only to return to a zillion "Disk or Network Error" message boxes in the morning Obviously some time during the night the FE and BE have lost contact with each other - not too big a deal but I have to click through all the error messages - there can be up to 50 of them Then I have to re-boot the app - this is sometimes done un-gracefully from the task manager Is there a way I can trap this error at a dB kind of level - not a form level - then I can gracefully shut the app or alert the user to graceful shut the app? I think I know the error message number - just not sure where to trap for it Many thanks Darren From rockysmolin at bchacc.com Wed Oct 1 08:38:06 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 1 Oct 2008 06:38:06 -0700 Subject: [AccessD] A2003: Disk or Network Error In-Reply-To: References: Message-ID: <03B757C02AF44285A1FFBE5A8543D05F@HAL9005> I had this at a client's once. Only happened on one machine though and it was a bad NIC in that machine. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 01, 2008 12:28 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] A2003: Disk or Network Error Hi Darren That is not normal behaviour and I think you should focus on the cause which probably is the backend machine or the connection to it including possible mis-settings of sleep mode, bad network devices or cabling, etc. I would replace the backend machine with a NAS device or machine running a server OS. If the problem persists, you have ruled out one source - if not, you have found the source. /gustav >>> darren at activebilling.com.au 01-10-2008 01:49 >>> Hi Team Apologies if I have asked this before I have a dB that speaks with the BE. That BE that sits on a machine here used as a file share/server (It's not running Server software - just XP) Quite often I'll leave for the night with my Access app happily displaying its main page only to return to a zillion "Disk or Network Error" message boxes in the morning Obviously some time during the night the FE and BE have lost contact with each other - not too big a deal but I have to click through all the error messages - there can be up to 50 of them Then I have to re-boot the app - this is sometimes done un-gracefully from the task manager Is there a way I can trap this error at a dB kind of level - not a form level - then I can gracefully shut the app or alert the user to graceful shut the app? I think I know the error message number - just not sure where to trap for it Many thanks Darren -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Wed Oct 1 10:38:54 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 1 Oct 2008 10:38:54 -0500 Subject: [AccessD] Continuing Group on Report Print out Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C219E4BE99@XLIVMBX35bkup.aig.com> Odd. I have been using HasContinued for quite some time. Nothing fancy: I use it in the detail section of some reports where I have alternating shaded rows, like the old style green and white banded paper listings used to be printed on. I use code like this, which works fine... Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Static bShaded As Boolean If Detail.HasContinued = False Then bShaded = Not bShaded If bShaded = False Then Me.Detail.BackColor = BGLightGray Else Me.Detail.BackColor = BGwhite End If End Sub ... Now admittedly this is a Detail section, not a Header section. Perhaps it's only headers that have the bug? Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee Sent: Tuesday, September 30, 2008 5:12 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Continuing Group on Report Print out I have tried that and I still couldn't get it working. I got the group header to display (with my continue textbox) by turning on the Report's RepeatSection property Using your HasContinued clue, I started doing a google search and found several sites talking about it being a bug. Rogersaccesslibrary has a work around: http://www.rogersaccesslibrary.com/download3.asp?SampleName=HasContinued.mdb It seems that you have to store the name of each header each time it is printed in a global variable. If the next printed header is the same, you append "continued" to it. Thanks, David On Tue, Sep 30, 2008 at 1:13 PM, Heenan, Lambert wrote: > Well you say... > > "In that group's header, I display the Bill Type (Billable, > Non-Billable, > Upgrade...) " > > So I would just have another textbox (say named "txtContinued") right > next to the bill type textbox with a data source of ="(Continued)" and > then in the header Format event you would say > > txtContinued.Visible = GroupHeader0.HasContinued > > Replacing "GroupHeader0" with the correct name of the group header. > > Lambert > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David > McAfee > Sent: Tuesday, September 30, 2008 4:04 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Continuing Group on Report Print out > > Thanks for the quick response Lambert. > > I've tried using the .RepeatSection as well as just showing the label > and it seems to be skipping the whole group. > > Private Sub GroupHeader0_Format(Cancel As Integer, FormatCount As > Integer) If Me.GroupHeader0.HasContinued Then > Me.lblContinue.Visible = True > Me.Section("GroupHeader0").RepeatSection = True > 'Reports("rptRGAPrintOut").Section("GroupHeader0").RepeatSection = > True End If End Sub > > 'have also tried > just printing the name, in case I was wrong about the name of the > group header. > It seems to repeat six times if I put a optional stop in there. > > Debug.Print Me.GroupHeader0.Name > GroupHeader0 > GroupHeader0 > GroupHeader0 > GroupHeader0 > GroupHeader0 > GroupHeader0 > > Debug.Print Me.GroupHeader0.RepeatSection False False False False > False False > > Any idea what I am doing wrong? > > > On Tue, Sep 30, 2008 at 12:02 PM, Heenan, Lambert > wrote: > > > Check out the HasContinued property of report sections. If you > > reference it in the OnFormat event of your group header you can > > determine if you need to output "(continued)" > > > > Lambert > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David > > McAfee > > Sent: Tuesday, September 30, 2008 2:23 PM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Continuing Group on Report Print out > > > > Brain Fart... > > > > Is it possible to display a label and/or Group text box on a report > > that has had its group broken up on multiple pages? > > > > I have a report that has a huge list of parts. The list is grouped > > on a field "BillTypeID". > > > > In that group's header, I display the Bill Type (Billable, > > Non-Billable, > > Upgrade...) > > > > I'd like to be able to print out something like "Non-Billable > (continued)" > > on the top of the next page that has had its group broken up. Is > > this possible? > > > > Thanks, > > David > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Oct 1 15:59:56 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 1 Oct 2008 15:59:56 -0500 Subject: [AccessD] A2003: Disk or Network Error In-Reply-To: <00c301c92357$2d6e9ac0$0d1b910a@denzilnote> Message-ID: As it's already been mentioned, you should look into an underlying cause for the disconnection, though there may be legitimate reasons why it is disconnecting. Depending how backups are run, some backup processes will 'kill' access to a file, or even temporarily disconnect a 'session'. If you are getting repeated 'Disk or Network Error' messages, it sounds like the session is being disconnected. It's a common network issue with Access, that if you open up a database, with linked tables, everything will be fine until you try to connect to a table where it doesn't 'exist' network wise. Even if the network returns, Access won't 'reconnect'. It's one of my personal pet peeves with Access. However, there is a better way to work around this. You can do a simple 'if Dir("\\server\share\pathtodb\db.mdb")<>"" then' line to determine if that .mdb is visible. If you have linked tables, and kill your network connection, nothing will happen UNTIL you try to use those linked tables. So, if you have an app running overnight, if you 'test' your connection before you run something using those linked tables, you can just 'fail over' if it doesn't see the remote .mdb. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren D Sent: Tuesday, September 30, 2008 6:49 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] A2003: Disk or Network Error Hi Team Apologies if I have asked this before I have a dB that speaks with the BE. That BE that sits on a machine here used as a file share/server (It's not running Server software - just XP) Quite often I'll leave for the night with my Access app happily displaying its main page only to return to a zillion "Disk or Network Error" message boxes in the morning Obviously some time during the night the FE and BE have lost contact with each other - not too big a deal but I have to click through all the error messages - there can be up to 50 of them Then I have to re-boot the app - this is sometimes done un-gracefully from the task manager Is there a way I can trap this error at a dB kind of level - not a form level - then I can gracefully shut the app or alert the user to graceful shut the app? I think I know the error message number - just not sure where to trap for it Many thanks Darren -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From jwelz at hotmail.com Wed Oct 1 19:52:35 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Wed, 1 Oct 2008 18:52:35 -0600 Subject: [AccessD] A2003: Disk or Network Error In-Reply-To: References: <00c301c92357$2d6e9ac0$0d1b910a@denzilnote> Message-ID: I've had some intermittent 'Disk or Network error 3043' starting about 6 weeks ago. I've done some research and there are some links to problems relating to a missing temp file and some other theories. I'm up to over 50 concurrent users and I'm thinking it could just be a timeout. Everyone runs via VPN to one of four servers that connect to a server running 2003 Windows Server software, via a gigabit connection to a machine in the same room. They run 160 servers in that room now. Generally what happens is that there is a one minute refresh on a switchboard form and the error is triggered when the refresh doesn't find data. Generally what happens is that 10 or more users are dumped and they are generally dumped as a group logged into one of the 4 VPN servers allocated to our division. We are using drive mappings to the linked tables and it was suggested to me that there might be a problem with a loss of the mappings though I have not been asked to switch to UNC connect strings. They had made a change 6 weeks ago to some software that sets the mappings and reverted to the prior system but since the revert, we had another momentary disconnect resulting in a block of users getting the error again. IT has tried something different in terms of software settings again and it appears we've been stable for about a week now. In the 6 weeks since the problem began, I am aware of fewer than 8 times that blocks of users were disconnected. What happens is that they get a series of errors, one for each form, sub form, list or combo on the open forms and they have to clear the errors, anywhere from 10 to 50, before they can close the application and restart it. Upon restart it is always business as usual. Our company has decided it is time to update our system to a SQL Server BE as the application has been deemed mission critical. I'm told they've hired a team of 3 developers and they have allocated 2 - 3 months for the switch commencing some time in October. I guess the plan is that I will act as liason/consultant in my 'spare time', however, there is a good chance that I'll be locked out of and further BE development as the company has always been paranoid about security. I'll have to wait and see what is coming. CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> Date: Wed, 1 Oct 2008 15:59:56 -0500> From: DWUTKA at marlow.com> To: accessd at databaseadvisors.com> Subject: Re: [AccessD] A2003: Disk or Network Error> > As it's already been mentioned, you should look into an underlying cause> for the disconnection, though there may be legitimate reasons why it is> disconnecting. Depending how backups are run, some backup processes> will 'kill' access to a file, or even temporarily disconnect a> 'session'.> > If you are getting repeated 'Disk or Network Error' messages, it sounds> like the session is being disconnected. It's a common network issue> with Access, that if you open up a database, with linked tables,> everything will be fine until you try to connect to a table where it> doesn't 'exist' network wise. Even if the network returns, Access won't> 'reconnect'. It's one of my personal pet peeves with Access.> > However, there is a better way to work around this. You can do a simple> 'if Dir("\\server\share\pathtodb\db.mdb")<>"" then' line to determine if> that .mdb is visible. If you have linked tables, and kill your network> connection, nothing will happen UNTIL you try to use those linked> tables. So, if you have an app running overnight, if you 'test' your> connection before you run something using those linked tables, you can> just 'fail over' if it doesn't see the remote .mdb. > > Drew _________________________________________________________________ From jimdettman at verizon.net Wed Oct 1 21:40:45 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 01 Oct 2008 22:40:45 -0400 Subject: [AccessD] A2003: Disk or Network Error In-Reply-To: <00c301c92357$2d6e9ac0$0d1b910a@denzilnote> References: <00c301c92357$2d6e9ac0$0d1b910a@denzilnote> Message-ID: <44F1DA51854045938E99A26CD24A63B3@XPS> Darren, One of the things I've found in the past that has caused problems are machines loaded with a NIC dialog protocol. 3COM was one of the first to use this. What happens when this type of protocol is loaded is that the NIC is disconnected from the network for a short time, diags are run, and then it's reconnected. The time is so short most apps don't notice, but JET does. I've also seen in the past where when more then one protocol is loaded, timeouts can occur if the client and server are not using the same default protocol. This hasn't been a problem in recent years as almost everything is standardized on TCP/IP, but it's worth mentioning. Check the network properties and see if anything other then the TCP/IP Protocol is loaded. If a diag protocol is in there, get rid of it. Beyond that, any type of network error can cause those issues (bad cable, router, NIC, etc). Also, one other thing I've seen that can cause these; a TMP and/or TEMP environment variable that exists, but does not point to a valid path or one that is not available. Pretty rare now a days but again, something worth mentioning. HTH, Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren D Sent: Tuesday, September 30, 2008 7:49 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] A2003: Disk or Network Error Hi Team Apologies if I have asked this before I have a dB that speaks with the BE. That BE that sits on a machine here used as a file share/server (It's not running Server software - just XP) Quite often I'll leave for the night with my Access app happily displaying its main page only to return to a zillion "Disk or Network Error" message boxes in the morning Obviously some time during the night the FE and BE have lost contact with each other - not too big a deal but I have to click through all the error messages - there can be up to 50 of them Then I have to re-boot the app - this is sometimes done un-gracefully from the task manager Is there a way I can trap this error at a dB kind of level - not a form level - then I can gracefully shut the app or alert the user to graceful shut the app? I think I know the error message number - just not sure where to trap for it Many thanks Darren -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at nciinc.com Thu Oct 2 08:49:22 2008 From: JHewson at nciinc.com (Hewson, Jim ) Date: Thu, 2 Oct 2008 08:49:22 -0500 Subject: [AccessD] Corrupted Table Message-ID: <7E02B06E41E5404589EDDDA2BAA1C5A83EBF06@sanex101.nciinc.com> I developed a database in A2003 that was to be used in A2007. I did that because I do not have A2007 and the runtime is free. I am waiting for my next company machine which will have Office 2007 on it. I noticed that the BE on the client's machine was beginning to bloat. So I changed the BE to compact on exit and therefore when needed it could be opened and closed in the runtime and it would compact. I also changed the FE to compact on close. One form would not allow any new records - an error message would appear that stated it would create a duplicate entry in an index. I looked at the offending table and when I tried to enter data in the table the AutoNumber PK would increment starting with a single digit. There are over 150 records in the table. So the next PK might be 7, close the table, and try again. It would increment to 8.... The first time, I created a blank mdb and inserted all the tables. The second time, I copied the table - the copy works as expected. What could be causing the table to corrupt? Is the compact on close corrupting the table? TIA, Jim Jim H. Hewson ################################################################################ This email transmission contains information from NCI Information Systems, Inc. that may be considered privileged or confidential and is intended solely for the named recipient. If you have received this message in error, please contact the sender immediately and be aware that the use, copying or dissemination of this information is prohibited. ################################################################################ From kp at sdsonline.net Fri Oct 3 22:17:16 2008 From: kp at sdsonline.net (Kath Pelletti) Date: Sat, 4 Oct 2008 13:17:16 +1000 Subject: [AccessD] accessd lurkers melbourne aust Message-ID: <01bf01c925cf$b4c8b440$6501a8c0@DELLAPTOP> I am aware that this is pretty OT but hope I will be forgiven. Just wondering (as I am preparing to close my consultancy and return to a full time Bus. Analyst role in the corporate world again) - Are there are any Access / VBA developers in Melbourne (Australia) lurking on the list who might be interested in picking up some of my clients? If so could they pls email me off list. thx / rgds ps - I won't leave the list without saying goodbye - just getting ready!! Kath ______________________________________ Kath Pelletti Software Design and Solutions Pty Ltd From paul.hartland at googlemail.com Fri Oct 3 03:02:15 2008 From: paul.hartland at googlemail.com (Paul Hartland) Date: Fri, 3 Oct 2008 09:02:15 +0100 Subject: [AccessD] Visual Basic 2008 Express & VB.NET Message-ID: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> To all, Firstly appologies about the cross post, only I don't seem to be getting much mail from the Visual Basic list. I have downloaded Visual Basic 2008 Express edition, is this Visual Basic the same as VB.NET. If so would you recommend that I but a book on VB.NET or Visual Basic 2008. Also any good recommendations of book etc to start learning from scratch ? -- Paul Hartland paul.hartland at googlemail.com From Johncliviger at aol.com Fri Oct 3 04:36:31 2008 From: Johncliviger at aol.com (Johncliviger at aol.com) Date: Fri, 3 Oct 2008 05:36:31 EDT Subject: [AccessD] Visual Basic 2008 Express & VB.NET Message-ID: Paul I started to get my brain around VB2005/08 in Jan this year and used AppDev DVD's by Ken Getz and Robert Green. They had a 1/2 price deal at the time. I bought the "Developing Applications" DVD I found it a good starter in terms of navigating around software and defining terminology. What I liked was being able to repeat session over and over. Its ideal for my teflon coated brain. The 2 DVD's cover the basics very well. Regards johnc From jimdettman at verizon.net Fri Oct 3 08:29:54 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Fri, 03 Oct 2008 09:29:54 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> Message-ID: Paul, The Express products are a slimed down versions of the full product. They are not quite the same. VB Express though unlike some of the other languages (ie. C#), has a good portion of what's in the full product. The IDE is almost the same for example. I'm just getting in to VB2008 myself and picked up Pro VB 2008 and the .NET 3.5 Platform by Andrew Troelsen, published by Apress. I just started working through it, so I can't provide a lot of feedback on it yet, but it seems to and cover all the fundamentals and will be a good starting point. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Hartland Sent: Friday, October 03, 2008 4:02 AM To: Access List; VisualBasicList Subject: [AccessD] Visual Basic 2008 Express & VB.NET To all, Firstly appologies about the cross post, only I don't seem to be getting much mail from the Visual Basic list. I have downloaded Visual Basic 2008 Express edition, is this Visual Basic the same as VB.NET. If so would you recommend that I but a book on VB.NET or Visual Basic 2008. Also any good recommendations of book etc to start learning from scratch ? -- Paul Hartland paul.hartland at googlemail.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Fri Oct 3 08:35:21 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Fri, 3 Oct 2008 09:35:21 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> Message-ID: <084301c9255c$e3d0a310$2f8601c7@SusanOne> > The Express products are a slimed down versions of the full product. > They > are not quite the same. VB Express though unlike some of the other > languages (ie. C#), has a good portion of what's in the full product. The > IDE is almost the same for example. ========It's easy to use. You don't have to be all that knowledgeable to use it -- lots of wizards and the such. Connecting and retrieving data is a few clicks. Susan H. From dwaters at usinternet.com Fri Oct 3 08:56:57 2008 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 3 Oct 2008 08:56:57 -0500 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> Message-ID: Take a look at Murach's Visual Basic 2008. It's specifically written as a teaching book for developer's learning VB.Net for the first time. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Hartland Sent: Friday, October 03, 2008 3:02 AM To: Access List; VisualBasicList Subject: [AccessD] Visual Basic 2008 Express & VB.NET To all, Firstly appologies about the cross post, only I don't seem to be getting much mail from the Visual Basic list. I have downloaded Visual Basic 2008 Express edition, is this Visual Basic the same as VB.NET. If so would you recommend that I but a book on VB.NET or Visual Basic 2008. Also any good recommendations of book etc to start learning from scratch ? -- Paul Hartland paul.hartland at googlemail.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 Oct 3 10:15:40 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 3 Oct 2008 08:15:40 -0700 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <084301c9255c$e3d0a310$2f8601c7@SusanOne> References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> <084301c9255c$e3d0a310$2f8601c7@SusanOne> Message-ID: It's not knowing how to use it that counts, it's knowing what to use it for!! Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Friday, October 03, 2008 6:35 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > The Express products are a slimed down versions of the full product. > They > are not quite the same. VB Express though unlike some of the other > languages (ie. C#), has a good portion of what's in the full product. > The IDE is almost the same for example. ========It's easy to use. You don't have to be all that knowledgeable to use it -- lots of wizards and the such. Connecting and retrieving data is a few clicks. Susan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From wdhindman at dejpolsystems.com Fri Oct 3 23:08:45 2008 From: wdhindman at dejpolsystems.com (William Hindman) Date: Sat, 4 Oct 2008 00:08:45 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> Message-ID: <85848A393EA04C40B88F75C59629CDE5@jislaptopdev> Paul ...before you buy a book (Susan will kill me for this) try the MS dotnet learning site first ...they have literally dozens of free walk though videos with downloadable code ...a step above the normal quality for MS ...I've got hundreds of books collecting dust from other products over the years but not one on VS2008 so far even though its now my full time development environment (with the exception of legacy Access dbs that I still support and am working on converting) ...point being that imnsho, the quality and accessibility of free and low cost on-line learning resources now makes most tech books obsolete ...and I'd be the first to admit I love books. William -------------------------------------------------- From: "Paul Hartland" Sent: Friday, October 03, 2008 4:02 AM To: "Access List" ; "VisualBasicList" Subject: [AccessD] Visual Basic 2008 Express & VB.NET > To all, > > Firstly appologies about the cross post, only I don't seem to be getting > much mail from the Visual Basic list. I have downloaded Visual Basic 2008 > Express edition, is this Visual Basic the same as VB.NET. If so would you > recommend that I but a book on VB.NET or Visual Basic 2008. Also any good > recommendations of book etc to start learning from scratch ? > > -- > Paul Hartland > paul.hartland at googlemail.com > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From shamil at smsconsulting.spb.ru Sat Oct 4 02:03:56 2008 From: shamil at smsconsulting.spb.ru (Shamil Salakhetdinov) Date: Sat, 4 Oct 2008 11:03:56 +0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <85848A393EA04C40B88F75C59629CDE5@jislaptopdev> Message-ID: <000201c925ef$5f492390$6401a8c0@nant> William, I'd propose that to not collect dust, to preserve environment, to save one's time from Internet browsing and to save some money one can use e-books these days: good books (which are a few) unlike Internet usually serve for very quick "jump-start" with guaranteed good final result. For example, for ASP.NET programming such "jump-start with guaranteed good final results book" is IMO: ASP.NET 2.0 Website Programming: Problem - Design - Solution http://www.amazon.com/ASP-NET-2-0-Website-Programming-Programmer/dp/07645846 42 That one helped me personally to program an advanced ASP.NET application starting from a very basic level of ASP.NET programming experience. The application I programmed has 50,000+ page hits some days with million+ records in some MS SQL 2005 back-end tables... (Well, as far as I see now that's only the beginning of this story of advanced Internet applications programming but without reading the referred above book I could have ended-up in a disastrous solution without any future...) Proposal: it would be useful if here we can collectively build a list of "recommended to read books" and other sources and publish this list on Access-D web site? The above book is the one I'd recommend to put as the first one in "ASP.NET recommended reading" list... Thank you. -- Shamil -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Saturday, October 04, 2008 8:09 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET Paul ...before you buy a book (Susan will kill me for this) try the MS dotnet learning site first ...they have literally dozens of free walk though videos with downloadable code ...a step above the normal quality for MS ...I've got hundreds of books collecting dust from other products over the years but not one on VS2008 so far even though its now my full time development environment (with the exception of legacy Access dbs that I still support and am working on converting) ...point being that imnsho, the quality and accessibility of free and low cost on-line learning resources now makes most tech books obsolete ...and I'd be the first to admit I love books. William From wdhindman at dejpolsystems.com Sat Oct 4 05:53:56 2008 From: wdhindman at dejpolsystems.com (William Hindman) Date: Sat, 4 Oct 2008 06:53:56 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET References: <000201c925ef$5f492390$6401a8c0@nant> Message-ID: ...you make my point for me Shamil ...the book is 3 years old now and everything is available on-line for free ...plus lots of updates, improvements, errors, and user comments http://www.codeplex.com/TheBeerHouse ...why pay Amazon? ...why a book? ...although I'll allow that having a 12gig internet link probably makes it easier for me than you :) ...ps ...I visit his blog sometimes ...the source code is there as well but not as well maintained as the codeplex source. William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 3:03 AM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I'd propose that to not collect dust, to preserve environment, to save > one's > time from Internet browsing and to save some money one can use e-books > these > days: good books (which are a few) unlike Internet usually serve for very > quick "jump-start" with guaranteed good final result. > > For example, for ASP.NET programming such "jump-start with guaranteed good > final results book" is IMO: > > ASP.NET 2.0 Website Programming: Problem - Design - Solution > > http://www.amazon.com/ASP-NET-2-0-Website-Programming-Programmer/dp/07645846 > 42 > > That one helped me personally to program an advanced ASP.NET application > starting from a very basic level of ASP.NET programming experience. The > application I programmed has 50,000+ page hits some days with million+ > records in some MS SQL 2005 back-end tables... (Well, as far as I see now > that's only the beginning of this story of advanced Internet applications > programming but without reading the referred above book I could have > ended-up in a disastrous solution without any future...) > > Proposal: it would be useful if here we can collectively build a list of > "recommended to read books" and other sources and publish this list on > Access-D web site? > > The above book is the one I'd recommend to put as the first one in > "ASP.NET > recommended reading" list... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Saturday, October 04, 2008 8:09 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > Paul > > ...before you buy a book (Susan will kill me for this) try the MS dotnet > learning site first ...they have literally dozens of free walk though > videos > > with downloadable code ...a step above the normal quality for MS ...I've > got > > hundreds of books collecting dust from other products over the years but > not > > one on VS2008 so far even though its now my full time development > environment (with the exception of legacy Access dbs that I still support > and am working on converting) ...point being that imnsho, the quality and > accessibility of free and low cost on-line learning resources now makes > most > > tech books obsolete ...and I'd be the first to admit I love books. > > William > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From ssharkins at gmail.com Sat Oct 4 09:33:04 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Sat, 4 Oct 2008 10:33:04 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET References: <38c884770810030102g66bac8f8g38ea535fed6dcdf7@mail.gmail.com> <85848A393EA04C40B88F75C59629CDE5@jislaptopdev> Message-ID: <0ce101c9262e$62683f40$2f8601c7@SusanOne> I don't have a VB Express book on the shelves, so you have my permission... ;) Seriously, I'll be taking a look myself. I still drag a book out occasionally, but I don't have any news one either. Susan H. > Paul > > ...before you buy a book (Susan will kill me for this) try the MS dotnet > learning site first ...they have literally dozens of free walk though > videos > with downloadable code ...a step above the normal quality for MS ...I've > got > hundreds of books collecting dust from other products over the years but > not > one on VS2008 so far even though its now my full time development > environment (with the exception of legacy Access dbs that I still support > and am working on converting) ...point being that imnsho, the quality and > accessibility of free and low cost on-line learning resources now makes > most > tech books obsolete ...and I'd be the first to admit I love books. From shamil at smsconsulting.spb.ru Sat Oct 4 11:28:17 2008 From: shamil at smsconsulting.spb.ru (Shamil Salakhetdinov) Date: Sat, 4 Oct 2008 20:28:17 +0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: Message-ID: <001601c9263e$3648d360$6401a8c0@nant> William, I do not see this book available for free, code only, do you? I'm gladly paying for the books like Marco's one as they pay themselves manifold and very quickly... These books have well systemized and "condensed" stuff, supplied with working real life apps unlike Internet where it's often not easy (very time consuming) to find needed information, and it's almost not possible at all to get so well systemized and ready to use for real life software development stuff as Marco's book: for big advanced projects I mean, conceptual yet very useful and applicable and proven in real life software development business solutions I mean... Of course Internet is full of cookbook-style solutions/advises but one still have to have good experience and intuition to apply them in this or that case, and often a lot of time to filter-out "garbage" stuff... BTW, have you heard about this project/initiative? "Stack Overflow Launches" http://www.joelonsoftware.com/items/2008/09/15.html and http://blog.stackoverflow.com/ from Joel Spolsky? It looks promising but I'd think it would never be a substitute for good books as Marco Bellinaso's one ... Thank you. -- Shamil -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Saturday, October 04, 2008 2:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET ...you make my point for me Shamil ...the book is 3 years old now and everything is available on-line for free ...plus lots of updates, improvements, errors, and user comments http://www.codeplex.com/TheBeerHouse ...why pay Amazon? ...why a book? ...although I'll allow that having a 12gig internet link probably makes it easier for me than you :) ...ps ...I visit his blog sometimes ...the source code is there as well but not as well maintained as the codeplex source. William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From wdhindman at dejpolsystems.com Sat Oct 4 15:45:01 2008 From: wdhindman at dejpolsystems.com (William Hindman) Date: Sat, 4 Oct 2008 16:45:01 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET References: <001601c9263e$3648d360$6401a8c0@nant> Message-ID: ...we'll agree to disagree :) ...in the time it takes for me to find the author's solution in a book, assuming its even there, I can find dozens of valid approaches on the web along with comments from people who have used them for better or worse ...I've not opened any tech book in ages with the single exception of Susan/Martin's Access to SQL Server which I have tagged with dozens of yellow stickies ...other wise, its the web for me. ...I think the real downturn for me was when the book stores stopped carrying a wide variety of them ...I used to go to Books-a-Million while the family went store hopping ...I could actually open the book and read it to see if it was at my level, presented like I like, and actually had useful examples ...I'd buy any book that passed that test ...now its Amazon or e-bay and I just don't even bother any more. ...love the StackOverflow site ...went right into my favorites ...thanks :) William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 12:28 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I do not see this book available for free, code only, do you? > > I'm gladly paying for the books like Marco's one as they pay themselves > manifold and very quickly... > > These books have well systemized and "condensed" stuff, supplied with > working real life apps unlike Internet where it's often not easy (very > time > consuming) to find needed information, and it's almost not possible at all > to get so well systemized and ready to use for real life software > development stuff as Marco's book: for big advanced projects I mean, > conceptual yet very useful and applicable and proven in real life software > development business solutions I mean... > > Of course Internet is full of cookbook-style solutions/advises but one > still > have to have good experience and intuition to apply them in this or that > case, and often a lot of time to filter-out "garbage" stuff... > > BTW, have you heard about this project/initiative? > > "Stack Overflow Launches" > http://www.joelonsoftware.com/items/2008/09/15.html and > http://blog.stackoverflow.com/ > > from Joel Spolsky? > > It looks promising but I'd think it would never be a substitute for good > books as Marco Bellinaso's one ... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Saturday, October 04, 2008 2:54 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...you make my point for me Shamil ...the book is 3 years old now and > everything is available on-line for free ...plus lots of updates, > improvements, errors, and user comments > > http://www.codeplex.com/TheBeerHouse > > ...why pay Amazon? ...why a book? ...although I'll allow that having a > 12gig > > internet link probably makes it easier for me than you :) > > ...ps ...I visit his blog sometimes ...the source code is there as well > but > not as well maintained as the codeplex source. > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Sun Oct 5 11:53:38 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Sun, 5 Oct 2008 09:53:38 -0700 Subject: [AccessD] Position in bound recordset Message-ID: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005> Dear List Is there a way to get the record number of the current record on a bound form - that is, not the autonumber id but the position of the record - like record 45 of 12,000? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From rockysmolin at bchacc.com Sun Oct 5 11:59:08 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Sun, 5 Oct 2008 09:59:08 -0700 Subject: [AccessD] Position in bound recordset In-Reply-To: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005> References: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005> Message-ID: <5A9FFA0C392A4EBE9E33F3575297E77A@HAL9005> Never mind. Figured it out. Dim rs as Recordset Set rs = Me.Recordset Me.lblRecordXofY.Caption = "Patient " & rs.AbsolutePosition + 1 & " of " & rs.RecordCount Unless there's a slicker way. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Sunday, October 05, 2008 9:54 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Position in bound recordset Dear List Is there a way to get the record number of the current record on a bound form - that is, not the autonumber id but the position of the record - like record 45 of 12,000? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bill_patten at embarqmail.com Sun Oct 5 13:24:19 2008 From: bill_patten at embarqmail.com (Bill Patten) Date: Sun, 5 Oct 2008 11:24:19 -0700 Subject: [AccessD] Position in bound recordset In-Reply-To: <5A9FFA0C392A4EBE9E33F3575297E77A@HAL9005> References: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005> <5A9FFA0C392A4EBE9E33F3575297E77A@HAL9005> Message-ID: <3413809888F24BAAB0D1DCCA28659591@BPCS> Hey Rocky, Looks pretty slick to me, though I think you can do the same thing with me.lblRecordXofY.Caption = "Patient " & me.recordset.AbsolutePostion + 1 & "of " & me.recordset.RecordCount and illuminate setting and destroying another recordset. Bill ----- Original Message ----- From: "Rocky Smolin at Beach Access Software" To: "'Access Developers discussion and problem solving'" Sent: Sunday, October 05, 2008 9:59 AM Subject: Re: [AccessD] Position in bound recordset Never mind. Figured it out. Dim rs as Recordset Set rs = Me.Recordset Me.lblRecordXofY.Caption = "Patient " & rs.AbsolutePosition + 1 & " of " & rs.RecordCount Unless there's a slicker way. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Sunday, October 05, 2008 9:54 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Position in bound recordset Dear List Is there a way to get the record number of the current record on a bound form - that is, not the autonumber id but the position of the record - like record 45 of 12,000? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sun Oct 5 13:48:40 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Sun, 5 Oct 2008 11:48:40 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: <018601c91cf0$34907160$0201a8c0@HAL9005> <01a401c91cfc$d913f570$0201a8c0@HAL9005> Message-ID: Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From accessd at shaw.ca Sun Oct 5 13:52:22 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Sun, 5 Oct 2008 11:52:22 -0700 Subject: [AccessD] Dlookups. your opinion please. In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720076DA26FB3@WPEXCH22.retail.ad.cmltd.net.au> References: <48D85D7D.16721.1F2C4816@stuart.lexacorp.com.pg> <57E6E6CA42105A48B977303A2CDC2720076DA26FB3@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <7EED17D02FDD401FA2B7AEE66715ABE0@creativesystemdesigns.com> Well as long as the client does not mind sponsoring you for a few months things can be fixed (major, major re-write) Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: Monday, September 22, 2008 8:54 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dlookups. your opinion please. Hi All, I have, ummm, inherited a database (SQL Server Back, Access Front) at work. Frankly this thing is a disaster waiting to happen and since the guy who built has left (he used to admin it, and I suspect there were regular band aid repairs and updates to keep it all steady) the actual users are having no end of bother and bugs with it. anyway, I digress... The code is full of DLookups, something which I have not felt the need to use ever. I think I read somewhere that using lots of dlookups is a bad idea. Anyway. What is your opinion on using them? If they are fine and no bother then I am happy to leave them in the code (at least for now). But if they are known to be bothersome then I am more than happy to get rid of them and use something better. this thing just gets more and more ugly. Nearly everything in the VBA code is dimmed as a string and they are wondering why the numeric fields are not populating correctly. messy messy messy. I can see someone in the past has figured out that was a bad idea and redimmed some stuff as double. But they have left the code like this "Dim strMyVariable as Double" which is a right PITA when debugging. And the whole show is being driven client side from Access, rather than server side from SQL Server... Sorry about the rant... cheers and get me another scotch! darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From shamil at smsconsulting.spb.ru Sun Oct 5 13:47:20 2008 From: shamil at smsconsulting.spb.ru (Shamil Salakhetdinov) Date: Sun, 5 Oct 2008 22:47:20 +0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: Message-ID: <000601c9271a$ce01b0a0$6401a8c0@nant> <<< ...love the StackOverflow site ... went right into my favorites ...thanks :) >>> My pleasure! :) That's what is good in discussions where the sides do not come to a common point of view still they learn and use a lot from each other - duality, a hidden(?) driving force, seems to be everywhere in this world... (Sorry for my getting a bit philosophical this Sunday's evening here...) Thank you, -- Shamil P.S. Listening to "Cabaret" by Liza Minnelli right now :)... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Sunday, October 05, 2008 12:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET ...we'll agree to disagree :) ...in the time it takes for me to find the author's solution in a book, assuming its even there, I can find dozens of valid approaches on the web along with comments from people who have used them for better or worse ...I've not opened any tech book in ages with the single exception of Susan/Martin's Access to SQL Server which I have tagged with dozens of yellow stickies ...other wise, its the web for me. ...I think the real downturn for me was when the book stores stopped carrying a wide variety of them ...I used to go to Books-a-Million while the family went store hopping ...I could actually open the book and read it to see if it was at my level, presented like I like, and actually had useful examples ...I'd buy any book that passed that test ...now its Amazon or e-bay and I just don't even bother any more. ...love the StackOverflow site ...went right into my favorites ...thanks :) William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 12:28 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I do not see this book available for free, code only, do you? > > I'm gladly paying for the books like Marco's one as they pay themselves > manifold and very quickly... > > These books have well systemized and "condensed" stuff, supplied with > working real life apps unlike Internet where it's often not easy (very > time > consuming) to find needed information, and it's almost not possible at all > to get so well systemized and ready to use for real life software > development stuff as Marco's book: for big advanced projects I mean, > conceptual yet very useful and applicable and proven in real life software > development business solutions I mean... > > Of course Internet is full of cookbook-style solutions/advises but one > still > have to have good experience and intuition to apply them in this or that > case, and often a lot of time to filter-out "garbage" stuff... > > BTW, have you heard about this project/initiative? > > "Stack Overflow Launches" > http://www.joelonsoftware.com/items/2008/09/15.html and > http://blog.stackoverflow.com/ > > from Joel Spolsky? > > It looks promising but I'd think it would never be a substitute for good > books as Marco Bellinaso's one ... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Saturday, October 04, 2008 2:54 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...you make my point for me Shamil ...the book is 3 years old now and > everything is available on-line for free ...plus lots of updates, > improvements, errors, and user comments > > http://www.codeplex.com/TheBeerHouse > > ...why pay Amazon? ...why a book? ...although I'll allow that having a > 12gig > > internet link probably makes it easier for me than you :) > > ...ps ...I visit his blog sometimes ...the source code is there as well > but > not as well maintained as the codeplex source. > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sun Oct 5 14:16:05 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Sun, 5 Oct 2008 12:16:05 -0700 Subject: [AccessD] Relationships to Visio? In-Reply-To: References: <011101c91e45$2a44d2e0$0201a8c0@HAL9005> Message-ID: <65701A00B3D7498F97EAEB00DCEFFFF2@creativesystemdesigns.com> You can also try DBDesigner. It is nothing sophisticated, targeted mostly towards MySQL (work fine with MS SQL and Oracle but takes some fooling around.) The price is right so there is not reason for complaint, though I have posted some money to them, a few years back: http://www.fabforce.net/ Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Wednesday, September 24, 2008 9:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Relationships to Visio? I used Visio for years and liked it in spite of a few "features"! I got disillusioned when MS took the forward engineering out of the Pro version and moved it to Enterprise, so I tried Dezign for Databases (www.datanamic.com/), which isn't as pretty but is way powerful on relationships. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Wednesday, September 24, 2008 5:58 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Relationships to Visio? Dear List: I find the relationships form to be a PITA to work with. The scroll wheel doesn't work and there's not enough real estate to get the tables on one form so I'm always scrolling up and down and left and right. Once I get the tables and relationships laid out is there a way to get it over to Visio where I could move the tables around more easier to make a more readable relationships diagram? Even if possible, would Visio be a good program to do this? OR what does anyone else do with this relationships thing to make it more presentable. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sun Oct 5 14:34:11 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Sun, 5 Oct 2008 12:34:11 -0700 Subject: [AccessD] Integrating Email with Custom Client Database In-Reply-To: References: Message-ID: <091A7CE5E2FD470681905B02D8AC8AEC@creativesystemdesigns.com> Excellent... that may be the answer to my problem as well. Thanks Gustav. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, September 25, 2008 2:32 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Integrating Email with Custom Client Database Hi Rocky One method could be to move all the e-mails to hMailServer: http://www.hmailserver.com and run this as either a mail store or an in-house mail server. All e-mails are stored as discrete files but all structured data are written as well to a database, MySQL or SQL Server. This you can access directly for fast searching. Also, hMS sports a COM interface and an API: http://www.hmailserver.com/documentation/?page=com_objects which allows you to control and access most events and methods of the server. And the price is right. /gustav >>> rockysmolin at bchacc.com 25-09-2008 18:22 >>> Dear List: A client with a law firm ahs a home-grown Access/SQL db for everything. They use Outlook but all emails are in one folder containing several tens of thousands of email. They have four thousand client. They have client contacts recorded but increasingly contacts are by email and so if they want to see a full history of interactions with a client they have to go to two places. Client would like some way to connect his client contacts with the emails. Has anyone had/solved this problem? MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Sun Oct 5 14:30:26 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Sun, 5 Oct 2008 12:30:26 -0700 Subject: [AccessD] Position in bound recordset In-Reply-To: <3413809888F24BAAB0D1DCCA28659591@BPCS> References: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005><5A9FFA0C392A4EBE9E33F3575297E77A@HAL9005> <3413809888F24BAAB0D1DCCA28659591@BPCS> Message-ID: <3DA1A08E999944F6A5086F01876703B0@HAL9005> Yep. You're right. Just tested and it works fine. Tks. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Sunday, October 05, 2008 11:24 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Position in bound recordset Hey Rocky, Looks pretty slick to me, though I think you can do the same thing with me.lblRecordXofY.Caption = "Patient " & me.recordset.AbsolutePostion + 1 & "of " & me.recordset.RecordCount and illuminate setting and destroying another recordset. Bill ----- Original Message ----- From: "Rocky Smolin at Beach Access Software" To: "'Access Developers discussion and problem solving'" Sent: Sunday, October 05, 2008 9:59 AM Subject: Re: [AccessD] Position in bound recordset Never mind. Figured it out. Dim rs as Recordset Set rs = Me.Recordset Me.lblRecordXofY.Caption = "Patient " & rs.AbsolutePosition + 1 & " of " & rs.RecordCount Unless there's a slicker way. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Sunday, October 05, 2008 9:54 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Position in bound recordset Dear List Is there a way to get the record number of the current record on a bound form - that is, not the autonumber id but the position of the record - like record 45 of 12,000? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dbdoug at gmail.com Sun Oct 5 15:09:07 2008 From: dbdoug at gmail.com (Doug Steele) Date: Sun, 5 Oct 2008 13:09:07 -0700 Subject: [AccessD] Visual Basic 2008 Express & VB.NET..drifting slightly OT here.. Message-ID: <4dd71a0c0810051309j5952c9fcma3e7bc1b7e1f8df9@mail.gmail.com> The StackOverflow founders have a very interesting set of podcasts, available at http://blog.stackoverflow.com/category/podcasts/ dealing with program development, databases, etc. Unfortunately, not a mention of Access in the whole series :( Doug Steele On Sun, Oct 5, 2008 at 11:47 AM, Shamil Salakhetdinov < shamil at smsconsulting.spb.ru> wrote: > <<< > ...love the StackOverflow site ... > went right into my favorites ...thanks :) > >>> > > From bill_patten at embarqmail.com Sun Oct 5 15:48:04 2008 From: bill_patten at embarqmail.com (Bill Patten) Date: Sun, 5 Oct 2008 13:48:04 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: <018601c91cf0$34907160$0201a8c0@HAL9005><01a401c91cfc$d913f570$0201a8c0@HAL9005> Message-ID: Hi Jim, I have been using a modified version of vbSendMail.dll http://www.freevbcode.com/ShowCode.Asp?ID=109 It allows you to change ports, set authentication true and add Username and Password. It works fine on Embarqmail.com sample part of code .UseAuthentication = True 'bAuthLogin ' Optional, default = FALSE .UsePopAuthentication = bPopLogin ' Optional, default = FALSE .Username = "Username at embarqmail.com" ' Optional, default = Null String .Password = "SomePassword" etc. Apparently it does not support SSL if you need that. Doing a Google search on vbSendMail.dll for dot net produced several samples of how to wrap the dll in dot net if that would help you. Price is right, and enough documentation so that even I could make it work. By the way since I just use it to send an email to me once a day from my server, I have hard coded most of it. HTH Bill ----- Original Message ----- From: "Jim Lawrence" To: "'Access Developers discussion and problem solving'" Sent: Sunday, October 05, 2008 11:48 AM Subject: Re: [AccessD] Email Problem Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.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 Oct 5 16:18:18 2008 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 05 Oct 2008 23:18:18 +0200 Subject: [AccessD] Email Problem Message-ID: Hi Jim The simple method is to ask the ISP to open that port. Some do it for the asking (and telling why), some require a "pro" or "business" account. Another method is to use port 587. Quite a few ISPs support that, some only for secure mail, first of all Gmail. However, if you can handle that, Gmail is free but their mail servers are slower than most and an account has some unofficial limit of about 500 to 750 outgoing mails per day - probably not an issue for you. Also, you could have your app hosted. Every hosting provider offers an in-house SMTP server available for the clients' sites and applications. This doesn't need to be very expensive. Here's an European provider we use a lot: http://www.unoeuro.com/products.php?setvat=false /gustav >>> accessd at shaw.ca 05-10-2008 20:48 >>> Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim From dw-murphy at cox.net Sun Oct 5 17:56:05 2008 From: dw-murphy at cox.net (Doug Murphy) Date: Sun, 5 Oct 2008 15:56:05 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: <018601c91cf0$34907160$0201a8c0@HAL9005><01a401c91cfc$d913f570$0201a8c0@HAL9005> Message-ID: <001b01c9273d$8c01b420$0200a8c0@murphy3234aaf1> Jim, I have not had that problem when using asp generated mail from the host server but have when I tried to use my isp smtp server for automated email from my computer. I ended up using my gmail account smtp server. The messages show as originating from your account. Hope that helps. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Lawrence Sent: Sunday, October 05, 2008 11:49 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From max.wanadoo at gmail.com Sun Oct 5 18:08:50 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Mon, 6 Oct 2008 00:08:50 +0100 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <000601c9271a$ce01b0a0$6401a8c0@nant> References: <000601c9271a$ce01b0a0$6401a8c0@nant> Message-ID: <48e948fc.0b9e100a.54c9.1043@mx.google.com> Nice one Shamil. > where the sides do not come to a common point of view still they learn and use a lot from each other Wish that all took the same point of view. We might not have lost the great John (think what you like, but I loved his posting. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil Salakhetdinov Sent: 05 October 2008 19:47 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET <<< ...love the StackOverflow site ... went right into my favorites ...thanks :) >>> My pleasure! :) That's what is good in discussions where the sides do not come to a common point of view still they learn and use a lot from each other - duality, a hidden(?) driving force, seems to be everywhere in this world... (Sorry for my getting a bit philosophical this Sunday's evening here...) Thank you, -- Shamil P.S. Listening to "Cabaret" by Liza Minnelli right now :)... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Sunday, October 05, 2008 12:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET ...we'll agree to disagree :) ...in the time it takes for me to find the author's solution in a book, assuming its even there, I can find dozens of valid approaches on the web along with comments from people who have used them for better or worse ...I've not opened any tech book in ages with the single exception of Susan/Martin's Access to SQL Server which I have tagged with dozens of yellow stickies ...other wise, its the web for me. ...I think the real downturn for me was when the book stores stopped carrying a wide variety of them ...I used to go to Books-a-Million while the family went store hopping ...I could actually open the book and read it to see if it was at my level, presented like I like, and actually had useful examples ...I'd buy any book that passed that test ...now its Amazon or e-bay and I just don't even bother any more. ...love the StackOverflow site ...went right into my favorites ...thanks :) William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 12:28 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I do not see this book available for free, code only, do you? > > I'm gladly paying for the books like Marco's one as they pay themselves > manifold and very quickly... > > These books have well systemized and "condensed" stuff, supplied with > working real life apps unlike Internet where it's often not easy (very > time > consuming) to find needed information, and it's almost not possible at all > to get so well systemized and ready to use for real life software > development stuff as Marco's book: for big advanced projects I mean, > conceptual yet very useful and applicable and proven in real life software > development business solutions I mean... > > Of course Internet is full of cookbook-style solutions/advises but one > still > have to have good experience and intuition to apply them in this or that > case, and often a lot of time to filter-out "garbage" stuff... > > BTW, have you heard about this project/initiative? > > "Stack Overflow Launches" > http://www.joelonsoftware.com/items/2008/09/15.html and > http://blog.stackoverflow.com/ > > from Joel Spolsky? > > It looks promising but I'd think it would never be a substitute for good > books as Marco Bellinaso's one ... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Saturday, October 04, 2008 2:54 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...you make my point for me Shamil ...the book is 3 years old now and > everything is available on-line for free ...plus lots of updates, > improvements, errors, and user comments > > http://www.codeplex.com/TheBeerHouse > > ...why pay Amazon? ...why a book? ...although I'll allow that having a > 12gig > > internet link probably makes it easier for me than you :) > > ...ps ...I visit his blog sometimes ...the source code is there as well > but > not as well maintained as the codeplex source. > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 nciinc.com Sun Oct 5 19:00:03 2008 From: JHewson at nciinc.com (Hewson, Jim ) Date: Sun, 5 Oct 2008 19:00:03 -0500 Subject: [AccessD] Position in bound recordset References: <86D9A04E25834D77A53C7BA7B6A9EC26@HAL9005><5A9FFA0C392A4EBE9E33F3575297E77A@HAL9005><3413809888F24BAAB0D1DCCA28659591@BPCS> <3DA1A08E999944F6A5086F01876703B0@HAL9005> Message-ID: <7E02B06E41E5404589EDDDA2BAA1C5A8011543@sanex101.nciinc.com> If you're trying to put it in a text box on a form just use "=(CurrentRecord)" That will give you the record number in the current dataset including a dataset from a query. Jim ________________________________ From: accessd-bounces at databaseadvisors.com on behalf of Rocky Smolin at Beach Access Software Sent: Sun 10/5/2008 14:30 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Position in bound recordset Yep. You're right. Just tested and it works fine. Tks. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Sunday, October 05, 2008 11:24 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Position in bound recordset Hey Rocky, Looks pretty slick to me, though I think you can do the same thing with me.lblRecordXofY.Caption = "Patient " & me.recordset.AbsolutePostion + 1 & "of " & me.recordset.RecordCount and illuminate setting and destroying another recordset. Bill ----- Original Message ----- From: "Rocky Smolin at Beach Access Software" To: "'Access Developers discussion and problem solving'" Sent: Sunday, October 05, 2008 9:59 AM Subject: Re: [AccessD] Position in bound recordset Never mind. Figured it out. Dim rs as Recordset Set rs = Me.Recordset Me.lblRecordXofY.Caption = "Patient " & rs.AbsolutePosition + 1 & " of " & rs.RecordCount Unless there's a slicker way. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Sunday, October 05, 2008 9:54 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Position in bound recordset Dear List Is there a way to get the record number of the current record on a bound form - that is, not the autonumber id but the position of the record - like record 45 of 12,000? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ################################################################################ This email transmission contains information from NCI Information Systems, Inc. that may be considered privileged or confidential and is intended solely for the named recipient. If you have received this message in error, please contact the sender immediately and be aware that the use, copying or dissemination of this information is prohibited. ################################################################################ From accessd at shaw.ca Sun Oct 5 22:50:01 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Sun, 5 Oct 2008 20:50:01 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: <018601c91cf0$34907160$0201a8c0@HAL9005> <01a401c91cfc$d913f570$0201a8c0@HAL9005> Message-ID: Thanks a lot Bill, I will do some research on this one. It is definitely nicer to have a real mail page on a web site than going just using the surfer current email pop-up... no features and so clunky. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Sunday, October 05, 2008 1:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Hi Jim, I have been using a modified version of vbSendMail.dll http://www.freevbcode.com/ShowCode.Asp?ID=109 It allows you to change ports, set authentication true and add Username and Password. It works fine on Embarqmail.com sample part of code .UseAuthentication = True 'bAuthLogin ' Optional, default = FALSE .UsePopAuthentication = bPopLogin ' Optional, default = FALSE .Username = "Username at embarqmail.com" ' Optional, default = Null String .Password = "SomePassword" etc. Apparently it does not support SSL if you need that. Doing a Google search on vbSendMail.dll for dot net produced several samples of how to wrap the dll in dot net if that would help you. Price is right, and enough documentation so that even I could make it work. By the way since I just use it to send an email to me once a day from my server, I have hard coded most of it. HTH Bill ----- Original Message ----- From: "Jim Lawrence" To: "'Access Developers discussion and problem solving'" Sent: Sunday, October 05, 2008 11:48 AM Subject: Re: [AccessD] Email Problem Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Oct 6 09:16:32 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Mon, 06 Oct 2008 07:16:32 -0700 Subject: [AccessD] Email Problem In-Reply-To: <001b01c9273d$8c01b420$0200a8c0@murphy3234aaf1> References: <018601c91cf0$34907160$0201a8c0@HAL9005> <01a401c91cfc$d913f570$0201a8c0@HAL9005> <001b01c9273d$8c01b420$0200a8c0@murphy3234aaf1> Message-ID: Hi Doug: Isn't GMAIL just as likely to eventually shut down port 25 as not? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Murphy Sent: Sunday, October 05, 2008 3:56 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Jim, I have not had that problem when using asp generated mail from the host server but have when I tried to use my isp smtp server for automated email from my computer. I ended up using my gmail account smtp server. The messages show as originating from your account. Hope that helps. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Lawrence Sent: Sunday, October 05, 2008 11:49 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Oct 6 09:23:52 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Mon, 6 Oct 2008 07:23:52 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: Message-ID: <3F39D29B15914945A351074893F4342C@creativesystemdesigns.com> Yes Gustav, you are right on all points. My ISP will definitely will give access if I manage to talk all clients into upgrading to a Business account. Fortunately there are only 8, along with my self, in this set of circumstances. It was just that I did not want to drop another cost on them... my support is already included in a flat monthly fee so no issues with my extra charges. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Sunday, October 05, 2008 2:18 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Email Problem Hi Jim The simple method is to ask the ISP to open that port. Some do it for the asking (and telling why), some require a "pro" or "business" account. Another method is to use port 587. Quite a few ISPs support that, some only for secure mail, first of all Gmail. However, if you can handle that, Gmail is free but their mail servers are slower than most and an account has some unofficial limit of about 500 to 750 outgoing mails per day - probably not an issue for you. Also, you could have your app hosted. Every hosting provider offers an in-house SMTP server available for the clients' sites and applications. This doesn't need to be very expensive. Here's an European provider we use a lot: http://www.unoeuro.com/products.php?setvat=false /gustav >>> accessd at shaw.ca 05-10-2008 20:48 >>> Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Oct 6 09:36:41 2008 From: accessd at shaw.ca (Jim Lawrence) Date: Mon, 06 Oct 2008 07:36:41 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: Message-ID: Hi All: A solution... It seems a friend has an 'Extreme' business account and for just a few dollars donation we will run all the out going mail through a Hamachi VPN on to his mail server and then out the door. We will spend an evening working out the logistics, as soon as I get back to town. If anyone is interested in the method I can post it here. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Sunday, October 05, 2008 2:18 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Email Problem Hi Jim The simple method is to ask the ISP to open that port. Some do it for the asking (and telling why), some require a "pro" or "business" account. Another method is to use port 587. Quite a few ISPs support that, some only for secure mail, first of all Gmail. However, if you can handle that, Gmail is free but their mail servers are slower than most and an account has some unofficial limit of about 500 to 750 outgoing mails per day - probably not an issue for you. Also, you could have your app hosted. Every hosting provider offers an in-house SMTP server available for the clients' sites and applications. This doesn't need to be very expensive. Here's an European provider we use a lot: http://www.unoeuro.com/products.php?setvat=false /gustav >>> accessd at shaw.ca 05-10-2008 20:48 >>> Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Gustav at cactus.dk Mon Oct 6 09:56:26 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Mon, 06 Oct 2008 16:56:26 +0200 Subject: [AccessD] Email Problem Message-ID: Hi Rocky It has never been available: http://mail.google.com/support/bin/answer.py?answer=13287 They do have an arrangement for bulk e-mail: https://mail.google.com/support/bin/answer.py?answer=81126#thirdparty /gustav >>> accessd at shaw.ca 06-10-2008 16:16 >>> Hi Doug: Isn't GMAIL just as likely to eventually shut down port 25 as not? Jim From dw-murphy at cox.net Mon Oct 6 11:36:17 2008 From: dw-murphy at cox.net (Doug Murphy) Date: Mon, 6 Oct 2008 09:36:17 -0700 Subject: [AccessD] Email Problem In-Reply-To: References: <018601c91cf0$34907160$0201a8c0@HAL9005><01a401c91cfc$d913f570$0201a8c0@HAL9005><001b01c9273d$8c01b420$0200a8c0@murphy3234aaf1> Message-ID: <004001c927d1$a821df10$0200a8c0@murphy3234aaf1> Hi Jim, I don't think port 25 is open on the Google server either. You have to log in with your account info to use their smtp server. I use port 587 for Gmail. Google shutting down the service is always a chance. If I needed 100% assurance I had an smtp server I guess I'd set my own up. Of all the big companies Google seems to be the most open to supporting developers with all their services and api's for the things they do. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Lawrence Sent: Monday, October 06, 2008 7:17 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Hi Doug: Isn't GMAIL just as likely to eventually shut down port 25 as not? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Murphy Sent: Sunday, October 05, 2008 3:56 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Jim, I have not had that problem when using asp generated mail from the host server but have when I tried to use my isp smtp server for automated email from my computer. I ended up using my gmail account smtp server. The messages show as originating from your account. Hope that helps. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Lawrence Sent: Sunday, October 05, 2008 11:49 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Hi All: While we are on the subject... I have a number of clients who have been set up with email from their servers through ASP/ASP.Net SMTP, through their own web sites, using IIS. Their systems do not have a real mail server on the system but transfer the email request to their ISP provider which basically re-forwards the mail. This method has been working fine for years. Now many if not all ISP are blocking port 25 (the mail out port), which supposedly stops spammers The issues is that if the mail going out, from the client servers is not being sent through one of client's email accounts (username and password need to be provided), it is blocked. I do not know if many have that problem but it will basically shut down any client, mailing from their internal web sites that do not have their own mail servers installed. Has anyone dealt with this issue and has found a simple solution? TIA Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, September 22, 2008 4:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Email Problem Redemption is a dll/code library you purchase and then program against to handle emails, including CDO-based, SMTP, etc. It handles the ugly details. As I recall it allows you to use .verify, but that may not be useful to you. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, September 22, 2008 2:48 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Email Problem Correct. What's Redemption? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Tue Oct 7 00:45:11 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Tue, 7 Oct 2008 16:45:11 +1100 Subject: [AccessD] Form as datasheet? In-Reply-To: <004001c927d1$a821df10$0200a8c0@murphy3234aaf1> Message-ID: <57E6E6CA42105A48B977303A2CDC2720076DA27047@WPEXCH22.retail.ad.cmltd.net.au> Hi all, I have a form where the default view is a datasheet. When I open the form directly, I get a datasheet as expected. If I used code (DoCmd.OpenForm "ITFCT_frmSAPClean") to open the form I get a form view (which is not what I want). How can i force the form to open only as a datasheet view? cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From kp at sdsonline.net Tue Oct 7 01:51:51 2008 From: kp at sdsonline.net (Kath Pelletti) Date: Tue, 7 Oct 2008 16:51:51 +1000 Subject: [AccessD] Form as datasheet? References: <57E6E6CA42105A48B977303A2CDC2720076DA27047@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <000701c92849$2eabbb60$6501a8c0@DELLAPTOP> I think it's: DoCmd.OpenForm "ITFCT_frmSAPClean", acFormDS kath ----- Original Message ----- From: "Darryl Collins" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, October 07, 2008 3:45 PM Subject: [AccessD] Form as datasheet? > Hi all, > > I have a form where the default view is a datasheet. When I open the form > directly, I get a datasheet as expected. If I used code (DoCmd.OpenForm > "ITFCT_frmSAPClean") to open the form I get a form view (which is not what > I want). > > How can i force the form to open only as a datasheet view? > > cheers > Darryl. > > This email and any attachments may contain privileged and confidential > information > and are intended for the named addressee only. If you have received this > e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this > e-mail > has been sent to you in error. It is your responsibility to check this > e-mail and > any attachments for viruses. No warranty is made that this material is > free from > computer virus or any other defect or error. Any loss/damage incurred by > using this > material is not the sender's responsibility. The sender's entire > liability will be > limited to resupplying the material. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Darryl.Collins at coles.com.au Tue Oct 7 06:07:24 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Tue, 7 Oct 2008 22:07:24 +1100 Subject: [AccessD] Form as datasheet? In-Reply-To: <000701c92849$2eabbb60$6501a8c0@DELLAPTOP> Message-ID: <57E6E6CA42105A48B977303A2CDC2720076DA27048@WPEXCH22.retail.ad.cmltd.net.au> Perfect! :) thanks Kath. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Kath Pelletti Sent: Tuesday, 7 October 2008 5:52 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Form as datasheet? I think it's: DoCmd.OpenForm "ITFCT_frmSAPClean", acFormDS kath ----- Original Message ----- From: "Darryl Collins" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, October 07, 2008 3:45 PM Subject: [AccessD] Form as datasheet? > Hi all, > > I have a form where the default view is a datasheet. When I open the form > directly, I get a datasheet as expected. If I used code (DoCmd.OpenForm > "ITFCT_frmSAPClean") to open the form I get a form view (which is not what > I want). > > How can i force the form to open only as a datasheet view? > > cheers > Darryl. > > This email and any attachments may contain privileged and confidential > information > and are intended for the named addressee only. If you have received this > e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this > e-mail > has been sent to you in error. It is your responsibility to check this > e-mail and > any attachments for viruses. No warranty is made that this material is > free from > computer virus or any other defect or error. Any loss/damage incurred by > using this > material is not the sender's responsibility. The sender's entire > liability will be > limited to resupplying the material. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From dbdoug at gmail.com Tue Oct 7 10:50:25 2008 From: dbdoug at gmail.com (Doug Steele) Date: Tue, 7 Oct 2008 08:50:25 -0700 Subject: [AccessD] crosstab query columns Message-ID: <4dd71a0c0810070850v4094bc5cq6ad7e7f37eaf15a3@mail.gmail.com> Hello All: I want to make a crosstab query where the first few columns are specified but the last column contains all the data which doesn't match the specified columns. For example, if I have data for items "A","B","C","D","E", I want the columns to be "A","B" and ("C","D", or "E"). I know there is a way but I just can't remember. I had a feeling that you put a not equals (<>) in the last column but I'm getting an error when I do that. Thanks, Doug Steele From fahooper at trapo.com Tue Oct 7 15:50:53 2008 From: fahooper at trapo.com (Fred Hooper) Date: Tue, 7 Oct 2008 16:50:53 -0400 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <48e948fc.0b9e100a.54c9.1043@mx.google.com> Message-ID: <01157503A6EA46F4A05863ACBBD76F65@FRED6998B25045> Particularly in case he's listening, me too. Fred Hooper -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Sunday, October 05, 2008 7:09 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET Nice one Shamil. > where the sides do not come to a common point of view still they learn and use a lot from each other Wish that all took the same point of view. We might not have lost the great John (think what you like, but I loved his posting. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil Salakhetdinov Sent: 05 October 2008 19:47 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET <<< ...love the StackOverflow site ... went right into my favorites ...thanks :) >>> My pleasure! :) That's what is good in discussions where the sides do not come to a common point of view still they learn and use a lot from each other - duality, a hidden(?) driving force, seems to be everywhere in this world... (Sorry for my getting a bit philosophical this Sunday's evening here...) Thank you, -- Shamil P.S. Listening to "Cabaret" by Liza Minnelli right now :)... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Sunday, October 05, 2008 12:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET ...we'll agree to disagree :) ...in the time it takes for me to find the author's solution in a book, assuming its even there, I can find dozens of valid approaches on the web along with comments from people who have used them for better or worse ...I've not opened any tech book in ages with the single exception of Susan/Martin's Access to SQL Server which I have tagged with dozens of yellow stickies ...other wise, its the web for me. ...I think the real downturn for me was when the book stores stopped carrying a wide variety of them ...I used to go to Books-a-Million while the family went store hopping ...I could actually open the book and read it to see if it was at my level, presented like I like, and actually had useful examples ...I'd buy any book that passed that test ...now its Amazon or e-bay and I just don't even bother any more. ...love the StackOverflow site ...went right into my favorites ...thanks :) William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 12:28 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I do not see this book available for free, code only, do you? > > I'm gladly paying for the books like Marco's one as they pay themselves > manifold and very quickly... > > These books have well systemized and "condensed" stuff, supplied with > working real life apps unlike Internet where it's often not easy (very > time > consuming) to find needed information, and it's almost not possible at all > to get so well systemized and ready to use for real life software > development stuff as Marco's book: for big advanced projects I mean, > conceptual yet very useful and applicable and proven in real life software > development business solutions I mean... > > Of course Internet is full of cookbook-style solutions/advises but one > still > have to have good experience and intuition to apply them in this or that > case, and often a lot of time to filter-out "garbage" stuff... > > BTW, have you heard about this project/initiative? > > "Stack Overflow Launches" > http://www.joelonsoftware.com/items/2008/09/15.html and > http://blog.stackoverflow.com/ > > from Joel Spolsky? > > It looks promising but I'd think it would never be a substitute for good > books as Marco Bellinaso's one ... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Saturday, October 04, 2008 2:54 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...you make my point for me Shamil ...the book is 3 years old now and > everything is available on-line for free ...plus lots of updates, > improvements, errors, and user comments > > http://www.codeplex.com/TheBeerHouse > > ...why pay Amazon? ...why a book? ...although I'll allow that having a > 12gig > > internet link probably makes it easier for me than you :) > > ...ps ...I visit his blog sometimes ...the source code is there as well > but > not as well maintained as the codeplex source. > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 7 16:29:18 2008 From: djkr at msn.com (DJK(John) Robinson) Date: Tue, 7 Oct 2008 22:29:18 +0100 Subject: [AccessD] crosstab query columns In-Reply-To: <4dd71a0c0810070850v4094bc5cq6ad7e7f37eaf15a3@mail.gmail.com> Message-ID: Doug Not actually an answer to your question, but maybe you're thinking of the situation where you include Null in the list, which gives you a column heading of "<>". John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Steele Sent: 07 October 2008 16:50 To: accessd at databaseadvisors.com Subject: [AccessD] crosstab query columns Hello All: I want to make a crosstab query where the first few columns are specified but the last column contains all the data which doesn't match the specified columns. For example, if I have data for items "A","B","C","D","E", I want the columns to be "A","B" and ("C","D", or "E"). I know there is a way but I just can't remember. I had a feeling that you put a not equals (<>) in the last column but I'm getting an error when I do that. Thanks, Doug Steele -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From nd500_lo at charter.net Tue Oct 7 18:29:29 2008 From: nd500_lo at charter.net (Dian) Date: Tue, 7 Oct 2008 16:29:29 -0700 Subject: [AccessD] Visual Basic 2008 Express & VB.NET In-Reply-To: <01157503A6EA46F4A05863ACBBD76F65@FRED6998B25045> References: <48e948fc.0b9e100a.54c9.1043@mx.google.com> <01157503A6EA46F4A05863ACBBD76F65@FRED6998B25045> Message-ID: <000601c928d4$8c298980$6500a8c0@dsunit1> Me three...in case he's listening... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Fred Hooper Sent: Tuesday, October 07, 2008 1:51 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET Particularly in case he's listening, me too. Fred Hooper -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Sunday, October 05, 2008 7:09 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET Nice one Shamil. > where the sides do not come to a common point of view still they learn > and use a lot from each other Wish that all took the same point of view. We might not have lost the great John (think what you like, but I loved his posting. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil Salakhetdinov Sent: 05 October 2008 19:47 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET <<< ...love the StackOverflow site ... went right into my favorites ...thanks :) >>> My pleasure! :) That's what is good in discussions where the sides do not come to a common point of view still they learn and use a lot from each other - duality, a hidden(?) driving force, seems to be everywhere in this world... (Sorry for my getting a bit philosophical this Sunday's evening here...) Thank you, -- Shamil P.S. Listening to "Cabaret" by Liza Minnelli right now :)... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Sunday, October 05, 2008 12:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET ...we'll agree to disagree :) ...in the time it takes for me to find the author's solution in a book, assuming its even there, I can find dozens of valid approaches on the web along with comments from people who have used them for better or worse ...I've not opened any tech book in ages with the single exception of Susan/Martin's Access to SQL Server which I have tagged with dozens of yellow stickies ...other wise, its the web for me. ...I think the real downturn for me was when the book stores stopped carrying a wide variety of them ...I used to go to Books-a-Million while the family went store hopping ...I could actually open the book and read it to see if it was at my level, presented like I like, and actually had useful examples ...I'd buy any book that passed that test ...now its Amazon or e-bay and I just don't even bother any more. ...love the StackOverflow site ...went right into my favorites ...thanks :) William "In politics, there are some candidates who use change to promote their careers, and then there are those, like John McCain, who use their careers to promote change." Gov. Palin -------------------------------------------------- From: "Shamil Salakhetdinov" Sent: Saturday, October 04, 2008 12:28 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > William, > > I do not see this book available for free, code only, do you? > > I'm gladly paying for the books like Marco's one as they pay > themselves manifold and very quickly... > > These books have well systemized and "condensed" stuff, supplied with > working real life apps unlike Internet where it's often not easy (very > time > consuming) to find needed information, and it's almost not possible at > all to get so well systemized and ready to use for real life software > development stuff as Marco's book: for big advanced projects I mean, > conceptual yet very useful and applicable and proven in real life > software development business solutions I mean... > > Of course Internet is full of cookbook-style solutions/advises but one > still have to have good experience and intuition to apply them in this > or that case, and often a lot of time to filter-out "garbage" stuff... > > BTW, have you heard about this project/initiative? > > "Stack Overflow Launches" > http://www.joelonsoftware.com/items/2008/09/15.html and > http://blog.stackoverflow.com/ > > from Joel Spolsky? > > It looks promising but I'd think it would never be a substitute for > good books as Marco Bellinaso's one ... > > Thank you. > > -- > Shamil > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William > Hindman > Sent: Saturday, October 04, 2008 2:54 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...you make my point for me Shamil ...the book is 3 years old now and > everything is available on-line for free ...plus lots of updates, > improvements, errors, and user comments > > http://www.codeplex.com/TheBeerHouse > > ...why pay Amazon? ...why a book? ...although I'll allow that having a > 12gig > > internet link probably makes it easier for me than you :) > > ...ps ...I visit his blog sometimes ...the source code is there as > well but not as well maintained as the codeplex source. > > William > "In politics, there are some candidates who use change to promote > their careers, and then there are those, like John McCain, who use > their careers to promote change." Gov. Palin > > -------------------------------------------------- > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dbdoug at gmail.com Tue Oct 7 18:53:40 2008 From: dbdoug at gmail.com (Doug Steele) Date: Tue, 7 Oct 2008 16:53:40 -0700 Subject: [AccessD] crosstab query columns In-Reply-To: References: <4dd71a0c0810070850v4094bc5cq6ad7e7f37eaf15a3@mail.gmail.com> Message-ID: <4dd71a0c0810071653g18fddb57k52c2a48efdc6754b@mail.gmail.com> That was it! No wonder I couldn't find it in the help files. Thanks, Doug On Tue, Oct 7, 2008 at 2:29 PM, DJK(John) Robinson wrote: > Doug > > Not actually an answer to your question, but maybe you're thinking of the > situation where you include Null in the list, which gives you a column > heading of "<>". > > John > > From darren at activebilling.com.au Tue Oct 7 19:13:55 2008 From: darren at activebilling.com.au (Darren D) Date: Wed, 8 Oct 2008 11:13:55 +1100 Subject: [AccessD] A2003: Disk or Network Error In-Reply-To: <44F1DA51854045938E99A26CD24A63B3@XPS> References: <00c301c92357$2d6e9ac0$0d1b910a@denzilnote> <44F1DA51854045938E99A26CD24A63B3@XPS> Message-ID: <00b701c928da$c2d39ec0$0d1b910a@denzilnote> Hi Team Thanks to all who responded. Many thanks Accessing and or changing the hardware is not an option. I access a small share on the Server (It is an XP box running as a file share among other things) As I have no access to the hardware or settings I think my best options is to just see if the connection to the BE is lost (or not) and act on that before MsgBox hell comes up Many thanks Darren -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Thursday, 2 October 2008 12:41 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] A2003: Disk or Network Error Darren, One of the things I've found in the past that has caused problems are machines loaded with a NIC dialog protocol. 3COM was one of the first to use this. What happens when this type of protocol is loaded is that the NIC is disconnected from the network for a short time, diags are run, and then it's reconnected. The time is so short most apps don't notice, but JET does. I've also seen in the past where when more then one protocol is loaded, timeouts can occur if the client and server are not using the same default protocol. This hasn't been a problem in recent years as almost everything is standardized on TCP/IP, but it's worth mentioning. Check the network properties and see if anything other then the TCP/IP Protocol is loaded. If a diag protocol is in there, get rid of it. Beyond that, any type of network error can cause those issues (bad cable, router, NIC, etc). Also, one other thing I've seen that can cause these; a TMP and/or TEMP environment variable that exists, but does not point to a valid path or one that is not available. Pretty rare now a days but again, something worth mentioning. HTH, Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren D Sent: Tuesday, September 30, 2008 7:49 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] A2003: Disk or Network Error Hi Team Apologies if I have asked this before I have a dB that speaks with the BE. That BE that sits on a machine here used as a file share/server (It's not running Server software - just XP) Quite often I'll leave for the night with my Access app happily displaying its main page only to return to a zillion "Disk or Network Error" message boxes in the morning Obviously some time during the night the FE and BE have lost contact with each other - not too big a deal but I have to click through all the error messages - there can be up to 50 of them Then I have to re-boot the app - this is sometimes done un-gracefully from the task manager Is there a way I can trap this error at a dB kind of level - not a form level - then I can gracefully shut the app or alert the user to graceful shut the app? I think I know the error message number - just not sure where to trap for it 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 GordonS2 at pacbell.net Tue Oct 7 22:17:00 2008 From: GordonS2 at pacbell.net (Gordon Stubbs) Date: Tue, 7 Oct 2008 20:17:00 -0700 Subject: [AccessD] Internet query Message-ID: <007901c928f4$54f23320$6501a8c0@GssHome01> Hello all, I looking for some access 2003 code that will query the national library, DVD sources, and CD sources. I want to add them to my database I'm getting tired of entering all the data myself. If anyone has code that will do this I would be willing to pay for the code. Thank you. Gordon From wdhindman at dejpolsystems.com Tue Oct 7 23:00:34 2008 From: wdhindman at dejpolsystems.com (William Hindman) Date: Wed, 8 Oct 2008 00:00:34 -0400 Subject: [AccessD] JC/was Visual Basic 2008 Express & VB.NET References: <48e948fc.0b9e100a.54c9.1043@mx.google.com><01157503A6EA46F4A05863ACBBD76F65@FRED6998B25045> <000601c928d4$8c298980$6500a8c0@dsunit1> Message-ID: <573216027F9D49DBA544219A3BC9893E@jislaptopdev> I miss JC posting here as much as anyone ...but lets not put that loss on anyone but JC ...in case you've forgotten just what happened, I've inserted the relevant post below ...no one, not even JC, can do that here ...we have OT specifically for such and he was asked very, very politely to take it there ...it was his choice to leave and imnsho, no one else is responsible in any way for his absence. William ...note that we still correspond off list ...its his express choice not to return, at least for now. _______________________________________________________________ > #1. You should NEVER have two users trying to edit the same field in the same record at the same time, where BOTH values being entered are correct. (ie, there should only be one right 'Last Name' for a person, yes, it may change, but there is only one correct value for it) HORSHESHIT! Hmmm... not enough emphasis there. !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! I have NO IDEA what world YOU live in but in my world people can change whatever they want whenever they want. Person A writes the name in the last name field from a hastily scribbled form filled out by hand by a person who has a sixth grade education. Person B is reading a form with the information for that SAME person typed in by a doctor office, the last name is different. They can change it if they wish. Person C is on the phone with the mother of that person. They are verifying the information and mom says "no the name is spelled XXXXX. That person can change it. It is NOT MY JOB to tell any of these people that they cannot change the information in the database. !!!!THEY MIGHT BE DOING THESE THINGS AT THE SAME INSTANT!!!!! !!!!I MAY NEED TO DO THAT IN AN UNBOUND FORM!!!! NOW, DREW, THAT IS LEGAL. I AM !!!NOT!!! GOING TO DESIGNING A TRANSACTION SYSTEM TO SAVE EVERY CHANGE EVER ENTERED BY ANYONE IN A BRAND NEW RECORD AS A CONTINUOUS HISTORY. MY CLIENT DID NOT ASK FOR THAT, WILL NOT PAY ME FOR THAT AND IT AIN'T GONNA HAPPEN. !!!!I HAVE TO DEAL WITH THAT!!!! !!!YOU!!! ARE AN ARROGANT ASS IF YOU THINK ONLY YOU KNOWS WHAT IS LEGAL OR POSSIBLE IN THIS WORLD. Go away. FAR FAR AWAY. JOIN THE FOREIGN LEGIONS AND TRY TO CONVERT SOMEONE ELSE TO YOUR INSOLENT IDEAS. Quite obviously I do not need, nor WANT your responses. Please do NOT respond to this thread EVER AGAIN. In case you do not YET understand..... !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! ......to your silly ideas. Hmmmm.... I fear that I STILL was not speaking plainly enough... !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! ......to your silly ideas. Hmmmm.... I fear that I STILL was not speaking plainly enough... If you want to post solutions for questions I did not ask, please feel free to do so, in some other thread. Hmmm... I COULD SWEAR THAT I MADE THAT REQUEST BEFORE... John W. Colby www.ColbyConsulting.com William -------------------------------------------------- From: "Dian" Sent: Tuesday, October 07, 2008 7:29 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > Me three...in case he's listening... > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Fred Hooper > Sent: Tuesday, October 07, 2008 1:51 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > Particularly in case he's listening, me too. > > Fred Hooper > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > Sent: Sunday, October 05, 2008 7:09 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > Nice one Shamil. > >> where the sides do not come to a common point of view still they learn >> and > use a lot from each other > > > Wish that all took the same point of view. We might not have lost the > great John (think what you like, but I loved his posting. > > > Max > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil > Salakhetdinov > Sent: 05 October 2008 19:47 > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > <<< > ...love the StackOverflow site ... > went right into my favorites ...thanks :) >>>> > My pleasure! :) > > That's what is good in discussions where the sides do not come to a common > point of view still they learn and use a lot from each other - duality, a > hidden(?) driving force, seems to be everywhere in this world... (Sorry > for > my getting a bit philosophical this Sunday's evening here...) > > Thank you, > > -- > Shamil > > P.S. Listening to "Cabaret" by Liza Minnelli right now :)... > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Sunday, October 05, 2008 12:45 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...we'll agree to disagree :) > > ...in the time it takes for me to find the author's solution in a book, > assuming its even there, I can find dozens of valid approaches on the web > along with comments from people who have used them for better or worse > ...I've not opened any tech book in ages with the single exception of > Susan/Martin's Access to SQL Server which I have tagged with dozens of > yellow stickies ...other wise, its the web for me. > > ...I think the real downturn for me was when the book stores stopped > carrying a wide variety of them ...I used to go to Books-a-Million while > the > > family went store hopping ...I could actually open the book and read it to > see if it was at my level, presented like I like, and actually had useful > examples ...I'd buy any book that passed that test ...now its Amazon or > e-bay and I just don't even bother any more. > > ...love the StackOverflow site ...went right into my favorites ...thanks > :) > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > From: "Shamil Salakhetdinov" > Sent: Saturday, October 04, 2008 12:28 PM > To: "'Access Developers discussion and problem solving'" > > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > >> William, >> >> I do not see this book available for free, code only, do you? >> >> I'm gladly paying for the books like Marco's one as they pay >> themselves manifold and very quickly... >> >> These books have well systemized and "condensed" stuff, supplied with >> working real life apps unlike Internet where it's often not easy (very >> time >> consuming) to find needed information, and it's almost not possible at >> all to get so well systemized and ready to use for real life software >> development stuff as Marco's book: for big advanced projects I mean, >> conceptual yet very useful and applicable and proven in real life >> software development business solutions I mean... >> >> Of course Internet is full of cookbook-style solutions/advises but one >> still have to have good experience and intuition to apply them in this >> or that case, and often a lot of time to filter-out "garbage" stuff... >> >> BTW, have you heard about this project/initiative? >> >> "Stack Overflow Launches" >> http://www.joelonsoftware.com/items/2008/09/15.html and >> http://blog.stackoverflow.com/ >> >> from Joel Spolsky? >> >> It looks promising but I'd think it would never be a substitute for >> good books as Marco Bellinaso's one ... >> >> Thank you. >> >> -- >> Shamil >> >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William >> Hindman >> Sent: Saturday, October 04, 2008 2:54 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET >> >> ...you make my point for me Shamil ...the book is 3 years old now and >> everything is available on-line for free ...plus lots of updates, >> improvements, errors, and user comments >> >> http://www.codeplex.com/TheBeerHouse >> >> ...why pay Amazon? ...why a book? ...although I'll allow that having a >> 12gig >> >> internet link probably makes it easier for me than you :) >> >> ...ps ...I visit his blog sometimes ...the source code is there as >> well but not as well maintained as the codeplex source. >> >> William >> "In politics, there are some candidates who use change to promote >> their careers, and then there are those, like John McCain, who use >> their careers to promote change." Gov. Palin >> >> -------------------------------------------------- >> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From fuller.artful at gmail.com Wed Oct 8 08:37:43 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Wed, 8 Oct 2008 10:37:43 -0300 Subject: [AccessD] Internet query In-Reply-To: <007901c928f4$54f23320$6501a8c0@GssHome01> References: <007901c928f4$54f23320$6501a8c0@GssHome01> Message-ID: <29f585dd0810080637i4b353600o35a49ff12361519f@mail.gmail.com> We all want this! It's such a sure-fire product that I'm shocked that no one has written it. A. On Wed, Oct 8, 2008 at 12:17 AM, Gordon Stubbs wrote: > Hello all, > > I looking for some access 2003 code that will query the national library, > DVD sources, and CD sources. > > I want to add them to my database I'm getting tired of entering all the > data > myself. > > If anyone has code that will do this I would be willing to pay for the > code. > > From sturner at mseco.com Wed Oct 8 09:29:23 2008 From: sturner at mseco.com (Steve Turner) Date: Wed, 8 Oct 2008 09:29:23 -0500 Subject: [AccessD] weird action in access query's Message-ID: <31B7F3CC8CC4454F87FCBEFF82B6189202316335@PE2850-03.mseco.com> Helo list, I have a couple of querys that calculate a total by date range. They were pretty complicated but they were working until I went in and changed the date criteria trying to get the date exported to a VBA parameters query. The formula had a Round(formula,2). Worked fine for a while but I changed the date criteria to a GetValue() and when I went back in to change the date criteria again it gave me a compile error and showed the SQL code and I couldn't get to the Datasheet View. Finally found that the round function was the problem. Deleted the round reference and it would let me save it. Tried to go back and add it but It won't let me now. Anyone know of such a problem? Steve A. Turner Controller Mid-South Engineering Co. Inc P.O. Box 1399 Hot Springs, AR 71902 E-Mail: sturner at mseco.com and saturner at mseco.com Phone:(501)321-2276 Fax: (501)321-4750 From fuller.artful at gmail.com Wed Oct 8 09:31:13 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Wed, 8 Oct 2008 11:31:13 -0300 Subject: [AccessD] Remove a custom toolbar Message-ID: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> I added a custom toolbar and now I want to remove it, but cannot figure out how. Simply remove its module? Or is more required? TIA, Arthur From jimdettman at verizon.net Wed Oct 8 10:19:46 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 08 Oct 2008 11:19:46 -0400 Subject: [AccessD] weird action in access query's In-Reply-To: <31B7F3CC8CC4454F87FCBEFF82B6189202316335@PE2850-03.mseco.com> References: <31B7F3CC8CC4454F87FCBEFF82B6189202316335@PE2850-03.mseco.com> Message-ID: <1887AEEFB63A411ABECB70543FB9D682@XPS> Steve, Sounds like a reference is broken. Open the app and then a module. Click tools/references. Look for any that are shown as MISSING or BROKEN. If any are, they'll need to be fixed. If none are, then check any unchecked reference (note which). Close the app and Access, re-open and uncheck the reference just checked. Then do a compile and save. Try the query again. If that doesn't fix it, then we'd need to dig further. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Steve Turner Sent: Wednesday, October 08, 2008 10:29 AM To: Access Developers discussion and problem solving Subject: [AccessD] weird action in access query's Helo list, I have a couple of querys that calculate a total by date range. They were pretty complicated but they were working until I went in and changed the date criteria trying to get the date exported to a VBA parameters query. The formula had a Round(formula,2). Worked fine for a while but I changed the date criteria to a GetValue() and when I went back in to change the date criteria again it gave me a compile error and showed the SQL code and I couldn't get to the Datasheet View. Finally found that the round function was the problem. Deleted the round reference and it would let me save it. Tried to go back and add it but It won't let me now. Anyone know of such a problem? Steve A. Turner Controller Mid-South Engineering Co. Inc P.O. Box 1399 Hot Springs, AR 71902 E-Mail: sturner at mseco.com and saturner at mseco.com Phone:(501)321-2276 Fax: (501)321-4750 From cfoust at infostatsystems.com Wed Oct 8 10:24:12 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 8 Oct 2008 08:24:12 -0700 Subject: [AccessD] Remove a custom toolbar In-Reply-To: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> References: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> Message-ID: What have you tried that didn't work? Just not loading it should remove it from your UI. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, October 08, 2008 7:31 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove a custom toolbar I added a custom toolbar and now I want to remove it, but cannot figure out how. Simply remove its module? Or is more required? TIA, Arthur -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sturner at mseco.com Wed Oct 8 10:36:30 2008 From: sturner at mseco.com (Steve Turner) Date: Wed, 8 Oct 2008 10:36:30 -0500 Subject: [AccessD] weird action in access query's In-Reply-To: <1887AEEFB63A411ABECB70543FB9D682@XPS> References: <31B7F3CC8CC4454F87FCBEFF82B6189202316335@PE2850-03.mseco.com> <1887AEEFB63A411ABECB70543FB9D682@XPS> Message-ID: <31B7F3CC8CC4454F87FCBEFF82B6189202316367@PE2850-03.mseco.com> Amazing. It worked. After a coupe hours working on trying to pass some parameters in VBA code that won't work as examples say it should it broke those rounding formula's. Thought it had really messed up the formula's. Thanks Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Wednesday, October 08, 2008 10:20 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] weird action in access query's Steve, Sounds like a reference is broken. Open the app and then a module. Click tools/references. Look for any that are shown as MISSING or BROKEN. If any are, they'll need to be fixed. If none are, then check any unchecked reference (note which). Close the app and Access, re-open and uncheck the reference just checked. Then do a compile and save. Try the query again. If that doesn't fix it, then we'd need to dig further. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Steve Turner Sent: Wednesday, October 08, 2008 10:29 AM To: Access Developers discussion and problem solving Subject: [AccessD] weird action in access query's Helo list, I have a couple of querys that calculate a total by date range. They were pretty complicated but they were working until I went in and changed the date criteria trying to get the date exported to a VBA parameters query. The formula had a Round(formula,2). Worked fine for a while but I changed the date criteria to a GetValue() and when I went back in to change the date criteria again it gave me a compile error and showed the SQL code and I couldn't get to the Datasheet View. Finally found that the round function was the problem. Deleted the round reference and it would let me save it. Tried to go back and add it but It won't let me now. Anyone know of such a problem? Steve A. Turner Controller Mid-South Engineering Co. Inc P.O. Box 1399 Hot Springs, AR 71902 E-Mail: sturner at mseco.com and saturner at mseco.com Phone:(501)321-2276 Fax: (501)321-4750 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From fuller.artful at gmail.com Wed Oct 8 11:18:34 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Wed, 8 Oct 2008 13:18:34 -0300 Subject: [AccessD] Remove a custom toolbar In-Reply-To: References: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> Message-ID: <29f585dd0810080918h20785bdcma961c862e5168ded@mail.gmail.com> I haven't tried anything yet. It was inherited code and the first time I have ever worked with custom toolbars. I'm not even sure where and when it is invoked. I opened the relevant form in design mode and attempted to delete the reference to the toolbar from the "Other" tab and when I tried to save, Access crashed. So at the moment I'm building a fresh mdb and importing everything and hoping. A. On Wed, Oct 8, 2008 at 12:24 PM, Charlotte Foust wrote: > What have you tried that didn't work? Just not loading it should remove > it from your UI. > > Charlotte Foust > > > From cfoust at infostatsystems.com Wed Oct 8 14:58:30 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 8 Oct 2008 12:58:30 -0700 Subject: [AccessD] Remove a custom toolbar In-Reply-To: <29f585dd0810080918h20785bdcma961c862e5168ded@mail.gmail.com> References: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> <29f585dd0810080918h20785bdcma961c862e5168ded@mail.gmail.com> Message-ID: The Customize dialog of the built in toolbar will allow you to create a new toolbar or delete an existing one. However, if you're loading a custom toolbar with a form, you're going to have to track down all those locations and fix them. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, October 08, 2008 9:19 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Remove a custom toolbar I haven't tried anything yet. It was inherited code and the first time I have ever worked with custom toolbars. I'm not even sure where and when it is invoked. I opened the relevant form in design mode and attempted to delete the reference to the toolbar from the "Other" tab and when I tried to save, Access crashed. So at the moment I'm building a fresh mdb and importing everything and hoping. A. On Wed, Oct 8, 2008 at 12:24 PM, Charlotte Foust wrote: > What have you tried that didn't work? Just not loading it should > remove it from your UI. > > Charlotte Foust > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Wed Oct 8 17:42:24 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Thu, 9 Oct 2008 09:42:24 +1100 Subject: [AccessD] Remove a custom toolbar In-Reply-To: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> Message-ID: <57E6E6CA42105A48B977303A2CDC2720076DA27059@WPEXCH22.retail.ad.cmltd.net.au> Arthur, If it is a commadbar style toolbar created in code you can use this to remove it On Error Resume Next CommandBars("My Toolbar Name").Delete On Error GoTo 0 Otherwise you can try Right Mouse Click in Access on the gray toolbar line When the customise button opens up select the toolbar in question and press delete. If the code is rebuilding it though, it will just reappear. Here is the code i use to make a custom toolbar in Access. Look for similar. '========================================================== Sub CreateNavigationToolbar() Dim cmdbarNavigation As CommandBar ' Destroy the existing toolbar if exists On Error Resume Next CommandBars("Navigation Toolbar").Delete On Error GoTo 0 ' Create the toolbar Set cmdbarNavigation = CommandBars.Add(Name:="Navigation Toolbar", _ Position:=msoBarBottom, _ Temporary:=True) With cmdbarNavigation .Controls.Add Type:=msoControlButton, id:=1786 '1 Close .Controls.Add Type:=msoControlButton, id:=154 '2 GotoFirst .Controls.Add Type:=msoControlButton, id:=155 '3 GotoPrev .Controls.Add Type:=msoControlButton, id:=156 '4 GotoNext .Controls.Add Type:=msoControlButton, id:=157 '5 GotoLast .Controls.Add Type:=msoControlButton, id:=539 '6 New .Controls.Add Type:=msoControlButton, id:=530 '7 Duplicate .Controls.Add Type:=msoControlButton, id:=644 '8 Delete .Visible = True End With '-- Define the Close button With cmdbarNavigation.Controls(1) .Style = msoButtonIconAndCaption .Caption = "Close Form" .OnAction = "CloseActiveForm" .TooltipText = "Close Form" End With '-- Define the Duplicate button With cmdbarNavigation.Controls(7) .Style = msoButtonIcon 'AndCaption '.Caption = "Duplicate" .OnAction = "DuplicateRecord" .TooltipText = "Duplicate Active Record" End With Set cmdbarNavigation = Nothing End Sub '====================================================================== -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Thursday, 9 October 2008 1:31 AM To: Access Developers discussion and problem solving Subject: [AccessD] Remove a custom toolbar I added a custom toolbar and now I want to remove it, but cannot figure out how. Simply remove its module? Or is more required? TIA, Arthur -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From DWUTKA at Marlow.com Wed Oct 8 19:51:11 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 8 Oct 2008 19:51:11 -0500 Subject: [AccessD] JC/was Visual Basic 2008 Express & VB.NET In-Reply-To: <573216027F9D49DBA544219A3BC9893E@jislaptopdev> Message-ID: I miss him too. But you are right, it's his choice. Personally, I've been swamped, doing my new job and still catching up on my old one. I've only been able to peruse this list and OT. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman Sent: Tuesday, October 07, 2008 11:01 PM To: Access Developers discussion and problem solving Subject: [AccessD] JC/was Visual Basic 2008 Express & VB.NET I miss JC posting here as much as anyone ...but lets not put that loss on anyone but JC ...in case you've forgotten just what happened, I've inserted the relevant post below ...no one, not even JC, can do that here ...we have OT specifically for such and he was asked very, very politely to take it there ...it was his choice to leave and imnsho, no one else is responsible in any way for his absence. William ...note that we still correspond off list ...its his express choice not to return, at least for now. _______________________________________________________________ > #1. You should NEVER have two users trying to edit the same field in the same record at the same time, where BOTH values being entered are correct. (ie, there should only be one right 'Last Name' for a person, yes, it may change, but there is only one correct value for it) HORSHESHIT! Hmmm... not enough emphasis there. !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! I have NO IDEA what world YOU live in but in my world people can change whatever they want whenever they want. Person A writes the name in the last name field from a hastily scribbled form filled out by hand by a person who has a sixth grade education. Person B is reading a form with the information for that SAME person typed in by a doctor office, the last name is different. They can change it if they wish. Person C is on the phone with the mother of that person. They are verifying the information and mom says "no the name is spelled XXXXX. That person can change it. It is NOT MY JOB to tell any of these people that they cannot change the information in the database. !!!!THEY MIGHT BE DOING THESE THINGS AT THE SAME INSTANT!!!!! !!!!I MAY NEED TO DO THAT IN AN UNBOUND FORM!!!! NOW, DREW, THAT IS LEGAL. I AM !!!NOT!!! GOING TO DESIGNING A TRANSACTION SYSTEM TO SAVE EVERY CHANGE EVER ENTERED BY ANYONE IN A BRAND NEW RECORD AS A CONTINUOUS HISTORY. MY CLIENT DID NOT ASK FOR THAT, WILL NOT PAY ME FOR THAT AND IT AIN'T GONNA HAPPEN. !!!!I HAVE TO DEAL WITH THAT!!!! !!!YOU!!! ARE AN ARROGANT ASS IF YOU THINK ONLY YOU KNOWS WHAT IS LEGAL OR POSSIBLE IN THIS WORLD. Go away. FAR FAR AWAY. JOIN THE FOREIGN LEGIONS AND TRY TO CONVERT SOMEONE ELSE TO YOUR INSOLENT IDEAS. Quite obviously I do not need, nor WANT your responses. Please do NOT respond to this thread EVER AGAIN. In case you do not YET understand..... !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! ......to your silly ideas. Hmmmm.... I fear that I STILL was not speaking plainly enough... !!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!!HORSHESHIT!!!! ......to your silly ideas. Hmmmm.... I fear that I STILL was not speaking plainly enough... If you want to post solutions for questions I did not ask, please feel free to do so, in some other thread. Hmmm... I COULD SWEAR THAT I MADE THAT REQUEST BEFORE... John W. Colby www.ColbyConsulting.com William -------------------------------------------------- From: "Dian" Sent: Tuesday, October 07, 2008 7:29 PM To: "'Access Developers discussion and problem solving'" Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > Me three...in case he's listening... > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Fred Hooper > Sent: Tuesday, October 07, 2008 1:51 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > Particularly in case he's listening, me too. > > Fred Hooper > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > Sent: Sunday, October 05, 2008 7:09 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > Nice one Shamil. > >> where the sides do not come to a common point of view still they learn >> and > use a lot from each other > > > Wish that all took the same point of view. We might not have lost the > great John (think what you like, but I loved his posting. > > > Max > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil > Salakhetdinov > Sent: 05 October 2008 19:47 > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > <<< > ...love the StackOverflow site ... > went right into my favorites ...thanks :) >>>> > My pleasure! :) > > That's what is good in discussions where the sides do not come to a common > point of view still they learn and use a lot from each other - duality, a > hidden(?) driving force, seems to be everywhere in this world... (Sorry > for > my getting a bit philosophical this Sunday's evening here...) > > Thank you, > > -- > Shamil > > P.S. Listening to "Cabaret" by Liza Minnelli right now :)... > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Hindman > Sent: Sunday, October 05, 2008 12:45 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > > ...we'll agree to disagree :) > > ...in the time it takes for me to find the author's solution in a book, > assuming its even there, I can find dozens of valid approaches on the web > along with comments from people who have used them for better or worse > ...I've not opened any tech book in ages with the single exception of > Susan/Martin's Access to SQL Server which I have tagged with dozens of > yellow stickies ...other wise, its the web for me. > > ...I think the real downturn for me was when the book stores stopped > carrying a wide variety of them ...I used to go to Books-a-Million while > the > > family went store hopping ...I could actually open the book and read it to > see if it was at my level, presented like I like, and actually had useful > examples ...I'd buy any book that passed that test ...now its Amazon or > e-bay and I just don't even bother any more. > > ...love the StackOverflow site ...went right into my favorites ...thanks > :) > > William > "In politics, there are some candidates who use change to promote their > careers, and then there are those, like John McCain, who use their careers > to promote change." Gov. Palin > > -------------------------------------------------- > From: "Shamil Salakhetdinov" > Sent: Saturday, October 04, 2008 12:28 PM > To: "'Access Developers discussion and problem solving'" > > Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET > >> William, >> >> I do not see this book available for free, code only, do you? >> >> I'm gladly paying for the books like Marco's one as they pay >> themselves manifold and very quickly... >> >> These books have well systemized and "condensed" stuff, supplied with >> working real life apps unlike Internet where it's often not easy (very >> time >> consuming) to find needed information, and it's almost not possible at >> all to get so well systemized and ready to use for real life software >> development stuff as Marco's book: for big advanced projects I mean, >> conceptual yet very useful and applicable and proven in real life >> software development business solutions I mean... >> >> Of course Internet is full of cookbook-style solutions/advises but one >> still have to have good experience and intuition to apply them in this >> or that case, and often a lot of time to filter-out "garbage" stuff... >> >> BTW, have you heard about this project/initiative? >> >> "Stack Overflow Launches" >> http://www.joelonsoftware.com/items/2008/09/15.html and >> http://blog.stackoverflow.com/ >> >> from Joel Spolsky? >> >> It looks promising but I'd think it would never be a substitute for >> good books as Marco Bellinaso's one ... >> >> Thank you. >> >> -- >> Shamil >> >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William >> Hindman >> Sent: Saturday, October 04, 2008 2:54 PM >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Visual Basic 2008 Express & VB.NET >> >> ...you make my point for me Shamil ...the book is 3 years old now and >> everything is available on-line for free ...plus lots of updates, >> improvements, errors, and user comments >> >> http://www.codeplex.com/TheBeerHouse >> >> ...why pay Amazon? ...why a book? ...although I'll allow that having a >> 12gig >> >> internet link probably makes it easier for me than you :) >> >> ...ps ...I visit his blog sometimes ...the source code is there as >> well but not as well maintained as the codeplex source. >> >> William >> "In politics, there are some candidates who use change to promote >> their careers, and then there are those, like John McCain, who use >> their careers to promote change." Gov. Palin >> >> -------------------------------------------------- >> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From fuller.artful at gmail.com Thu Oct 9 12:37:23 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Thu, 9 Oct 2008 14:37:23 -0300 Subject: [AccessD] Remove a custom toolbar In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720076DA27059@WPEXCH22.retail.ad.cmltd.net.au> References: <29f585dd0810080731n52bb0cc7uc66f76911e421e26@mail.gmail.com> <57E6E6CA42105A48B977303A2CDC2720076DA27059@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <29f585dd0810091037h52e524aene5eaabf4010d69d@mail.gmail.com> Thanks for this. I'll put this in my CodeLib. Arthur From reuben at gfconsultants.com Thu Oct 9 12:49:51 2008 From: reuben at gfconsultants.com (Reuben Cummings) Date: Thu, 9 Oct 2008 13:49:51 -0400 Subject: [AccessD] OT - ASP, Build a web table on the fly Message-ID: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> Anyone have some code for building a table on a web page on the fly? I am pulling a set of data that consists of whatever records occur in a two week period. Therefore, I do not know how many rows there will be. I do know there will always be 4 columns. Therefore, I need some help creating 4 rows, or 40 rows, depending on the data. Thanks. Reuben Cummings GFC, LLC 812.523.1017 From dw-murphy at cox.net Thu Oct 9 13:33:49 2008 From: dw-murphy at cox.net (Doug Murphy) Date: Thu, 9 Oct 2008 11:33:49 -0700 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> References: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> Message-ID: <004e01c92a3d$926257e0$0200a8c0@murphy3234aaf1> Sent a copy off line of the source for a page on one of our sites. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Reuben Cummings Sent: Thursday, October 09, 2008 10:50 AM To: AccessD Subject: [AccessD] OT - ASP, Build a web table on the fly Anyone have some code for building a table on a web page on the fly? I am pulling a set of data that consists of whatever records occur in a two week period. Therefore, I do not know how many rows there will be. I do know there will always be 4 columns. Therefore, I need some help creating 4 rows, or 40 rows, depending on the data. Thanks. Reuben Cummings GFC, LLC 812.523.1017 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From krosenstiel at comcast.net Thu Oct 9 13:42:28 2008 From: krosenstiel at comcast.net (krosenstiel at comcast.net) Date: Thu, 09 Oct 2008 18:42:28 +0000 Subject: [AccessD] OT - ASP, Build a web table on the fly Message-ID: <100920081842.9322.48EE5094000B464B0000246A2216527966040A079B9C020A9C019D05@comcast.net> Me too, me too! krosenstiel at comcast.net Unless it could be mounted on the DBA website? -- Karen Rosenstiel Seattle WA USA -------------- Original message ---------------------- From: "Doug Murphy" > Sent a copy off line of the source for a page on one of our sites. > > Doug > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Reuben Cummings > Sent: Thursday, October 09, 2008 10:50 AM > To: AccessD > Subject: [AccessD] OT - ASP, Build a web table on the fly > > Anyone have some code for building a table on a web page on the fly? > > I am pulling a set of data that consists of whatever records occur in a two > week period. Therefore, I do not know how many rows there will be. I do > know there will always be 4 columns. > > Therefore, I need some help creating 4 rows, or 40 rows, depending on the > data. > > Thanks. > > Reuben Cummings > GFC, LLC > 812.523.1017 > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 verizon.net Thu Oct 9 15:37:33 2008 From: mikedorism at verizon.net (Doris Manning) Date: Thu, 09 Oct 2008 16:37:33 -0400 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> References: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> Message-ID: Here is some C# code that we use in a website to dynamically create a table with 4 columns on the fly... dynTable = ""; foreach (DataRow Row in dtData.Rows) { //start table row dynTable += ""; //inner loop to generate columns for (int tCols = 0; tCols < 4; tCols++) { // create td column tag dynTable += ""; } // close table row dynTable += ""; } // close the table tag dynTable += "
"; // add column data dynTable += Row[tCols].ToString(); // close td column tag dynTable += "
"; Literal1.Text = dynTable; Doris Manning Database Administrator Hargrove Inc. From gustav at cactus.dk Thu Oct 9 16:41:56 2008 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 09 Oct 2008 23:41:56 +0200 Subject: [AccessD] OT - ASP, Build a web table on the fly Message-ID: Hi Reuben Not my area so no tricks from me, but welcome back! /gustav >>> reuben at gfconsultants.com 09-10-2008 19:49 >>> Anyone have some code for building a table on a web page on the fly? I am pulling a set of data that consists of whatever records occur in a two week period. Therefore, I do not know how many rows there will be. I do know there will always be 4 columns. Therefore, I need some help creating 4 rows, or 40 rows, depending on the data. Thanks. Reuben Cummings GFC, LLC 812.523.1017 From DWUTKA at Marlow.com Thu Oct 9 17:15:32 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Thu, 9 Oct 2008 17:15:32 -0500 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: <8A1C2AB67E2E4993A58A0C53A139D3AC@reubennx9500> Message-ID: Ok, here is a page that will do what you want: Though you will need to modify it a bit. The 'cnn.ConnectionString' line will need to connect to your database. And this page is designed to allow you to put in any SQL you want. To fix it to a specific SQL statement, just remove the form from it, and feed the SQL string to it...(or hard code the SQL string. SQL Statement Processing



<% dim cnn dim rs dim i dim strResp set cnn=server.createobject("ADODB.Connection") set rs=server.createobject("ADODB.recordset") cnn.ConnectionString="Somestring" cnn.Open if request.Form("SQL")<>"" then set rs.open strSQL,cnn,1,1%> <%for i=1 to rs.fields.count%> <%next%> <%if rs.eof=false then rs.movefirst do until rs.eof=true%> <%for i=1 to rs.fields.count%> <%next%> <%rs.movenext loop%> <%end if%>
<%=rs.fields(i-1).Name%>
<%=rs.fields(i-1).value%>
<%rs.close set rs=nothing end if set cnn=nothing %> -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Reuben Cummings Sent: Thursday, October 09, 2008 12:50 PM To: AccessD Subject: [AccessD] OT - ASP, Build a web table on the fly Anyone have some code for building a table on a web page on the fly? I am pulling a set of data that consists of whatever records occur in a two week period. Therefore, I do not know how many rows there will be. I do know there will always be 4 columns. Therefore, I need some help creating 4 rows, or 40 rows, depending on the data. Thanks. Reuben Cummings GFC, LLC 812.523.1017 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From newsgrps at dalyn.co.nz Thu Oct 9 19:10:30 2008 From: newsgrps at dalyn.co.nz (David Emerson) Date: Fri, 10 Oct 2008 13:10:30 +1300 Subject: [AccessD] Exporting/Importing CSV files Message-ID: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Team, I am wanting to export fields into a CSV file. This I can do using Print #. I am also enclosing each field in single quotes thus: Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & "','" & rst!Field3 & "'" Result: 'DET','1','Joe','Bloggs','10 Kingston Lane' I can also read the files back into an arrany using Input #: Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) This works fine unless one of the output fields includes a comma. Eg 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' In this case the Input# only gets "'10 Kingston Lane" and assumes that " Jamaca'" is for the next field. How do I allow for comma's to be included in fields? Regards David Emerson Dalyn Software Ltd Wellington, New Zealand From Elizabeth.J.Doering at wellsfargo.com Thu Oct 9 21:15:30 2008 From: Elizabeth.J.Doering at wellsfargo.com (Elizabeth.J.Doering at wellsfargo.com) Date: Thu, 9 Oct 2008 21:15:30 -0500 Subject: [AccessD] Exporting/Importing CSV files References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: David, You may have better success removing commas from all fields, all the time. CSVs are notorious for being comma separated! Either enforce farther back that commas can't be entered in the fields, or use Replace to get rid of them as you are exporting. HTH, Liz -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Thursday, October 09, 2008 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Exporting/Importing CSV files Team, I am wanting to export fields into a CSV file. This I can do using Print #. I am also enclosing each field in single quotes thus: Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & "','" & rst!Field3 & "'" Result: 'DET','1','Joe','Bloggs','10 Kingston Lane' I can also read the files back into an arrany using Input #: Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) This works fine unless one of the output fields includes a comma. Eg 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' In this case the Input# only gets "'10 Kingston Lane" and assumes that " Jamaca'" is for the next field. How do I allow for comma's to be included in fields? Regards David Emerson Dalyn Software Ltd Wellington, New Zealand -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose, or take any action based on this message or any information herein. If you have received this message in error, please advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. From stuart at lexacorp.com.pg Thu Oct 9 21:26:55 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 10 Oct 2008 12:26:55 +1000 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: <48EF4A0F.9953.E84EF1@stuart.lexacorp.com.pg> The simplest solution is to export/import as Tab delimited rather than comma delimited If you can't do that, you will need to read the full line in as a single string and them parse it yourself using the quote/comma/quote string as a delimiter. Input lngFileHandl, strRecord 'strip beginning and ending quotes' strRecord = mid$(strRecord,2,len(strRecord)-2) strData() = split(strRecord,"','") On 10 Oct 2008 at 13:10, David Emerson wrote: > Team, > > I am wanting to export fields into a CSV file. This I can do using > Print #. I am also enclosing each field in single quotes thus: > > Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > "','" & rst!Field3 & "'" > > Result: > 'DET','1','Joe','Bloggs','10 Kingston Lane' > > I can also read the files back into an arrany using Input #: > > Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > This works fine unless one of the output fields includes a comma. Eg > 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > In this case the Input# only gets "'10 Kingston Lane" and assumes > that " Jamaca'" is for the next field. > > How do I allow for comma's to be included in fields? > > > Regards > > David Emerson > Dalyn Software Ltd > Wellington, New Zealand > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From newsgrps at dalyn.co.nz Thu Oct 9 22:21:39 2008 From: newsgrps at dalyn.co.nz (David Emerson) Date: Fri, 10 Oct 2008 16:21:39 +1300 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <48EF4A0F.9953.E84EF1@stuart.lexacorp.com.pg> References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> <48EF4A0F.9953.E84EF1@stuart.lexacorp.com.pg> Message-ID: <20081010031833.QYSS1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Thanks Stuart, The csv file is actually made up of data from several tables appended one after another with dividing records with header info for each section. Your parsing suggestion seems to be the way to go. David At 10/10/2008, you wrote: >The simplest solution is to export/import as Tab delimited rather >than comma delimited > >If you can't do that, you will need to read the full line in as a >single string and them parse >it yourself using the quote/comma/quote string as a delimiter. > >Input lngFileHandl, strRecord >'strip beginning and ending quotes' >strRecord = mid$(strRecord,2,len(strRecord)-2) >strData() = split(strRecord,"','") > > >On 10 Oct 2008 at 13:10, David Emerson wrote: > > > Team, > > > > I am wanting to export fields into a CSV file. This I can do using > > Print #. I am also enclosing each field in single quotes thus: > > > > Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > > "','" & rst!Field3 & "'" > > > > Result: > > 'DET','1','Joe','Bloggs','10 Kingston Lane' > > > > I can also read the files back into an arrany using Input #: > > > > Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > > > This works fine unless one of the output fields includes a comma. Eg > > 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > > > In this case the Input# only gets "'10 Kingston Lane" and assumes > > that " Jamaca'" is for the next field. > > > > How do I allow for comma's to be included in fields? > > > > > > Regards > > > > David Emerson > > Dalyn Software Ltd > > Wellington, New Zealand > > > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From max.wanadoo at gmail.com Fri Oct 10 00:19:04 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Fri, 10 Oct 2008 06:19:04 +0100 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: <48eee5c8.05a4100a.3c70.53ad@mx.google.com> Is that why they are called CSV files? - CSV=Comma Separated Values. Not only are the "notorious" but "essential" Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Elizabeth.J.Doering at wellsfargo.com Sent: 10 October 2008 03:16 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Exporting/Importing CSV files David, You may have better success removing commas from all fields, all the time. CSVs are notorious for being comma separated! Either enforce farther back that commas can't be entered in the fields, or use Replace to get rid of them as you are exporting. HTH, Liz -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Thursday, October 09, 2008 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Exporting/Importing CSV files Team, I am wanting to export fields into a CSV file. This I can do using Print #. I am also enclosing each field in single quotes thus: Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & "','" & rst!Field3 & "'" Result: 'DET','1','Joe','Bloggs','10 Kingston Lane' I can also read the files back into an arrany using Input #: Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) This works fine unless one of the output fields includes a comma. Eg 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' In this case the Input# only gets "'10 Kingston Lane" and assumes that " Jamaca'" is for the next field. How do I allow for comma's to be included in fields? Regards David Emerson Dalyn Software Ltd Wellington, New Zealand -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose, or take any action based on this message or any information herein. If you have received this message in error, please advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at googlemail.com Fri Oct 10 06:18:20 2008 From: paul.hartland at googlemail.com (Paul Hartland) Date: Fri, 10 Oct 2008 12:18:20 +0100 Subject: [AccessD] Visual Basic 6.0 DataGrid Control - Changing Colour Of Certain Rows Message-ID: <38c884770810100418v35320815w8ef488d9a39cbfd5@mail.gmail.com> To all, I have a Visual Basic 6.0 application which I inherited (lucky me), and now they want to change the way that the DataGrid operates. The grid shows all personnel that are available to do a job for us on that day, some of these however are students. What I need to do (if it's possible) is loop through all the rows on a datagrid, get the personnel number, check if that person is a student, then change the colour of that row if they are. I normally use Infragistic UltraGrid, and it's very easy to do that on there. However I don't really want to change the grid if I can help it. Does anyone know if & how this is possible. Thank you in advance for any help.... -- Paul Hartland paul.hartland at googlemail.com From fuller.artful at gmail.com Fri Oct 10 08:17:44 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Fri, 10 Oct 2008 10:17:44 -0300 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <48eee5c8.05a4100a.3c70.53ad@mx.google.com> References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> <48eee5c8.05a4100a.3c70.53ad@mx.google.com> Message-ID: <29f585dd0810100617j29866085lc795863840366e4d@mail.gmail.com> Another approach is to surround each datum with quotation marks. Access won't care about that on the import side. On Fri, Oct 10, 2008 at 2:19 AM, Max Wanadoo wrote: > Is that why they are called CSV files? - > > CSV=Comma Separated Values. Not only are the "notorious" but "essential" > > Max > From steve at goodhall.info Fri Oct 10 08:50:28 2008 From: steve at goodhall.info (Steve Goodhall) Date: Fri, 10 Oct 2008 09:50:28 -0400 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <48eee5c8.05a4100a.3c70.53ad@mx.google.com> Message-ID: <7854D5661D1540818FC6F4CAE13634B4@StevenAcer> I checked this by exporting and importing a file using Menu, File, Export and Menu, File, Get External Data. I start with a table that looks like this: Table1 ID T1 T2 1 T11 T21 2 T2,2 T22 3 T32 T3,2 4 T4,1 T4,2 5 T4"1 T5'2 I export it to a CSV format which looks like this: "ID","T1","T2" 1,"T11","T21" 2,"T2,2","T22" 3,"T32","T3,2" 4,"T4,1","T4,2" 5,"T4""1","T5'2" I import it and I get: Table1A ID T1 T2 1 T11 T21 2 T2,2 T22 3 T32 T3,2 4 T4,1 T4,2 5 T4"1 T5'2 As you see, commas inside double quotes are not a problem. I also tried double quotes and single quotes. Double quotes within the field need to be changed to 2 double quotes when writing the CSV file. Regards, Steve Goodhall, PMP 248-505-5204 mobile Steve Goodhall, PMP 248-505-5204 mobile -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Friday, October 10, 2008 1:19 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Exporting/Importing CSV files Is that why they are called CSV files? - CSV=Comma Separated Values. Not only are the "notorious" but "essential" Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Elizabeth.J.Doering at wellsfargo.com Sent: 10 October 2008 03:16 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Exporting/Importing CSV files David, You may have better success removing commas from all fields, all the time. CSVs are notorious for being comma separated! Either enforce farther back that commas can't be entered in the fields, or use Replace to get rid of them as you are exporting. HTH, Liz -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Thursday, October 09, 2008 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Exporting/Importing CSV files Team, I am wanting to export fields into a CSV file. This I can do using Print #. I am also enclosing each field in single quotes thus: Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & "','" & rst!Field3 & "'" Result: 'DET','1','Joe','Bloggs','10 Kingston Lane' I can also read the files back into an arrany using Input #: Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) This works fine unless one of the output fields includes a comma. Eg 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' In this case the Input# only gets "'10 Kingston Lane" and assumes that " Jamaca'" is for the next field. How do I allow for comma's to be included in fields? Regards David Emerson Dalyn Software Ltd Wellington, New Zealand -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose, or take any action based on this message or any information herein. If you have received this message in error, please advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From reuben at gfconsultants.com Fri Oct 10 09:01:56 2008 From: reuben at gfconsultants.com (Reuben Cummings) Date: Fri, 10 Oct 2008 10:01:56 -0400 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: Message-ID: <081D85CB04C448AB8B5BC97573C30C14@reubennx9500> Thanks for the warm welcome back. Also, thanks to everyone that contributed. Now I just need to sort thru the pile o' code sent me. Reuben Cummings GFC, LLC 812.523.1017 > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gustav Brock > Sent: Thursday, October 09, 2008 5:42 PM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] OT - ASP, Build a web table on the fly > > > Hi Reuben > > Not my area so no tricks from me, but welcome back! > > /gustav > > >>> reuben at gfconsultants.com 09-10-2008 19:49 >>> > Anyone have some code for building a table on a web page on the fly? > > I am pulling a set of data that consists of whatever records > occur in a two week period. Therefore, I do not know how > many rows there will be. I do know there will always be 4 columns. > > Therefore, I need some help creating 4 rows, or 40 rows, > depending on the data. > > Thanks. > > Reuben Cummings > GFC, LLC > 812.523.1017 > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Chester_Kaup at kindermorgan.com Fri Oct 10 09:53:41 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Fri, 10 Oct 2008 09:53:41 -0500 Subject: [AccessD] Joining Tables Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> Will a query run faster if index fields are joined between tables as opposed to non indexed fields? I am thinking it will run more quickly but am interested in others thoughts. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From cfoust at infostatsystems.com Fri Oct 10 10:14:13 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 10 Oct 2008 08:14:13 -0700 Subject: [AccessD] Joining Tables In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> Message-ID: It should run faster because it can deal with the indexes rather than parsing the data in each field and examining all records. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Friday, October 10, 2008 7:54 AM To: Access Developers discussion and problem solving Subject: [AccessD] Joining Tables Will a query run faster if index fields are joined between tables as opposed to non indexed fields? I am thinking it will run more quickly but am interested in others thoughts. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 cfoust at infostatsystems.com Fri Oct 10 10:40:01 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 10 Oct 2008 08:40:01 -0700 Subject: [AccessD] Joining Tables In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> Message-ID: Of course, if you are dealing with a Yes/No field, there's no point in indexing it since it can only have one of 2 or 3 values. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Friday, October 10, 2008 7:54 AM To: Access Developers discussion and problem solving Subject: [AccessD] Joining Tables Will a query run faster if index fields are joined between tables as opposed to non indexed fields? I am thinking it will run more quickly but am interested in others thoughts. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 fuller.artful at gmail.com Fri Oct 10 11:27:40 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Fri, 10 Oct 2008 13:27:40 -0300 Subject: [AccessD] Joining Tables In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> Message-ID: <29f585dd0810100927qe127fb2u6f464dcccf68529a@mail.gmail.com> I would go even further, Charlotte. Unless the underlying table' column has a large degree of uniqueness, chances are good that the optimizer will do a full table scan anyway. In this case, the index in question would be time well wasted, since the system will be forced to maintain the index while also never using it. (At least that is the case in SQL Server; I cannot verify that the same is true in JET. Arthur On Fri, Oct 10, 2008 at 12:40 PM, Charlotte Foust < cfoust at infostatsystems.com> wrote: > Of course, if you are dealing with a Yes/No field, there's no point in > indexing it since it can only have one of 2 or 3 values. > > Charlotte Foust > From DWUTKA at Marlow.com Fri Oct 10 16:22:28 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Fri, 10 Oct 2008 16:22:28 -0500 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: Pretty simple to solve. Every unit except the first and last are actually split with ',', so read the file in like this: Dim f as long Dim strTemp as string Dim strArray() as string F=freefile Open "C:\Folder\File.csv" for binary access read as f Strtemp=space(lof(f)) Get f,,strtemp Strarray=split(strtemp,"','") Close f Now strArray should contain each field.... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Thursday, October 09, 2008 7:11 PM To: accessd at databaseadvisors.com Subject: [AccessD] Exporting/Importing CSV files Team, I am wanting to export fields into a CSV file. This I can do using Print #. I am also enclosing each field in single quotes thus: Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & "','" & rst!Field3 & "'" Result: 'DET','1','Joe','Bloggs','10 Kingston Lane' I can also read the files back into an arrany using Input #: Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) This works fine unless one of the output fields includes a comma. Eg 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' In this case the Input# only gets "'10 Kingston Lane" and assumes that " Jamaca'" is for the next field. How do I allow for comma's to be included in fields? Regards David Emerson Dalyn Software Ltd Wellington, New Zealand -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From stuart at lexacorp.com.pg Fri Oct 10 17:54:56 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 11 Oct 2008 08:54:56 +1000 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: References: <20081010000740.XNNQ1143.mta04.xtra.co.nz@Dalyn.dalyn.co.nz>, Message-ID: <48F069E0.15069.2832DA@stuart.lexacorp.com.pg> That won't work, it will result in: 1. A single large array of data elements which are not divided into records. 2. A series of data elements in the form "Record1Field5'CRLF'Record2Field1" On 10 Oct 2008 at 16:22, Drew Wutka wrote: > Pretty simple to solve. Every unit except the first and last are > actually split with ',', so read the file in like this: > > Dim f as long > Dim strTemp as string > Dim strArray() as string > F=freefile > Open "C:\Folder\File.csv" for binary access read as f > Strtemp=space(lof(f)) > Get f,,strtemp > Strarray=split(strtemp,"','") > Close f > > Now strArray should contain each field.... > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > Sent: Thursday, October 09, 2008 7:11 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Exporting/Importing CSV files > > Team, > > I am wanting to export fields into a CSV file. This I can do using > Print #. I am also enclosing each field in single quotes thus: > > Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > "','" & rst!Field3 & "'" > > Result: > 'DET','1','Joe','Bloggs','10 Kingston Lane' > > I can also read the files back into an arrany using Input #: > > Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > This works fine unless one of the output fields includes a comma. Eg > 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > In this case the Input# only gets "'10 Kingston Lane" and assumes > that " Jamaca'" is for the next field. > > How do I allow for comma's to be included in fields? > > > Regards > > David Emerson > Dalyn Software Ltd > Wellington, New Zealand > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at Marlow.com Fri Oct 10 18:27:54 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Fri, 10 Oct 2008 18:27:54 -0500 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <48F069E0.15069.2832DA@stuart.lexacorp.com.pg> Message-ID: WHOOOPS, forgot a step.... here's the one that would work: Dim f as long Dim strTemp as string Dim strArray() as string Dim strRecord() as string Dim I as long F=freefile Open "C:\Folder\File.csv" for binary access read as f Strtemp=space(lof(f)) Get f,,strtemp Strarray=split(strtemp,vbcrlf) Close f For i=0 to ubound(strarray()) Strrecord=split(strarray(i),"','") 'this is where you would have the record, within strRecord.... Next i My bad, too many long nights working on a VPN issue..... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Friday, October 10, 2008 5:55 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Exporting/Importing CSV files That won't work, it will result in: 1. A single large array of data elements which are not divided into records. 2. A series of data elements in the form "Record1Field5'CRLF'Record2Field1" On 10 Oct 2008 at 16:22, Drew Wutka wrote: > Pretty simple to solve. Every unit except the first and last are > actually split with ',', so read the file in like this: > > Dim f as long > Dim strTemp as string > Dim strArray() as string > F=freefile > Open "C:\Folder\File.csv" for binary access read as f > Strtemp=space(lof(f)) > Get f,,strtemp > Strarray=split(strtemp,"','") > Close f > > Now strArray should contain each field.... > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > Sent: Thursday, October 09, 2008 7:11 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Exporting/Importing CSV files > > Team, > > I am wanting to export fields into a CSV file. This I can do using > Print #. I am also enclosing each field in single quotes thus: > > Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > "','" & rst!Field3 & "'" > > Result: > 'DET','1','Joe','Bloggs','10 Kingston Lane' > > I can also read the files back into an arrany using Input #: > > Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > This works fine unless one of the output fields includes a comma. Eg > 'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > In this case the Input# only gets "'10 Kingston Lane" and assumes > that " Jamaca'" is for the next field. > > How do I allow for comma's to be included in fields? > > > Regards > > David Emerson > Dalyn Software Ltd > Wellington, New Zealand > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient 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 The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From newsgrps at dalyn.co.nz Sat Oct 11 14:23:32 2008 From: newsgrps at dalyn.co.nz (David Emerson) Date: Sun, 12 Oct 2008 08:23:32 +1300 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <7854D5661D1540818FC6F4CAE13634B4@StevenAcer> References: <48eee5c8.05a4100a.3c70.53ad@mx.google.com> <7854D5661D1540818FC6F4CAE13634B4@StevenAcer> Message-ID: <20081011192246.GXMV15893.mta06.xtra.co.nz@Dalyn.dalyn.co.nz> This would work if I was using the menus to export, import, but everything is done by code to handle rows with different numbers of fields in them. I think Drew's (final) solution may be the one to use. Thanks all for your input David At 10/11/2008, you wrote: >I checked this by exporting and importing a file using Menu, File, Export >and Menu, File, Get External Data. I start with a table that looks like >this: >Table1 >ID T1 T2 >1 T11 T21 >2 T2,2 T22 >3 T32 T3,2 >4 T4,1 T4,2 >5 T4"1 T5'2 > >I export it to a CSV format which looks like this: >"ID","T1","T2" >1,"T11","T21" >2,"T2,2","T22" >3,"T32","T3,2" >4,"T4,1","T4,2" >5,"T4""1","T5'2" >I import it and I get: >Table1A >ID T1 T2 >1 T11 T21 >2 T2,2 T22 >3 T32 T3,2 >4 T4,1 T4,2 >5 T4"1 T5'2 > >As you see, commas inside double quotes are not a problem. >I also tried double quotes and single quotes. Double quotes within the >field need to be changed to 2 double quotes when writing the CSV file. >Regards, >Steve Goodhall, PMP >248-505-5204 mobile > >Steve Goodhall, PMP >248-505-5204 mobile > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo >Sent: Friday, October 10, 2008 1:19 AM >To: 'Access Developers discussion and problem solving' >Subject: Re: [AccessD] Exporting/Importing CSV files > >Is that why they are called CSV files? - > >CSV=Comma Separated Values. Not only are the "notorious" but "essential" > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Elizabeth.J.Doering at wellsfargo.com >Sent: 10 October 2008 03:16 >To: accessd at databaseadvisors.com >Subject: Re: [AccessD] Exporting/Importing CSV files > > >David, > >You may have better success removing commas from all fields, all the >time. CSVs are notorious for being comma separated! > >Either enforce farther back that commas can't be entered in the fields, >or use Replace to get rid of them as you are exporting. > >HTH, > > >Liz > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson >Sent: Thursday, October 09, 2008 7:11 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] Exporting/Importing CSV files > >Team, > >I am wanting to export fields into a CSV file. This I can do using >Print #. I am also enclosing each field in single quotes thus: > >Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & >"','" & rst!Field3 & "'" > >Result: >'DET','1','Joe','Bloggs','10 Kingston Lane' > >I can also read the files back into an arrany using Input #: > >Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > >This works fine unless one of the output fields includes a comma. Eg >'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > >In this case the Input# only gets "'10 Kingston Lane" and assumes that " >Jamaca'" is for the next field. > >How do I allow for comma's to be included in fields? > > >Regards > >David Emerson >Dalyn Software Ltd >Wellington, New Zealand From steve at goodhall.info Sat Oct 11 17:10:47 2008 From: steve at goodhall.info (Steve Goodhall) Date: Sat, 11 Oct 2008 18:10:47 -0400 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <20081011192246.GXMV15893.mta06.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: <2A8E16E628DC429284657A07E47FFD22@StevenAcer> I understand that, but it still gives you the appropriate format for a CSV. I may have some code from my Master's Thesis Project that will handle this. I will look for it when I get home. Also, I think that you could use DoCmd.TransferText or docmd.TransferSpreadsheet to invoke this functionality in code. I will try that out and check how different number of fields will affect it. Regards, Steve Goodhall, PMP 248-505-5204 mobile -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Saturday, October 11, 2008 3:24 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Exporting/Importing CSV files This would work if I was using the menus to export, import, but everything is done by code to handle rows with different numbers of fields in them. I think Drew's (final) solution may be the one to use. Thanks all for your input David At 10/11/2008, you wrote: >I checked this by exporting and importing a file using Menu, File, Export >and Menu, File, Get External Data. I start with a table that looks like >this: >Table1 >ID T1 T2 >1 T11 T21 >2 T2,2 T22 >3 T32 T3,2 >4 T4,1 T4,2 >5 T4"1 T5'2 > >I export it to a CSV format which looks like this: >"ID","T1","T2" >1,"T11","T21" >2,"T2,2","T22" >3,"T32","T3,2" >4,"T4,1","T4,2" >5,"T4""1","T5'2" >I import it and I get: >Table1A >ID T1 T2 >1 T11 T21 >2 T2,2 T22 >3 T32 T3,2 >4 T4,1 T4,2 >5 T4"1 T5'2 > >As you see, commas inside double quotes are not a problem. >I also tried double quotes and single quotes. Double quotes within the >field need to be changed to 2 double quotes when writing the CSV file. >Regards, >Steve Goodhall, PMP >248-505-5204 mobile > >Steve Goodhall, PMP >248-505-5204 mobile > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo >Sent: Friday, October 10, 2008 1:19 AM >To: 'Access Developers discussion and problem solving' >Subject: Re: [AccessD] Exporting/Importing CSV files > >Is that why they are called CSV files? - > >CSV=Comma Separated Values. Not only are the "notorious" but "essential" > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >Elizabeth.J.Doering at wellsfargo.com >Sent: 10 October 2008 03:16 >To: accessd at databaseadvisors.com >Subject: Re: [AccessD] Exporting/Importing CSV files > > >David, > >You may have better success removing commas from all fields, all the >time. CSVs are notorious for being comma separated! > >Either enforce farther back that commas can't be entered in the fields, >or use Replace to get rid of them as you are exporting. > >HTH, > > >Liz > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson >Sent: Thursday, October 09, 2008 7:11 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] Exporting/Importing CSV files > >Team, > >I am wanting to export fields into a CSV file. This I can do using >Print #. I am also enclosing each field in single quotes thus: > >Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & >"','" & rst!Field3 & "'" > >Result: >'DET','1','Joe','Bloggs','10 Kingston Lane' > >I can also read the files back into an arrany using Input #: > >Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > >This works fine unless one of the output fields includes a comma. Eg >'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > >In this case the Input# only gets "'10 Kingston Lane" and assumes that " >Jamaca'" is for the next field. > >How do I allow for comma's to be included in fields? > > >Regards > >David Emerson >Dalyn Software Ltd >Wellington, New Zealand -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From newsgrps at dalyn.co.nz Sat Oct 11 21:21:47 2008 From: newsgrps at dalyn.co.nz (David Emerson) Date: Sun, 12 Oct 2008 15:21:47 +1300 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <2A8E16E628DC429284657A07E47FFD22@StevenAcer> References: <20081011192246.GXMV15893.mta06.xtra.co.nz@Dalyn.dalyn.co.nz> <2A8E16E628DC429284657A07E47FFD22@StevenAcer> Message-ID: <20081012021925.ZJLP17465.mta05.xtra.co.nz@Dalyn.dalyn.co.nz> You may have a good point there. I will do some testing at this end as well. Thanks David At 10/12/2008, you wrote: >I understand that, but it still gives you the appropriate format for a CSV. >I may have some code from my Master's Thesis Project that will handle this. >I will look for it when I get home. >Also, I think that you could use DoCmd.TransferText or >docmd.TransferSpreadsheet to invoke this functionality in code. I will try >that out and check how different number of fields will affect it. >Regards, >Steve Goodhall, PMP >248-505-5204 mobile > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson >Sent: Saturday, October 11, 2008 3:24 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Exporting/Importing CSV files > >This would work if I was using the menus to export, import, but >everything is done by code to handle rows with different numbers of >fields in them. I think Drew's (final) solution may be the one to use. > >Thanks all for your input > >David > >At 10/11/2008, you wrote: > >I checked this by exporting and importing a file using Menu, File, Export > >and Menu, File, Get External Data. I start with a table that looks like > >this: > >Table1 > >ID T1 T2 > >1 T11 T21 > >2 T2,2 T22 > >3 T32 T3,2 > >4 T4,1 T4,2 > >5 T4"1 T5'2 > > > >I export it to a CSV format which looks like this: > >"ID","T1","T2" > >1,"T11","T21" > >2,"T2,2","T22" > >3,"T32","T3,2" > >4,"T4,1","T4,2" > >5,"T4""1","T5'2" > >I import it and I get: > >Table1A > >ID T1 T2 > >1 T11 T21 > >2 T2,2 T22 > >3 T32 T3,2 > >4 T4,1 T4,2 > >5 T4"1 T5'2 > > > >As you see, commas inside double quotes are not a problem. > >I also tried double quotes and single quotes. Double quotes within the > >field need to be changed to 2 double quotes when writing the CSV file. > >Regards, > >Steve Goodhall, PMP > >248-505-5204 mobile > > > >Steve Goodhall, PMP > >248-505-5204 mobile > > > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > >Sent: Friday, October 10, 2008 1:19 AM > >To: 'Access Developers discussion and problem solving' > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > >Is that why they are called CSV files? - > > > >CSV=Comma Separated Values. Not only are the "notorious" but "essential" > > > >Max > > > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >Elizabeth.J.Doering at wellsfargo.com > >Sent: 10 October 2008 03:16 > >To: accessd at databaseadvisors.com > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > > > >David, > > > >You may have better success removing commas from all fields, all the > >time. CSVs are notorious for being comma separated! > > > >Either enforce farther back that commas can't be entered in the fields, > >or use Replace to get rid of them as you are exporting. > > > >HTH, > > > > > >Liz > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > >Sent: Thursday, October 09, 2008 7:11 PM > >To: accessd at databaseadvisors.com > >Subject: [AccessD] Exporting/Importing CSV files > > > >Team, > > > >I am wanting to export fields into a CSV file. This I can do using > >Print #. I am also enclosing each field in single quotes thus: > > > >Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > >"','" & rst!Field3 & "'" > > > >Result: > >'DET','1','Joe','Bloggs','10 Kingston Lane' > > > >I can also read the files back into an arrany using Input #: > > > >Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > > >This works fine unless one of the output fields includes a comma. Eg > >'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > > >In this case the Input# only gets "'10 Kingston Lane" and assumes that " > >Jamaca'" is for the next field. > > > >How do I allow for comma's to be included in fields? > > > > > >Regards > > > >David Emerson > >Dalyn Software Ltd > >Wellington, New Zealand > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From bbruen at unwired.com.au Mon Oct 13 08:13:54 2008 From: bbruen at unwired.com.au (Bruce) Date: Mon, 13 Oct 2008 23:13:54 +1000 Subject: [AccessD] Joining Tables In-Reply-To: <29f585dd0810100927qe127fb2u6f464dcccf68529a@mail.gmail.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB44E73@houex1.kindermorgan.com> <29f585dd0810100927qe127fb2u6f464dcccf68529a@mail.gmail.com> Message-ID: <200810132313.55525.bbruen@unwired.com.au> On Saturday 11 October 2008 02:27:40 Arthur Fuller wrote: > I would go even further, Charlotte. Unless the underlying table' column has > a large degree of uniqueness, chances are good that the optimizer will do a > full table scan anyway. In this case, the index in question would be time > well wasted, since the system will be forced to maintain the index while > also never using it. (At least that is the case in SQL Server; I cannot > verify that the same is true in JET. > > Arthur > > On Fri, Oct 10, 2008 at 12:40 PM, Charlotte Foust < > > cfoust at infostatsystems.com> wrote: > > Of course, if you are dealing with a Yes/No field, there's no point in > > indexing it since it can only have one of 2 or 3 values. > > > > Charlotte Foust To go even further, it depends. Scenario 1) either table has a reasonable degree of uniqueness on the join column ==> assumtion, indexing will be picked up by the optimiser as a preferred mechanism. Scenario 2) one of the two tables has a fair degree of uniqeness and the other cant be fairly keyed on that column Scenario 3) the query is run once a year. It depends. ymmv Bruce From DWUTKA at Marlow.com Mon Oct 13 10:44:50 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Mon, 13 Oct 2008 10:44:50 -0500 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: <081D85CB04C448AB8B5BC97573C30C14@reubennx9500> Message-ID: Whoops, I goofed. Sorry, last week was a long, long week for me! Anywho, the example I gave was a little off. I had it specifically for a system I am building. Here is one that works: http://www.marlow.com/sql.zip On line 21, it connects to the Northwind database that I have copied onto our webserver. You will need to change the path on that line. To try this: http://www.marlow.com/sql.asp Keep in mind, that it's using the northwind database, so: SELECT FirstName, LastName FROM Employees WHERE City="Seattle" Will return to records for you... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Reuben Cummings Sent: Friday, October 10, 2008 9:02 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] OT - ASP, Build a web table on the fly Thanks for the warm welcome back. Also, thanks to everyone that contributed. Now I just need to sort thru the pile o' code sent me. Reuben Cummings GFC, LLC 812.523.1017 > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gustav Brock > Sent: Thursday, October 09, 2008 5:42 PM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] OT - ASP, Build a web table on the fly > > > Hi Reuben > > Not my area so no tricks from me, but welcome back! > > /gustav > > >>> reuben at gfconsultants.com 09-10-2008 19:49 >>> > Anyone have some code for building a table on a web page on the fly? > > I am pulling a set of data that consists of whatever records > occur in a two week period. Therefore, I do not know how > many rows there will be. I do know there will always be 4 columns. > > Therefore, I need some help creating 4 rows, or 40 rows, > depending on the data. > > Thanks. > > Reuben Cummings > GFC, LLC > 812.523.1017 > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From DWUTKA at Marlow.com Mon Oct 13 11:04:26 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Mon, 13 Oct 2008 11:04:26 -0500 Subject: [AccessD] OT - ASP, Build a web table on the fly In-Reply-To: Message-ID: Ok, and it's Monday, that last line should be: Will return TWO records for you... ;) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: Monday, October 13, 2008 10:45 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT - ASP, Build a web table on the fly Whoops, I goofed. Sorry, last week was a long, long week for me! Anywho, the example I gave was a little off. I had it specifically for a system I am building. Here is one that works: http://www.marlow.com/sql.zip On line 21, it connects to the Northwind database that I have copied onto our webserver. You will need to change the path on that line. To try this: http://www.marlow.com/sql.asp Keep in mind, that it's using the northwind database, so: SELECT FirstName, LastName FROM Employees WHERE City="Seattle" Will return to records for you... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Reuben Cummings Sent: Friday, October 10, 2008 9:02 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] OT - ASP, Build a web table on the fly Thanks for the warm welcome back. Also, thanks to everyone that contributed. Now I just need to sort thru the pile o' code sent me. Reuben Cummings GFC, LLC 812.523.1017 > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gustav Brock > Sent: Thursday, October 09, 2008 5:42 PM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] OT - ASP, Build a web table on the fly > > > Hi Reuben > > Not my area so no tricks from me, but welcome back! > > /gustav > > >>> reuben at gfconsultants.com 09-10-2008 19:49 >>> > Anyone have some code for building a table on a web page on the fly? > > I am pulling a set of data that consists of whatever records > occur in a two week period. Therefore, I do not know how > many rows there will be. I do know there will always be 4 columns. > > Therefore, I need some help creating 4 rows, or 40 rows, > depending on the data. > > Thanks. > > Reuben Cummings > GFC, LLC > 812.523.1017 > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From kost36 at otenet.gr Mon Oct 13 12:24:19 2008 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Mon, 13 Oct 2008 20:24:19 +0300 Subject: [AccessD] print via check boxes.. In-Reply-To: References: Message-ID: <7106F3DB6D7743A184FBC60C2370EC27@kost36PC> Hi group, I use a simple form, keeping for a small club various demographical data . The point is 10 check boxes inclouding into the same form something means 10 different jobs category. So, is it possible to need to check more than one or two check boxes for the same record What I need is to make a report which will print lists depending of the checked boxes so the person's name with two or three different jobs to be able to appear in every separated list many thank's /kostas From steve at goodhall.info Mon Oct 13 12:29:40 2008 From: steve at goodhall.info (Steve Goodhall) Date: Mon, 13 Oct 2008 13:29:40 -0400 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <20081012021925.ZJLP17465.mta05.xtra.co.nz@Dalyn.dalyn.co.nz> Message-ID: <6BBE41E8945442E8B3BB7AB558360576@StevenAcer> Here's my test. It exercises the import and export options of DoCmd.TransferText and also explores the impact of having a variable number of fields in the text file. The board has been doing strange things to the format of some of my messages, so I hope this one is legible. First create a text file called "Table1.csv" with the following content: "ID","T1","T2" 1,"T11","T21" 2,"T2,2","T22" 3,"T32","T3,2" 4,"T4,1","T4,2" 5,"T4""1","T5'2" First create a text file called "TableZ.csv" with the following content: "ID","T1","T2" 1,"T11","T21" 2,"T2,2","T22" 3,"T32","T3,2" 4,"T4,1" 5,"T5""1","T5'2","T4'3" Then run this code: Sub testCSV() sPath = CurrentProject.Path & "\" On Error Resume Next DoCmd.DeleteObject acTable, "Table1" DoCmd.DeleteObject acTable, "Table1A" DoCmd.DeleteObject acTable, "Table1X" DoCmd.DeleteObject acTable, "Table1Z" On Error GoTo 0 DoCmd.TransferText acImportDelim, , "Table1", sPath & "Table1.csv", True DoCmd.TransferText acImportDelim, , "Table1Z", sPath & "Table1Z.csv", True DoCmd.TransferText acExportDelim, , "Table1", sPath & "Table1A.csv", True DoCmd.TransferText acImportDelim, , "Table1A", sPath & "Table1A.csv", True DoCmd.TransferText acExportDelim, , "Table1Z", sPath & "Table1Y.csv", True DoCmd.TransferText acImportDelim, , "Table1Y", sPath & "Table1Y.csv", True End Sub Then inspect the tables and the files. Please let me know if this does what you want it to. Regards, Steve Goodhall, PMP 248-505-5204 mobile -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson Sent: Saturday, October 11, 2008 10:22 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Exporting/Importing CSV files You may have a good point there. I will do some testing at this end as well. Thanks David At 10/12/2008, you wrote: >I understand that, but it still gives you the appropriate format for a CSV. >I may have some code from my Master's Thesis Project that will handle this. >I will look for it when I get home. >Also, I think that you could use DoCmd.TransferText or >docmd.TransferSpreadsheet to invoke this functionality in code. I will try >that out and check how different number of fields will affect it. >Regards, >Steve Goodhall, PMP >248-505-5204 mobile > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson >Sent: Saturday, October 11, 2008 3:24 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Exporting/Importing CSV files > >This would work if I was using the menus to export, import, but >everything is done by code to handle rows with different numbers of >fields in them. I think Drew's (final) solution may be the one to use. > >Thanks all for your input > >David > >At 10/11/2008, you wrote: > >I checked this by exporting and importing a file using Menu, File, Export > >and Menu, File, Get External Data. I start with a table that looks like > >this: > >Table1 > >ID T1 T2 > >1 T11 T21 > >2 T2,2 T22 > >3 T32 T3,2 > >4 T4,1 T4,2 > >5 T4"1 T5'2 > > > >I export it to a CSV format which looks like this: > >"ID","T1","T2" > >1,"T11","T21" > >2,"T2,2","T22" > >3,"T32","T3,2" > >4,"T4,1","T4,2" > >5,"T4""1","T5'2" > >I import it and I get: > >Table1A > >ID T1 T2 > >1 T11 T21 > >2 T2,2 T22 > >3 T32 T3,2 > >4 T4,1 T4,2 > >5 T4"1 T5'2 > > > >As you see, commas inside double quotes are not a problem. > >I also tried double quotes and single quotes. Double quotes within the > >field need to be changed to 2 double quotes when writing the CSV file. > >Regards, > >Steve Goodhall, PMP > >248-505-5204 mobile > > > >Steve Goodhall, PMP > >248-505-5204 mobile > > > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > >Sent: Friday, October 10, 2008 1:19 AM > >To: 'Access Developers discussion and problem solving' > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > >Is that why they are called CSV files? - > > > >CSV=Comma Separated Values. Not only are the "notorious" but "essential" > > > >Max > > > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >Elizabeth.J.Doering at wellsfargo.com > >Sent: 10 October 2008 03:16 > >To: accessd at databaseadvisors.com > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > > > >David, > > > >You may have better success removing commas from all fields, all the > >time. CSVs are notorious for being comma separated! > > > >Either enforce farther back that commas can't be entered in the fields, > >or use Replace to get rid of them as you are exporting. > > > >HTH, > > > > > >Liz > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > >Sent: Thursday, October 09, 2008 7:11 PM > >To: accessd at databaseadvisors.com > >Subject: [AccessD] Exporting/Importing CSV files > > > >Team, > > > >I am wanting to export fields into a CSV file. This I can do using > >Print #. I am also enclosing each field in single quotes thus: > > > >Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > >"','" & rst!Field3 & "'" > > > >Result: > >'DET','1','Joe','Bloggs','10 Kingston Lane' > > > >I can also read the files back into an arrany using Input #: > > > >Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > > >This works fine unless one of the output fields includes a comma. Eg > >'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > > >In this case the Input# only gets "'10 Kingston Lane" and assumes that " > >Jamaca'" is for the next field. > > > >How do I allow for comma's to be included in fields? > > > > > >Regards > > > >David Emerson > >Dalyn Software Ltd > >Wellington, New Zealand > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >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 Mon Oct 13 12:34:02 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Mon, 13 Oct 2008 19:34:02 +0200 Subject: [AccessD] eobjects DataCleaner: Profile, validate, compare, clean data Message-ID: Hi all Here is what seems to be a great - and free - tool when you are dealing with "old" data and have to check the integrity of these: http://eobjects.org/trac/wiki/DataCleaner A couple of small videos are present which are quite impressive: http://eobjects.org/trac/wiki/DataCleanerWebcasts Indeed the profiler is a bright idea. /gustav From markamatte at hotmail.com Mon Oct 13 14:05:20 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Mon, 13 Oct 2008 19:05:20 +0000 Subject: [AccessD] print via check boxes.. In-Reply-To: <7106F3DB6D7743A184FBC60C2370EC27@kost36PC> References: <7106F3DB6D7743A184FBC60C2370EC27@kost36PC> Message-ID: Kostas, I think I understand the question...but not sure... When you are selecting these jobs on the form...does it store 1 record per job...or 1 record with the jobs in different fields. If you could give a small example of how the data is in the table...I think the answer is close. Thanks, Mark A. Matte > From: kost36 at otenet.gr > To: accessd at databaseadvisors.com > Date: Mon, 13 Oct 2008 20:24:19 +0300 > Subject: [AccessD] print via check boxes.. > > Hi group, > > I use a simple form, keeping for a small club > various demographical data . > > The point is 10 check boxes inclouding into the same form > something means 10 different jobs category. > So, is it possible to need to check more than one or two > check boxes for the same record > > What I need is to make a report which will print lists > depending of the checked boxes so the person's name with two > or three different jobs to be able to appear in every separated list > > many thank's > /kostas > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Get more out of the Web. Learn 10 hidden secrets of Windows Live. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 From kost36 at otenet.gr Mon Oct 13 14:33:21 2008 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Mon, 13 Oct 2008 22:33:21 +0300 Subject: [AccessD] print via check boxes.. In-Reply-To: References: <7106F3DB6D7743A184FBC60C2370EC27@kost36PC> Message-ID: <19A3CB9084594328A586B0285ED8ABD6@kost36PC> Mark, all the project is based on just one table with (except names, addresses, phones etc) 10 different check boxes like 1. journalist 2. Technician 3. Actor 4. Doctor etc.. etc e.g Kostas may be working both as a jurnalist and a technician too so when I ask for a list with journalists Kostas must inclouded there and the he same when I want to ask for a list with technicians, too Hope that was more understandable thank's /kostas ----- Original Message ----- From: "Mark A Matte" To: "Access Developers discussion and problem solving" Sent: Monday, October 13, 2008 10:05 PM Subject: Re: [AccessD] print via check boxes.. > > Kostas, > > I think I understand the question...but not sure... > > When you are selecting these jobs on the form...does it store 1 record per > job...or 1 record with the jobs in different fields. If you could give a > small example of how the data is in the table...I think the answer is > close. > > Thanks, > > Mark A. Matte > > >> From: kost36 at otenet.gr >> To: accessd at databaseadvisors.com >> Date: Mon, 13 Oct 2008 20:24:19 +0300 >> Subject: [AccessD] print via check boxes.. >> >> Hi group, >> >> I use a simple form, keeping for a small club >> various demographical data . >> >> The point is 10 check boxes inclouding into the same form >> something means 10 different jobs category. >> So, is it possible to need to check more than one or two >> check boxes for the same record >> >> What I need is to make a report which will print lists >> depending of the checked boxes so the person's name with two >> or three different jobs to be able to appear in every separated list >> >> many thank's >> /kostas >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Get more out of the Web. Learn 10 hidden secrets of Windows Live. > http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From rockysmolin at bchacc.com Mon Oct 13 14:35:36 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Mon, 13 Oct 2008 12:35:36 -0700 Subject: [AccessD] Slider Bar on Combo Box Message-ID: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From cfoust at infostatsystems.com Mon Oct 13 14:53:14 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 13 Oct 2008 12:53:14 -0700 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: <1B205F53D38646429B2DC9AC43258D58@HAL9005> References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: Are you talking about a plain Access combo? By slider bar, I assume you mean the scrollbar that defaults to the right side of the dropdown list in the combo, right? If I have more rows in a combobox than are allowed by the listrows property then I see a scrollbar with a thumb, and scrolling behave just as you described for forms. There isn't any setting I've ever found to change that, so I'm not sure what you're seeing. I'm using 2003, so there could be version differences I'm not aware of. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 12:36 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Slider Bar on Combo Box Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Mon Oct 13 16:02:45 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Mon, 13 Oct 2008 14:02:45 -0700 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: Charlotte: Yeah - plain access combo box (Access 2003 BTW). Scrollbar is what I meant. The list scrolls if I use the scroll wheel on the mouse, but if I drag the scroll bar up and down the list doesn't move. :( Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, October 13, 2008 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Slider Bar on Combo Box Are you talking about a plain Access combo? By slider bar, I assume you mean the scrollbar that defaults to the right side of the dropdown list in the combo, right? If I have more rows in a combobox than are allowed by the listrows property then I see a scrollbar with a thumb, and scrolling behave just as you described for forms. There isn't any setting I've ever found to change that, so I'm not sure what you're seeing. I'm using 2003, so there could be version differences I'm not aware of. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 12:36 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Slider Bar on Combo Box Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 13 16:19:26 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 13 Oct 2008 14:19:26 -0700 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: All I can say is that it works on my machine with A2003. I never use the scroll wheel for stuff like that so I never tried that. Are you using any kind of special software for the scrollwheel? I know people were installing things to make it work in the IDE, so I wonder if something like that could be getting in the way. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 2:03 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Slider Bar on Combo Box Charlotte: Yeah - plain access combo box (Access 2003 BTW). Scrollbar is what I meant. The list scrolls if I use the scroll wheel on the mouse, but if I drag the scroll bar up and down the list doesn't move. :( Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Monday, October 13, 2008 12:53 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Slider Bar on Combo Box Are you talking about a plain Access combo? By slider bar, I assume you mean the scrollbar that defaults to the right side of the dropdown list in the combo, right? If I have more rows in a combobox than are allowed by the listrows property then I see a scrollbar with a thumb, and scrolling behave just as you described for forms. There isn't any setting I've ever found to change that, so I'm not sure what you're seeing. I'm using 2003, so there could be version differences I'm not aware of. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 12:36 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Slider Bar on Combo Box Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 13 16:40:57 2008 From: dwaters at usinternet.com (Dan Waters) Date: Mon, 13 Oct 2008 16:40:57 -0500 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: <1B205F53D38646429B2DC9AC43258D58@HAL9005> References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: <1ABC2EBEF3FE4BD9944A6A3D91BD277E@danwaters> Hi Rocky, I'm using Intellipoint 6.2. This let's me use the mousewheel in the code window (6.1 did not). And, I can move up and down in a combobox using either the wheel or the slider bar. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 2:36 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Slider Bar on Combo Box Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Mon Oct 13 22:28:51 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Mon, 13 Oct 2008 20:28:51 -0700 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: <1ABC2EBEF3FE4BD9944A6A3D91BD277E@danwaters> References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> <1ABC2EBEF3FE4BD9944A6A3D91BD277E@danwaters> Message-ID: Dan: Mouse wheel works for me in the code window and also in the combo box. But the scroll bar on the combo box does not. Rocky Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Monday, October 13, 2008 2:41 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Slider Bar on Combo Box Hi Rocky, I'm using Intellipoint 6.2. This let's me use the mousewheel in the code window (6.1 did not). And, I can move up and down in a combobox using either the wheel or the slider bar. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Monday, October 13, 2008 2:36 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Slider Bar on Combo Box Dear List: When I move the vertical slider bar on a bound continuous form the rows move in the opposite direction. (Good) Can I get the same behavior in a combo box? None of my combo box rows move when I move the slider bar. Some setting or property that I don't know about? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From edzedz at comcast.net Tue Oct 14 00:01:31 2008 From: edzedz at comcast.net (Edward S Zuris) Date: Mon, 13 Oct 2008 22:01:31 -0700 Subject: [AccessD] Mouse Wheel Scrolling in the Code Window In-Reply-To: <48BE072D.7020007@cyberone.com.au> Message-ID: <003e01c92db9$ed6e7a90$64dea8c0@dudley1> I have tried using Intellipoint 6.2 and 6.3 to use the scroll wheel on a IntelliMouse Optical, 1.1a USB, but am unable to scroll through the VBA code window. Thus, I am thinking of trying Logitech mouse drivers. Which Logitech mouse drivers should I download ? Thanks. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Fitzpatrick Sent: Tuesday, September 02, 2008 8:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Another option is Logitech mouse drivers. I have found that they have allowed scrolling in the VBE windows for several years now. Cheers Bryan Darryl Collins wrote: > I suggest you install freewheel. It is free, been around for ever and works very well. MS also have a fix, but you need to jump thru a few hoops and have admin rights as well. Freewheel you don't. > > http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel > > hth > > Darryl > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, 2 September 2008 11:43 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Mouse Wheel Scrolling in the Code Window > > > A couple of weeks ago I found out that the latest version of IntelliType Pro > (6.2) does support mouse wheel scrolling in the code window for Access 2003. > IntelliType Pro 6.1 did NOT support mouse wheel scrolling. > > IntelliType Pro 6.2 can be downloaded from multiple sites. > > Dan > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Mon Oct 13 23:06:44 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Tue, 14 Oct 2008 15:06:44 +1100 Subject: [AccessD] Mouse Wheel Scrolling in the Code Window In-Reply-To: <003e01c92db9$ed6e7a90$64dea8c0@dudley1> Message-ID: <57E6E6CA42105A48B977303A2CDC2720076F2C4FE1@WPEXCH22.retail.ad.cmltd.net.au> Use Freewheel. Painless and works without question - oh free too... http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Edward S Zuris Sent: Tuesday, 14 October 2008 4:02 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window I have tried using Intellipoint 6.2 and 6.3 to use the scroll wheel on a IntelliMouse Optical, 1.1a USB, but am unable to scroll through the VBA code window. Thus, I am thinking of trying Logitech mouse drivers. Which Logitech mouse drivers should I download ? Thanks. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Fitzpatrick Sent: Tuesday, September 02, 2008 8:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Another option is Logitech mouse drivers. I have found that they have allowed scrolling in the VBE windows for several years now. Cheers Bryan Darryl Collins wrote: > I suggest you install freewheel. It is free, been around for ever and works very well. MS also have a fix, but you need to jump thru a few hoops and have admin rights as well. Freewheel you don't. > > http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel > > hth > > Darryl > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, 2 September 2008 11:43 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Mouse Wheel Scrolling in the Code Window > > > A couple of weeks ago I found out that the latest version of IntelliType Pro > (6.2) does support mouse wheel scrolling in the code window for Access 2003. > IntelliType Pro 6.1 did NOT support mouse wheel scrolling. > > IntelliType Pro 6.2 can be downloaded from multiple sites. > > Dan > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From edzedz at comcast.net Tue Oct 14 11:04:18 2008 From: edzedz at comcast.net (Edward S Zuris) Date: Tue, 14 Oct 2008 09:04:18 -0700 Subject: [AccessD] Mouse Wheel Scrolling in the Code Window In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720076F2C4FE1@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <004401c92e16$83f6fd50$64dea8c0@dudley1> Yes it does work. Method One of -> http://support.microsoft.com/kb/837910 and free wheel seems to have a lot in common. Remember to merge its Registry file, And from a Ms-Dos window to do -> regsvr32 VB6IDEMouseWheelAddin.dll from whatever folder you decide to keep the DLL. Thanks for the help. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darryl Collins Sent: Monday, October 13, 2008 9:07 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Use Freewheel. Painless and works without question - oh free too... http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Edward S Zuris Sent: Tuesday, 14 October 2008 4:02 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window I have tried using Intellipoint 6.2 and 6.3 to use the scroll wheel on a IntelliMouse Optical, 1.1a USB, but am unable to scroll through the VBA code window. Thus, I am thinking of trying Logitech mouse drivers. Which Logitech mouse drivers should I download ? Thanks. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Fitzpatrick Sent: Tuesday, September 02, 2008 8:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Another option is Logitech mouse drivers. I have found that they have allowed scrolling in the VBE windows for several years now. Cheers Bryan Darryl Collins wrote: > I suggest you install freewheel. It is free, been around for ever and works very well. MS also have a fix, but you need to jump thru a few hoops and have admin rights as well. Freewheel you don't. > > http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel > > hth > > Darryl > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, 2 September 2008 11:43 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Mouse Wheel Scrolling in the Code Window > > > A couple of weeks ago I found out that the latest version of IntelliType Pro > (6.2) does support mouse wheel scrolling in the code window for Access 2003. > IntelliType Pro 6.1 did NOT support mouse wheel scrolling. > > IntelliType Pro 6.2 can be downloaded from multiple sites. > > Dan > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- 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 Oct 14 10:16:38 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 14 Oct 2008 16:16:38 +0100 Subject: [AccessD] CSV and currency symbols Message-ID: <200810141517.m9EFGw1C003345@databaseadvisors.com> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From markamatte at hotmail.com Tue Oct 14 10:41:17 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 14 Oct 2008 15:41:17 +0000 Subject: [AccessD] print via check boxes.. Message-ID: Kostas, Ok....way out of the box...and I'm hoping for some criticism from some of the more experienced here. I didn't really care for the table design in this...but here we go. I created 2 tables: tblJobs with 6 fields: Name, Billiards Pro,Doctor,Engineer,Analyst,Inventor the last 5 fields are your check boxes. tblJobTitle with 1 field: JobTitle this table has 5 records...1 for each of your check boxes...the values in the field are the exact names of the check boxes: Billiards Pro,Doctor,Engineer,Analyst,Inventor I then created a function: Function MyJob(MJ, MM) Dim MyLookup MyLookup = DLookup("[" & MJ & "]", "tblJobs", "name ='" & MM & "'") MyJob = MyLookup End Function Then use a cartesian join and call the above function passing the name and jobtitle to the function. *********SQL************* SELECT tblJobs.Name, IIf(myjob([jobtitle],[name])=-1,[jobtitle],"") AS Jobs FROM tblJobs, tblJobTitle WHERE (((IIf(myjob([jobtitle],[name])=-1,[jobtitle],""))<>"")) ORDER BY IIf(myjob([jobtitle],[name])=-1,[jobtitle],""); *********SQL************* I don't know that this is the 'correct'/'cleanest' approach...but it does give the results you described. I hope for comments on this one...seems like it would be a usable technique if cleaned up...but rarely needed. Thanks, Mark A. Matte > From: kost36 at otenet.gr > To: accessd at databaseadvisors.com > Date: Mon, 13 Oct 2008 22:33:21 +0300 > Subject: Re: [AccessD] print via check boxes.. > > Mark, > all the project is based on just one table > with (except names, addresses, phones etc) > 10 different check boxes like > 1. journalist > 2. Technician > 3. Actor > 4. Doctor etc.. etc > > e.g Kostas may be working both as a jurnalist and a technician too > so when I ask for a list with journalists Kostas must inclouded there > and the he same when I want to ask for a list with technicians, too > Hope that was more understandable > > thank's > /kostas > > > > > ----- Original Message ----- > From: "Mark A Matte" > To: "Access Developers discussion and problem solving" > > Sent: Monday, October 13, 2008 10:05 PM > Subject: Re: [AccessD] print via check boxes.. > > >> >> Kostas, >> >> I think I understand the question...but not sure... >> >> When you are selecting these jobs on the form...does it store 1 record per >> job...or 1 record with the jobs in different fields. If you could give a >> small example of how the data is in the table...I think the answer is >> close. >> >> Thanks, >> >> Mark A. Matte >> >> >>> From: kost36 at otenet.gr >>> To: accessd at databaseadvisors.com >>> Date: Mon, 13 Oct 2008 20:24:19 +0300 >>> Subject: [AccessD] print via check boxes.. >>> >>> Hi group, >>> >>> I use a simple form, keeping for a small club >>> various demographical data . >>> >>> The point is 10 check boxes inclouding into the same form >>> something means 10 different jobs category. >>> So, is it possible to need to check more than one or two >>> check boxes for the same record >>> >>> What I need is to make a report which will print lists >>> depending of the checked boxes so the person's name with two >>> or three different jobs to be able to appear in every separated list >>> >>> many thank's >>> /kostas >>> -- >>> AccessD mailing list >>> AccessD at databaseadvisors.com >>> http://databaseadvisors.com/mailman/listinfo/accessd >>> Website: http://www.databaseadvisors.com >> >> _________________________________________________________________ >> Get more out of the Web. Learn 10 hidden secrets of Windows Live. >> http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Want to do more with Windows Live? Learn ?10 hidden secrets? from Jamie. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 From Gustav at cactus.dk Tue Oct 14 10:48:46 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Tue, 14 Oct 2008 17:48:46 +0200 Subject: [AccessD] CSV and currency symbols Message-ID: Hi Andy One method is to save the amounts * 100 as integers and divide by 100 when reading. Many mainframe systems do this. Another is to take control in your code and always save with dot as decimal separator and assume that as well when reading. This is very easy to perform: Use LTrim(Str(curAmount)) for writing the string and Val(strAmount) for reading. /gustav >>> andy at minstersystems.co.uk 14-10-2008 17:16:38 >>> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk From markamatte at hotmail.com Tue Oct 14 10:52:28 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 14 Oct 2008 15:52:28 +0000 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: <1B205F53D38646429B2DC9AC43258D58@HAL9005> References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: Rocky, Don't think it is related...but I have been having issues with the database window after running some queries. I will close the query...say the database window is showing queries. I can tab through the queries...but the scroll bars do not work and I cannot click on another query. I can click on another tab then back to queries and everything works fine. Again, not related...just access acting funny. mark > From: rockysmolin at bchacc.com > To: accessd at databaseadvisors.com > Date: Mon, 13 Oct 2008 12:35:36 -0700 > Subject: [AccessD] Slider Bar on Combo Box > > Dear List: > > When I move the vertical slider bar on a bound continuous form the rows move > in the opposite direction. (Good) Can I get the same behavior in a combo > box? None of my combo box rows move when I move the slider bar. Some > setting or property that I don't know about? > > MTIA > > > > > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ See how Windows Mobile brings your life together?at home, work, or on the go. http://clk.atdmt.com/MRT/go/msnnkwxp1020093182mrt/direct/01/ From andy at minstersystems.co.uk Tue Oct 14 11:03:03 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 14 Oct 2008 17:03:03 +0100 Subject: [AccessD] CSV and currency symbols Message-ID: <200810141603.m9EG38KG032513@databaseadvisors.com> Hi Gustav, thanks as always for your input The CSV files are coming from a variety of systems. They are finacial reports from accounting systems at multiple sites, and different sites have different accounting systems. They're also packages so the sites generating the reports have limited flexibility. They can choose the package's "Output to CSV" option but generally not much more. So I have to handle this in my Access stuff that is going to receive the data and analyse it. Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "accessd at databaseadvisors.com" Subject: Re: [AccessD] CSV and currency symbols Date: 14/10/08 15:52 Hi Andy One method is to save the amounts * 100 as integers and divide by 100 when reading. Many mainframe systems do this. Another is to take control in your code and always save with dot as decimal separator and assume that as well when reading. This is very easy to perform: Use LTrim(Str(curAmount)) for writing the string and Val(strAmount) for reading. /gustav >>> andy at minstersystems.co.uk 14-10-2008 17:16:38 >>> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk -- 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 dwaters at usinternet.com Tue Oct 14 11:23:22 2008 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 14 Oct 2008 11:23:22 -0500 Subject: [AccessD] Find Text In Code Programmatically Message-ID: Maybe I'm off the edge here, but I was wondering if there is a way to enter a string into a text box on a form, push a button, and have the string I typed in found in the code? For example, I could have a list of bugs or tasks uniquely numbered. I've already typed Bug27 as a comment into code somewhere. When I push a button in the list next to Bug27 the string Bug27 is then found in code. Possible? Thanks! Dan From rockysmolin at bchacc.com Tue Oct 14 11:33:00 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Tue, 14 Oct 2008 09:33:00 -0700 Subject: [AccessD] Find Text In Code Programmatically In-Reply-To: References: Message-ID: <1538AA33371C4130B8C464A9D5478AD3@HAL9005> I do a search through the entire project using the edit. Edit-->Find click Current Project in Search options. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Tuesday, October 14, 2008 9:23 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Find Text In Code Programmatically Maybe I'm off the edge here, but I was wondering if there is a way to enter a string into a text box on a form, push a button, and have the string I typed in found in the code? For example, I could have a list of bugs or tasks uniquely numbered. I've already typed Bug27 as a comment into code somewhere. When I push a button in the list next to Bug27 the string Bug27 is then found in code. Possible? Thanks! Dan -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Oct 14 11:40:02 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 14 Oct 2008 09:40:02 -0700 Subject: [AccessD] Slider Bar on Combo Box In-Reply-To: References: <1B205F53D38646429B2DC9AC43258D58@HAL9005> Message-ID: We've been seing that for quite a while in our Access databases. Seems to have crept in with 2003. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, October 14, 2008 8:52 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Slider Bar on Combo Box Rocky, Don't think it is related...but I have been having issues with the database window after running some queries. I will close the query...say the database window is showing queries. I can tab through the queries...but the scroll bars do not work and I cannot click on another query. I can click on another tab then back to queries and everything works fine. Again, not related...just access acting funny. mark > From: rockysmolin at bchacc.com > To: accessd at databaseadvisors.com > Date: Mon, 13 Oct 2008 12:35:36 -0700 > Subject: [AccessD] Slider Bar on Combo Box > > Dear List: > > When I move the vertical slider bar on a bound continuous form the > rows move in the opposite direction. (Good) Can I get the same > behavior in a combo box? None of my combo box rows move when I move > the slider bar. Some setting or property that I don't know about? > > MTIA > > > > > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ See how Windows Mobile brings your life together-at home, work, or on the go. http://clk.atdmt.com/MRT/go/msnnkwxp1020093182mrt/direct/01/ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Oct 14 11:41:27 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 14 Oct 2008 09:41:27 -0700 Subject: [AccessD] Find Text In Code Programmatically In-Reply-To: References: Message-ID: Try MZ-Tools. You can not only find the string but clicking on the link will take you to it and you can do a replace either on all locations or the selected on as well. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Tuesday, October 14, 2008 9:23 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Find Text In Code Programmatically Maybe I'm off the edge here, but I was wondering if there is a way to enter a string into a text box on a form, push a button, and have the string I typed in found in the code? For example, I could have a list of bugs or tasks uniquely numbered. I've already typed Bug27 as a comment into code somewhere. When I push a button in the list next to Bug27 the string Bug27 is then found in code. Possible? Thanks! Dan -- 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 Oct 14 12:04:58 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 14 Oct 2008 18:04:58 +0100 Subject: [AccessD] Find Text In Code Programmatically In-Reply-To: Message-ID: <1693CB30536944A29CCD209AC405CD95@MINSTER> Hi Dan I have something like this I've home-cooked. You type up to 10 strings and it looks for them in code plus forms, reports, queries etc. I don't have it here at home with me but if you;'re interested I can sort it out tomorrow and sent it to you. Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: 14 October 2008 17:23 To: 'Access Developers discussion and problem solving' Subject: [AccessD] Find Text In Code Programmatically Maybe I'm off the edge here, but I was wondering if there is a way to enter a string into a text box on a form, push a button, and have the string I typed in found in the code? For example, I could have a list of bugs or tasks uniquely numbered. I've already typed Bug27 as a comment into code somewhere. When I push a button in the list next to Bug27 the string Bug27 is then found in code. Possible? Thanks! Dan -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Tue Oct 14 12:25:58 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 14 Oct 2008 17:25:58 +0000 Subject: [AccessD] Find Text In Code Programmatically In-Reply-To: References: Message-ID: I started a thread very similar to this about 7 months ago...I don't remember the subject...but I wanted to do something similar. I have a MDB I work on every few months adding features...It will search docs for text...it will search your computer/folder for all access databases...and store them in a table with size, location, dates. Another version will list all objects in each database. Also it will use the list of MDBs it found and search the modules(forms and reports included) for a text string. It has some issues with databases that have passwords...but typically gets what I need. I don't have a finished product to send out...but here is the code I use to search the VBA of other MDBs...most of this was gleaned from the web in different pieces...alot is commented out...and not really documented. Hope it helps, Mark A. Matte ****************CODE************************* Public Function ProcessExtModules(DB_Path As String) On Error GoTo ByPassError NoAccess = 0 Dim acc As Access.Application MyMDB_Path = DB_Path Set acc = New Access.Application Set acc = fGetRefNoAutoexec(DB_Path) 'acc.OpenCurrentDatabase (DB_Path) If NoAccess = 1 Then GoTo Skip ProcessModules acc 'AddDAO acc acc.CloseCurrentDatabase acc.Quit acQuitSaveNone Exit Function Skip: DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & DB_Path & "', 'No Access', 'none';") Set acc = Nothing Exit Function ByPassError: End Function Public Function ProcessModules( _ ByRef rapp As Access.Application) On Error GoTo ShiftBypassError Dim oVBE As Object Dim mdl As Object Dim blnFound As Boolean Dim StartLine As Long Dim StartColumn As Long Dim EndLine As Long Dim EndColumn As Long 'Dim MyMDB Dim S_Text As String S_Text = Me!txtSearch 'MyMDB = rapp.VBE.ActiveVBProject.FileName 'To make life easier and lines shorter. Set oVBE = rapp.VBE.ActiveVBProject.VBComponents 'Dim s As String 's = "" 'Check each module ... For Each mdl In oVBE '***************** StartLine = 1 StartColumn = 1 EndLine = oVBE(mdl.Name).CodeModule.CountOfLines EndColumn = 60 'MsgBox mdl.Name blnFound = oVBE(mdl.Name).CodeModule.Find(S_Text, StartLine, StartColumn, EndLine, EndColumn) 'if it is found. ... Dim nn nn = mdl.Name If blnFound = True Then Debug.Print oVBE(mdl.Name).CodeModule 'MsgBox oVBE(mdl.Name).CodeModule & " Found it" DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & MyMDB_Path & "', '" & S_Text & "', '" & mdl.Name & "';") End If '************** 'If Len(s)> 0 Then s = s + vbCrLf 'for the required procedure ... 'Debug.Print oVBE(mdl.Name).CodeModule 's = s + oVBE(mdl.Name).CodeModule Next Exit Function ShiftBypassError: DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & MyMDB_Path & "', 'ByPassError', 'none';") 'Debug.Print s 'MsgBox s End Function ****************CODE************************* > From: dwaters at usinternet.com > To: accessd at databaseadvisors.com > Date: Tue, 14 Oct 2008 11:23:22 -0500 > Subject: [AccessD] Find Text In Code Programmatically > > Maybe I'm off the edge here, but I was wondering if there is a way to enter > a string into a text box on a form, push a button, and have the string I > typed in found in the code? > > For example, I could have a list of bugs or tasks uniquely numbered. I've > already typed Bug27 as a comment into code somewhere. When I push a button > in the list next to Bug27 the string Bug27 is then found in code. > > Possible? > > Thanks! > Dan > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ See how Windows connects the people, information, and fun that are part of your life. http://clk.atdmt.com/MRT/go/msnnkwxp1020093175mrt/direct/01/ From dwaters at usinternet.com Tue Oct 14 12:44:00 2008 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 14 Oct 2008 12:44:00 -0500 Subject: [AccessD] Find Text In Code Programmatically In-Reply-To: References: Message-ID: Thanks Mark - this looks interesting! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, October 14, 2008 12:26 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Find Text In Code Programmatically I started a thread very similar to this about 7 months ago...I don't remember the subject...but I wanted to do something similar. I have a MDB I work on every few months adding features...It will search docs for text...it will search your computer/folder for all access databases...and store them in a table with size, location, dates. Another version will list all objects in each database. Also it will use the list of MDBs it found and search the modules(forms and reports included) for a text string. It has some issues with databases that have passwords...but typically gets what I need. I don't have a finished product to send out...but here is the code I use to search the VBA of other MDBs...most of this was gleaned from the web in different pieces...alot is commented out...and not really documented. Hope it helps, Mark A. Matte ****************CODE************************* Public Function ProcessExtModules(DB_Path As String) On Error GoTo ByPassError NoAccess = 0 Dim acc As Access.Application MyMDB_Path = DB_Path Set acc = New Access.Application Set acc = fGetRefNoAutoexec(DB_Path) 'acc.OpenCurrentDatabase (DB_Path) If NoAccess = 1 Then GoTo Skip ProcessModules acc 'AddDAO acc acc.CloseCurrentDatabase acc.Quit acQuitSaveNone Exit Function Skip: DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & DB_Path & "', 'No Access', 'none';") Set acc = Nothing Exit Function ByPassError: End Function Public Function ProcessModules( _ ByRef rapp As Access.Application) On Error GoTo ShiftBypassError Dim oVBE As Object Dim mdl As Object Dim blnFound As Boolean Dim StartLine As Long Dim StartColumn As Long Dim EndLine As Long Dim EndColumn As Long 'Dim MyMDB Dim S_Text As String S_Text = Me!txtSearch 'MyMDB = rapp.VBE.ActiveVBProject.FileName 'To make life easier and lines shorter. Set oVBE = rapp.VBE.ActiveVBProject.VBComponents 'Dim s As String 's = "" 'Check each module ... For Each mdl In oVBE '***************** StartLine = 1 StartColumn = 1 EndLine = oVBE(mdl.Name).CodeModule.CountOfLines EndColumn = 60 'MsgBox mdl.Name blnFound = oVBE(mdl.Name).CodeModule.Find(S_Text, StartLine, StartColumn, EndLine, EndColumn) 'if it is found. ... Dim nn nn = mdl.Name If blnFound = True Then Debug.Print oVBE(mdl.Name).CodeModule 'MsgBox oVBE(mdl.Name).CodeModule & " Found it" DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & MyMDB_Path & "', '" & S_Text & "', '" & mdl.Name & "';") End If '************** 'If Len(s)> 0 Then s = s + vbCrLf 'for the required procedure ... 'Debug.Print oVBE(mdl.Name).CodeModule 's = s + oVBE(mdl.Name).CodeModule Next Exit Function ShiftBypassError: DoCmd.RunSQL ("INSERT INTO tblTextFound ( fullMDBCoord, TextFound, [Module] )SELECT '" & MyMDB_Path & "', 'ByPassError', 'none';") 'Debug.Print s 'MsgBox s End Function ****************CODE************************* > From: dwaters at usinternet.com > To: accessd at databaseadvisors.com > Date: Tue, 14 Oct 2008 11:23:22 -0500 > Subject: [AccessD] Find Text In Code Programmatically > > Maybe I'm off the edge here, but I was wondering if there is a way to enter > a string into a text box on a form, push a button, and have the string I > typed in found in the code? > > For example, I could have a list of bugs or tasks uniquely numbered. I've > already typed Bug27 as a comment into code somewhere. When I push a button > in the list next to Bug27 the string Bug27 is then found in code. > > Possible? > > Thanks! > Dan > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ See how Windows connects the people, information, and fun that are part of your life. http://clk.atdmt.com/MRT/go/msnnkwxp1020093175mrt/direct/01/ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kost36 at otenet.gr Tue Oct 14 13:18:34 2008 From: kost36 at otenet.gr (Kostas Konstantinidis) Date: Tue, 14 Oct 2008 21:18:34 +0300 Subject: [AccessD] print via check boxes.. In-Reply-To: References: Message-ID: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Hi Mark, yes it realy works many many thank's /kostas ----- Original Message ----- From: "Mark A Matte" To: "Access Developers discussion and problem solving" Sent: Tuesday, October 14, 2008 6:41 PM Subject: Re: [AccessD] print via check boxes.. > > Kostas, > > Ok....way out of the box...and I'm hoping for some criticism from some of > the more experienced here. > > I didn't really care for the table design in this...but here we go. > > I created 2 tables: > > tblJobs with 6 fields: Name, Billiards > Pro,Doctor,Engineer,Analyst,Inventor > the last 5 fields are your check boxes. > > tblJobTitle with 1 field: JobTitle > this table has 5 records...1 for each of your check boxes...the values in > the field are the exact names of the check boxes: Billiards > Pro,Doctor,Engineer,Analyst,Inventor > > I then created a function: > > Function MyJob(MJ, MM) > Dim MyLookup > MyLookup = DLookup("[" & MJ & "]", "tblJobs", "name ='" & MM & "'") > MyJob = MyLookup > End Function > > Then use a cartesian join and call the above function passing the name and > jobtitle to the function. > > > *********SQL************* > SELECT tblJobs.Name, IIf(myjob([jobtitle],[name])=-1,[jobtitle],"") AS > Jobs > FROM tblJobs, tblJobTitle > WHERE (((IIf(myjob([jobtitle],[name])=-1,[jobtitle],""))<>"")) > ORDER BY IIf(myjob([jobtitle],[name])=-1,[jobtitle],""); > *********SQL************* > > > I don't know that this is the 'correct'/'cleanest' approach...but it does > give the results you described. > > I hope for comments on this one...seems like it would be a usable > technique if cleaned up...but rarely needed. > > Thanks, > > Mark A. Matte > > > >> From: kost36 at otenet.gr >> To: accessd at databaseadvisors.com >> Date: Mon, 13 Oct 2008 22:33:21 +0300 >> Subject: Re: [AccessD] print via check boxes.. >> >> Mark, >> all the project is based on just one table >> with (except names, addresses, phones etc) >> 10 different check boxes like >> 1. journalist >> 2. Technician >> 3. Actor >> 4. Doctor etc.. etc >> >> e.g Kostas may be working both as a jurnalist and a technician too >> so when I ask for a list with journalists Kostas must inclouded there >> and the he same when I want to ask for a list with technicians, too >> Hope that was more understandable >> >> thank's >> /kostas >> >> >> >> >> ----- Original Message ----- >> From: "Mark A Matte" >> To: "Access Developers discussion and problem solving" >> >> Sent: Monday, October 13, 2008 10:05 PM >> Subject: Re: [AccessD] print via check boxes.. >> >> >>> >>> Kostas, >>> >>> I think I understand the question...but not sure... >>> >>> When you are selecting these jobs on the form...does it store 1 record >>> per >>> job...or 1 record with the jobs in different fields. If you could give a >>> small example of how the data is in the table...I think the answer is >>> close. >>> >>> Thanks, >>> >>> Mark A. Matte >>> >>> >>>> From: kost36 at otenet.gr >>>> To: accessd at databaseadvisors.com >>>> Date: Mon, 13 Oct 2008 20:24:19 +0300 >>>> Subject: [AccessD] print via check boxes.. >>>> >>>> Hi group, >>>> >>>> I use a simple form, keeping for a small club >>>> various demographical data . >>>> >>>> The point is 10 check boxes inclouding into the same form >>>> something means 10 different jobs category. >>>> So, is it possible to need to check more than one or two >>>> check boxes for the same record >>>> >>>> What I need is to make a report which will print lists >>>> depending of the checked boxes so the person's name with two >>>> or three different jobs to be able to appear in every separated list >>>> >>>> many thank's >>>> /kostas >>>> -- >>>> AccessD mailing list >>>> AccessD at databaseadvisors.com >>>> http://databaseadvisors.com/mailman/listinfo/accessd >>>> Website: http://www.databaseadvisors.com >>> >>> _________________________________________________________________ >>> Get more out of the Web. Learn 10 hidden secrets of Windows Live. >>> http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 >>> -- >>> AccessD mailing list >>> AccessD at databaseadvisors.com >>> http://databaseadvisors.com/mailman/listinfo/accessd >>> Website: http://www.databaseadvisors.com >>> >> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Want to do more with Windows Live? Learn ?10 hidden secrets? from Jamie. > http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From markamatte at hotmail.com Tue Oct 14 13:40:30 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 14 Oct 2008 18:40:30 +0000 Subject: [AccessD] Charts and Executives... In-Reply-To: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Message-ID: Hello All, I have just recently( and temporarilly I hope) had a report dropped in my lap that goes to the world and everyone...and the execs in that list are quite comfortable with how things look and don't want alot of change. That being said...it is a powerpoint presentation...it has about 15 graphs. Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work with power point that much)...this would explain why the file is so large. Anyway...these graphs are all populated from a copy of the same datasource...just filtered. Apparently the person doing this prior would go to each graph and past the new data and refresh a pivot. This data is a year over year comparison. I was thinking of bringing it into access...but how would I take a graph out of access and put it into excel or powerpoint? Any ideas? Thanks, Mark A. Matte _________________________________________________________________ Want to do more with Windows Live? Learn ?10 hidden secrets? from Jamie. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 From dwaters at usinternet.com Tue Oct 14 14:29:52 2008 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 14 Oct 2008 14:29:52 -0500 Subject: [AccessD] Charts and Executives... In-Reply-To: References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Message-ID: Hi Mark, You can do almost anything with MS Graph that you can with Access. That being said, you can make a set of charts in a single report that will look almost exactly like the original powerpoint presentation. MS Graph works in reports (or forms). Create a new report and add an unbound frame. The wizard will ask you what you want to put in it - select MS Graph (or you could select Excel chart also). Now you can work with the properties of the charts and a query as the datasource for the charts to get what you need. You can put multiple smaller charts on one page or just one chart per page. I've made some nice looking charts - the real trick is to get the datasource to give you that data you're looking for. Good Luck! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, October 14, 2008 1:41 PM To: Access Developers discussion and problem solving Subject: [AccessD] Charts and Executives... Hello All, I have just recently( and temporarilly I hope) had a report dropped in my lap that goes to the world and everyone...and the execs in that list are quite comfortable with how things look and don't want alot of change. That being said...it is a powerpoint presentation...it has about 15 graphs. Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work with power point that much)...this would explain why the file is so large. Anyway...these graphs are all populated from a copy of the same datasource...just filtered. Apparently the person doing this prior would go to each graph and past the new data and refresh a pivot. This data is a year over year comparison. I was thinking of bringing it into access...but how would I take a graph out of access and put it into excel or powerpoint? Any ideas? Thanks, Mark A. Matte _________________________________________________________________ Want to do more with Windows Live? Learn "10 hidden secrets" from Jamie. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!55 0F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dw-murphy at cox.net Tue Oct 14 14:34:04 2008 From: dw-murphy at cox.net (Doug Murphy) Date: Tue, 14 Oct 2008 12:34:04 -0700 Subject: [AccessD] Charts and Executives... In-Reply-To: References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Message-ID: <005401c92e33$d1795790$0200a8c0@murphy3234aaf1> Hi Mark, We recently had a presentation at our user group, San Diego Access User Group, on this very subject. Take a look at http://www.augsd.org/sampleapps/PwrPtChart.zip . This might give you some ideas. Hellen Feddema's (http://www.helenfeddema.com/) site might also offer some methods. Doug -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, October 14, 2008 11:41 AM To: Access Developers discussion and problem solving Subject: [AccessD] Charts and Executives... Hello All, I have just recently( and temporarilly I hope) had a report dropped in my lap that goes to the world and everyone...and the execs in that list are quite comfortable with how things look and don't want alot of change. That being said...it is a powerpoint presentation...it has about 15 graphs. Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work with power point that much)...this would explain why the file is so large. Anyway...these graphs are all populated from a copy of the same datasource...just filtered. Apparently the person doing this prior would go to each graph and past the new data and refresh a pivot. This data is a year over year comparison. I was thinking of bringing it into access...but how would I take a graph out of access and put it into excel or powerpoint? Any ideas? Thanks, Mark A. Matte _________________________________________________________________ Want to do more with Windows Live? Learn "10 hidden secrets" from Jamie. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!55 0F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Oct 14 14:38:52 2008 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 14 Oct 2008 21:38:52 +0200 Subject: [AccessD] CSV and currency symbols Message-ID: Hi Andy Then you'll have to create some kind of profile for each source to define how to handle the import. The easiest method is to read each record into a string array and then - using the current profile - convert this to an interim format which you then can have a common routine to pass to your database table(s). /gustav >>> andy at minstersystems.co.uk 14-10-2008 18:03 >>> Hi Gustav, thanks as always for your input The CSV files are coming from a variety of systems. They are finacial reports from accounting systems at multiple sites, and different sites have different accounting systems. They're also packages so the sites generating the reports have limited flexibility. They can choose the package's "Output to CSV" option but generally not much more. So I have to handle this in my Access stuff that is going to receive the data and analyse it. Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "accessd at databaseadvisors.com" Subject: Re: [AccessD] CSV and currency symbols Date: 14/10/08 15:52 Hi Andy One method is to save the amounts * 100 as integers and divide by 100 when reading. Many mainframe systems do this. Another is to take control in your code and always save with dot as decimal separator and assume that as well when reading. This is very easy to perform: Use LTrim(Str(curAmount)) for writing the string and Val(strAmount) for reading. /gustav >>> andy at minstersystems.co.uk 14-10-2008 17:16:38 >>> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk From dwaters at usinternet.com Tue Oct 14 15:28:20 2008 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 14 Oct 2008 15:28:20 -0500 Subject: [AccessD] Charts and Executives... In-Reply-To: References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Message-ID: <30B8331472A2482696C735502E6D8CE6@danwaters> I meant: ....that you can do with Excel. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Tuesday, October 14, 2008 2:30 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Charts and Executives... Hi Mark, You can do almost anything with MS Graph that you can with Access. That being said, you can make a set of charts in a single report that will look almost exactly like the original powerpoint presentation. MS Graph works in reports (or forms). Create a new report and add an unbound frame. The wizard will ask you what you want to put in it - select MS Graph (or you could select Excel chart also). Now you can work with the properties of the charts and a query as the datasource for the charts to get what you need. You can put multiple smaller charts on one page or just one chart per page. I've made some nice looking charts - the real trick is to get the datasource to give you that data you're looking for. Good Luck! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, October 14, 2008 1:41 PM To: Access Developers discussion and problem solving Subject: [AccessD] Charts and Executives... Hello All, I have just recently( and temporarilly I hope) had a report dropped in my lap that goes to the world and everyone...and the execs in that list are quite comfortable with how things look and don't want alot of change. That being said...it is a powerpoint presentation...it has about 15 graphs. Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work with power point that much)...this would explain why the file is so large. Anyway...these graphs are all populated from a copy of the same datasource...just filtered. Apparently the person doing this prior would go to each graph and past the new data and refresh a pivot. This data is a year over year comparison. I was thinking of bringing it into access...but how would I take a graph out of access and put it into excel or powerpoint? Any ideas? Thanks, Mark A. Matte _________________________________________________________________ Want to do more with Windows Live? Learn "10 hidden secrets" from Jamie. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!55 0F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Tue Oct 14 15:31:58 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Wed, 15 Oct 2008 07:31:58 +1100 Subject: [AccessD] Mouse Wheel Scrolling in the Code Window In-Reply-To: <004401c92e16$83f6fd50$64dea8c0@dudley1> Message-ID: <57E6E6CA42105A48B977303A2CDC2720077342E0CE@WPEXCH22.retail.ad.cmltd.net.au> The reason I like freewheel is you can install it on PC's that are really tightly locked down. You don't need to stuff around with the registry at all, or even need admin rights. Very handy in a corporate environment. Just unzip it into your personal or network drive and off you go! :) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Edward S Zuris Sent: Wednesday, 15 October 2008 3:04 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Yes it does work. Method One of -> http://support.microsoft.com/kb/837910 and free wheel seems to have a lot in common. Remember to merge its Registry file, And from a Ms-Dos window to do -> regsvr32 VB6IDEMouseWheelAddin.dll from whatever folder you decide to keep the DLL. Thanks for the help. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darryl Collins Sent: Monday, October 13, 2008 9:07 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Use Freewheel. Painless and works without question - oh free too... http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Edward S Zuris Sent: Tuesday, 14 October 2008 4:02 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window I have tried using Intellipoint 6.2 and 6.3 to use the scroll wheel on a IntelliMouse Optical, 1.1a USB, but am unable to scroll through the VBA code window. Thus, I am thinking of trying Logitech mouse drivers. Which Logitech mouse drivers should I download ? Thanks. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bryan Fitzpatrick Sent: Tuesday, September 02, 2008 8:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Mouse Wheel Scrolling in the Code Window Another option is Logitech mouse drivers. I have found that they have allowed scrolling in the VBE windows for several years now. Cheers Bryan Darryl Collins wrote: > I suggest you install freewheel. It is free, been around for ever and works very well. MS also have a fix, but you need to jump thru a few hoops and have admin rights as well. Freewheel you don't. > > http://www.excelyourbusiness.com.au/VBE_Issues.htm#Mouse%20scroll%20wheel > > hth > > Darryl > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters > Sent: Tuesday, 2 September 2008 11:43 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Mouse Wheel Scrolling in the Code Window > > > A couple of weeks ago I found out that the latest version of IntelliType Pro > (6.2) does support mouse wheel scrolling in the code window for Access 2003. > IntelliType Pro 6.1 did NOT support mouse wheel scrolling. > > IntelliType Pro 6.2 can be downloaded from multiple sites. > > Dan > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From markamatte at hotmail.com Tue Oct 14 15:40:23 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 14 Oct 2008 20:40:23 +0000 Subject: [AccessD] Charts and Executives... In-Reply-To: <005401c92e33$d1795790$0200a8c0@murphy3234aaf1> References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> <005401c92e33$d1795790$0200a8c0@murphy3234aaf1> Message-ID: WOW...this is great...opens a whole new set of doors. Thanks, Mark > From: dw-murphy at cox.net > To: accessd at databaseadvisors.com > Date: Tue, 14 Oct 2008 12:34:04 -0700 > Subject: Re: [AccessD] Charts and Executives... > > Hi Mark, > > We recently had a presentation at our user group, San Diego Access User > Group, on this very subject. Take a look at > http://www.augsd.org/sampleapps/PwrPtChart.zip . This might give you some > ideas. Hellen Feddema's (http://www.helenfeddema.com/) site might also > offer some methods. > > Doug > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte > Sent: Tuesday, October 14, 2008 11:41 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Charts and Executives... > > > Hello All, > > I have just recently( and temporarilly I hope) had a report dropped in my > lap that goes to the world and everyone...and the execs in that list are > quite comfortable with how things look and don't want alot of change. > > That being said...it is a powerpoint presentation...it has about 15 graphs. > Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work > with power point that much)...this would explain why the file is so large. > Anyway...these graphs are all populated from a copy of the same > datasource...just filtered. Apparently the person doing this prior would go > to each graph and past the new data and refresh a pivot. This data is a > year over year comparison. I was thinking of bringing it into access...but > how would I take a graph out of access and put it into excel or powerpoint? > > Any ideas? > > Thanks, > > Mark A. Matte > _________________________________________________________________ > Want to do more with Windows Live? Learn "10 hidden secrets" from Jamie. > http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!55 > 0F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/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 more out of the Web. Learn 10 hidden secrets of Windows Live. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 From andy at minstersystems.co.uk Tue Oct 14 16:51:52 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 14 Oct 2008 22:51:52 +0100 Subject: [AccessD] CSV and currency symbols In-Reply-To: Message-ID: I agree. I was just being lazy and wondering if anyone had written the code, save me reinventing the wheel. Never mind, I'll just do it. Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 14 October 2008 20:39 To: accessd at databaseadvisors.com Subject: Re: [AccessD] CSV and currency symbols Hi Andy Then you'll have to create some kind of profile for each source to define how to handle the import. The easiest method is to read each record into a string array and then - using the current profile - convert this to an interim format which you then can have a common routine to pass to your database table(s). /gustav >>> andy at minstersystems.co.uk 14-10-2008 18:03 >>> Hi Gustav, thanks as always for your input The CSV files are coming from a variety of systems. They are finacial reports from accounting systems at multiple sites, and different sites have different accounting systems. They're also packages so the sites generating the reports have limited flexibility. They can choose the package's "Output to CSV" option but generally not much more. So I have to handle this in my Access stuff that is going to receive the data and analyse it. Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "accessd at databaseadvisors.com" Subject: Re: [AccessD] CSV and currency symbols Date: 14/10/08 15:52 Hi Andy One method is to save the amounts * 100 as integers and divide by 100 when reading. Many mainframe systems do this. Another is to take control in your code and always save with dot as decimal separator and assume that as well when reading. This is very easy to perform: Use LTrim(Str(curAmount)) for writing the string and Val(strAmount) for reading. /gustav >>> andy at minstersystems.co.uk 14-10-2008 17:16:38 >>> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Oct 14 17:01:07 2008 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 15 Oct 2008 00:01:07 +0200 Subject: [AccessD] CSV and currency symbols Message-ID: Hi Andy I think every solution is quite special. The one I have in mind was for writing upload files containing bank transfers to six (very) different Danish banking systems, some with start, end, and total records. I had to keep a tight structure to not go crazy with this mainframe stuff. You would be most welcome to get a copy, but you can hardly use it. /gustav >>> andy at minstersystems.co.uk 14-10-2008 23:51 >>> I agree. I was just being lazy and wondering if anyone had written the code, save me reinventing the wheel. Never mind, I'll just do it. Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 14 October 2008 20:39 To: accessd at databaseadvisors.com Subject: Re: [AccessD] CSV and currency symbols Hi Andy Then you'll have to create some kind of profile for each source to define how to handle the import. The easiest method is to read each record into a string array and then - using the current profile - convert this to an interim format which you then can have a common routine to pass to your database table(s). /gustav From Darryl.Collins at coles.com.au Tue Oct 14 18:37:34 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Wed, 15 Oct 2008 10:37:34 +1100 Subject: [AccessD] Charts and Executives... In-Reply-To: Message-ID: <57E6E6CA42105A48B977303A2CDC2720077342E0D1@WPEXCH22.retail.ad.cmltd.net.au> I also highly recommend Jon Peltier's site for all things wonderful and outrageous with charting... http://peltiertech.com/Excel/Charts/index.html cheers darryl. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, 15 October 2008 7:40 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Charts and Executives... WOW...this is great...opens a whole new set of doors. Thanks, Mark > From: dw-murphy at cox.net > To: accessd at databaseadvisors.com > Date: Tue, 14 Oct 2008 12:34:04 -0700 > Subject: Re: [AccessD] Charts and Executives... > > Hi Mark, > > We recently had a presentation at our user group, San Diego Access User > Group, on this very subject. Take a look at > http://www.augsd.org/sampleapps/PwrPtChart.zip . This might give you some > ideas. Hellen Feddema's (http://www.helenfeddema.com/) site might also > offer some methods. > > Doug > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte > Sent: Tuesday, October 14, 2008 11:41 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Charts and Executives... > > > Hello All, > > I have just recently( and temporarilly I hope) had a report dropped in my > lap that goes to the world and everyone...and the execs in that list are > quite comfortable with how things look and don't want alot of change. > > That being said...it is a powerpoint presentation...it has about 15 graphs. > Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work > with power point that much)...this would explain why the file is so large. > Anyway...these graphs are all populated from a copy of the same > datasource...just filtered. Apparently the person doing this prior would go > to each graph and past the new data and refresh a pivot. This data is a > year over year comparison. I was thinking of bringing it into access...but > how would I take a graph out of access and put it into excel or powerpoint? > > Any ideas? > > Thanks, > > Mark A. Matte > _________________________________________________________________ > Want to do more with Windows Live? Learn "10 hidden secrets" from Jamie. > http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!55 > 0F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/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 more out of the Web. Learn 10 hidden secrets of Windows Live. http://windowslive.com/connect/post/jamiethomson.spaces.live.com-Blog-cns!550F681DAD532637!5295.entry?ocid=TXT_TAGLM_WL_domore_092008 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From cfoust at infostatsystems.com Tue Oct 14 18:52:19 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 14 Oct 2008 16:52:19 -0700 Subject: [AccessD] CSV and currency symbols In-Reply-To: References: Message-ID: You may have trouble if the machines use different regional settings and currency is saved in the regional format. Some currency settings use a comma for the decimal delimiter and either a period or a space for the grouping delimiter. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Tuesday, October 14, 2008 2:52 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] CSV and currency symbols I agree. I was just being lazy and wondering if anyone had written the code, save me reinventing the wheel. Never mind, I'll just do it. Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 14 October 2008 20:39 To: accessd at databaseadvisors.com Subject: Re: [AccessD] CSV and currency symbols Hi Andy Then you'll have to create some kind of profile for each source to define how to handle the import. The easiest method is to read each record into a string array and then - using the current profile - convert this to an interim format which you then can have a common routine to pass to your database table(s). /gustav >>> andy at minstersystems.co.uk 14-10-2008 18:03 >>> Hi Gustav, thanks as always for your input The CSV files are coming from a variety of systems. They are finacial reports from accounting systems at multiple sites, and different sites have different accounting systems. They're also packages so the sites generating the reports have limited flexibility. They can choose the package's "Output to CSV" option but generally not much more. So I have to handle this in my Access stuff that is going to receive the data and analyse it. Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: "Access Developers discussion and problem solving" To: "accessd at databaseadvisors.com" Subject: Re: [AccessD] CSV and currency symbols Date: 14/10/08 15:52 Hi Andy One method is to save the amounts * 100 as integers and divide by 100 when reading. Many mainframe systems do this. Another is to take control in your code and always save with dot as decimal separator and assume that as well when reading. This is very easy to perform: Use LTrim(Str(curAmount)) for writing the string and Val(strAmount) for reading. /gustav >>> andy at minstersystems.co.uk 14-10-2008 17:16:38 >>> Hi to the internationalists Before I cook something up myself has anyone already done this? I'm writing a system that will be run in France but will take data produced in CSV files in the UK as wel as on the continent. This means that a CSV file produced in UK will output a number as, eg, 123.45 whereas one in France will write 123,45. So I guess I'll have to read everything into a text field and parse it to write out a number in whichever is the local format (France as I say, but who knows if someone may decide to run it in UK). Anyone handled this situation and have any useful bits & pieces? -- Andy Lacey http://www.minstersystems.co.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 airtelmail.in Tue Oct 14 23:06:30 2008 From: adtp at airtelmail.in (A.D.Tejpal) Date: Wed, 15 Oct 2008 09:36:30 +0530 Subject: [AccessD] Charts and Executives... References: <58CA446DDA4640E8A50A74C6A119DBCA@kost36PC> Message-ID: <013801c92e7b$826c98e0$2460a27a@personald6374f> Mark, My sample db named Charts_AccessAndExcel, might also be of interest to you. It is available at Rogers Access Library. Link: http://www.rogersaccesslibrary.com/forum/forum_topics.asp?FID=45 This sample db (access 2000 file format) covers a combination chart showing the readings for patient's blood pressure - systolic & diastolic as twin line series, along with pulse readings in column style. For ready appreciation, the same set of readings is displayed in two alternative modes, one as access native graph (on form as well as report) and the other as an Excel graph, dynamically created in Excel (based upon Access data) and then displayed on access form via OLE control. References: (a) Microsoft Excel Object library (version 9.0 or later) (b) Microsoft Scripting RunTime (c) Microsoft Graph - (Appropriate Version) (d) DAO 3.6 Note - Readme file AccessChartsGuideLines.htm, accompanying the sample db provides step by step guidelines for creating good quality charts in access. Best wishes, A.D. Tejpal ------------ ----- Original Message ----- From: Mark A Matte To: Access Developers discussion and problem solving Sent: Wednesday, October 15, 2008 00:10 Subject: [AccessD] Charts and Executives... Hello All, I have just recently( and temporarilly I hope) had a report dropped in my lap that goes to the world and everyone...and the execs in that list are quite comfortable with how things look and don't want alot of change. That being said...it is a powerpoint presentation...it has about 15 graphs. Each 1 apparrently has an Excel spreadsheet embedded in it?!?!?(I don't work with power point that much)...this would explain why the file is so large. Anyway...these graphs are all populated from a copy of the same datasource...just filtered. Apparently the person doing this prior would go to each graph and past the new data and refresh a pivot. This data is a year over year comparison. I was thinking of bringing it into access...but how would I take a graph out of access and put it into excel or powerpoint? Any ideas? Thanks, Mark A. Matte From paul.hartland at googlemail.com Wed Oct 15 02:50:02 2008 From: paul.hartland at googlemail.com (Paul Hartland) Date: Wed, 15 Oct 2008 08:50:02 +0100 Subject: [AccessD] Trace Deadlocks Using DBCC TRACEON (1204) Message-ID: <38c884770810150050j706ebd5x791a544763cc3294@mail.gmail.com> To all, We have started getting a couple of deadlocking issues every now and again, I have read that you can turn on a trace using DBCC TRACEON (1204) Can anyone tell me, where this command will put the results in a case of a deadlock being raised. Or has anyone any better ideas, of how I can find out the queries/views/SP's that are causing the deadlocks please. I have told each of our staff to report to me immediately if they get a deadlock issue, so then I want to look at a report or log to attempt to find out what is going on. Thanks in advance for any help on this. -- Paul Hartland paul.hartland at googlemail.com From RRANTHON at sentara.com Wed Oct 15 09:19:45 2008 From: RRANTHON at sentara.com (RANDALL R ANTHONY) Date: Wed, 15 Oct 2008 10:19:45 -0400 Subject: [AccessD] Trace Deadlocks Using DBCC TRACEON (1204) In-Reply-To: <38c884770810150050j706ebd5x791a544763cc3294@mail.gmail.com> References: <38c884770810150050j706ebd5x791a544763cc3294@mail.gmail.com> Message-ID: <200810151420.m9FEK1OF001684@databaseadvisors.com> Paul, Use the DBCC TRACEON (3605,1204,-1) command. In Mgt Studio create a new query and run on master. You can easily view the output in the results window if you right click and have results go to text, us the exec master..sp_readerrorlog in the query window and you can view the deadlocks. An example of what you'd see is: 2008-10-03 11:32:07.900 spid4s Deadlock encountered .... Printing deadlock information 2008-10-03 11:32:07.900 spid4s Wait-for graph 2008-10-03 11:32:07.900 spid4s NULL 2008-10-03 11:32:07.900 spid4s Node:1 2008-10-03 11:32:07.900 spid4s KEY: 8:2342711617781760 (ffffffffffff) CleanCnt:4 Mode:RangeS-S Flags: 0x0 2008-10-03 11:32:07.900 spid4s Grant List 0: 2008-10-03 11:32:07.900 spid4s Grant List 1: HTH... >>> On 10/15/2008 at 3:50 AM, in message <38c884770810150050j706ebd5x791a544763cc3294 at mail.gmail.com>, "Paul Hartland" wrote: To all, We have started getting a couple of deadlocking issues every now and again, I have read that you can turn on a trace using DBCC TRACEON (1204) Can anyone tell me, where this command will put the results in a case of a deadlock being raised. Or has anyone any better ideas, of how I can find out the queries/views/SP's that are causing the deadlocks please. I have told each of our staff to report to me immediately if they get a deadlock issue, so then I want to look at a report or log to attempt to find out what is going on. Thanks in advance for any help on this. -- Paul Hartland paul.hartland at googlemail.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ( http://www.databaseadvisors.com/ ) From Chester_Kaup at kindermorgan.com Wed Oct 15 14:35:54 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Wed, 15 Oct 2008 14:35:54 -0500 Subject: [AccessD] Chart Legend Problem Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> I have a chart in an access report. I have opened the chart in edit mode, opened the data sheet and changed the data series name. I then updated the chart and returned to the report. I then saved the report. When I open the report it shows the data series name from the source table not the one in the chart datasheet. What might I be doing wrong? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From markamatte at hotmail.com Thu Oct 16 15:28:40 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 16 Oct 2008 20:28:40 +0000 Subject: [AccessD] Chart Legend Problem In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> Message-ID: Hello All, I have a form with a number of graphs. I am exporting them to Powerpoint. When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the graphs do not load right away. If I step through the code...they never load any data??? I can get around this by opening the form prior to my starting the export...but I thought I should be able to run this whole thing with one click??? Any thoughts? Mark A. Matte _________________________________________________________________ When your life is on the go?take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ From markamatte at hotmail.com Thu Oct 16 15:43:17 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 16 Oct 2008 20:43:17 +0000 Subject: [AccessD] Chart Loading Delay In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> Message-ID: Hello All, Posted on the wrong thread...sorry... I have a form with a number of graphs. I am exporting them to Powerpoint. When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the graphs do not load right away. If I step through the code...they never load any data??? I can get around this by opening the form prior to my starting the export...but I thought I should be able to run this whole thing with one click??? Can I docmd.open...then wait? Any Thoughts? Thanks, Mark A. Matte _________________________________________________________________ When your life is on the go?take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ From newsgrps at dalyn.co.nz Thu Oct 16 19:20:40 2008 From: newsgrps at dalyn.co.nz (David Emerson) Date: Fri, 17 Oct 2008 13:20:40 +1300 Subject: [AccessD] Exporting/Importing CSV files In-Reply-To: <6BBE41E8945442E8B3BB7AB558360576@StevenAcer> References: <20081012021925.ZJLP17465.mta05.xtra.co.nz@Dalyn.dalyn.co.nz> <6BBE41E8945442E8B3BB7AB558360576@StevenAcer> Message-ID: <20081017001717.LONM29940.mta02.xtra.co.nz@Dalyn.dalyn.co.nz> Finally had a chance to test this. First my confession - The database is Access 97 so split isn't available (sorry not to mention this before) I ended up using Steve's suggestion and sett up an import specification which imported the records into a temporary table. This maintained the commas when they were part of the text. This also saved having to parse through the records as the single quotes were automatically removed. Thanks everyone for your help. David At 14/10/2008, you wrote: >Here's my test. It exercises the import and export options of >DoCmd.TransferText and also explores the impact of having a variable number >of fields in the text file. The board has been doing strange things to the >format of some of my messages, so I hope this one is legible. >First create a text file called "Table1.csv" with the following content: >"ID","T1","T2" >1,"T11","T21" >2,"T2,2","T22" >3,"T32","T3,2" >4,"T4,1","T4,2" >5,"T4""1","T5'2" >First create a text file called "TableZ.csv" with the following content: >"ID","T1","T2" >1,"T11","T21" >2,"T2,2","T22" >3,"T32","T3,2" >4,"T4,1" >5,"T5""1","T5'2","T4'3" >Then run this code: >Sub testCSV() >sPath = CurrentProject.Path & "\" >On Error Resume Next >DoCmd.DeleteObject acTable, "Table1" >DoCmd.DeleteObject acTable, "Table1A" >DoCmd.DeleteObject acTable, "Table1X" >DoCmd.DeleteObject acTable, "Table1Z" >On Error GoTo 0 >DoCmd.TransferText acImportDelim, , "Table1", sPath & "Table1.csv", True >DoCmd.TransferText acImportDelim, , "Table1Z", sPath & "Table1Z.csv", True >DoCmd.TransferText acExportDelim, , "Table1", sPath & "Table1A.csv", True >DoCmd.TransferText acImportDelim, , "Table1A", sPath & "Table1A.csv", True >DoCmd.TransferText acExportDelim, , "Table1Z", sPath & "Table1Y.csv", True >DoCmd.TransferText acImportDelim, , "Table1Y", sPath & "Table1Y.csv", True >End Sub >Then inspect the tables and the files. Please let me know if this does what >you want it to. >Regards, >Steve Goodhall, PMP >248-505-5204 mobile > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson >Sent: Saturday, October 11, 2008 10:22 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Exporting/Importing CSV files > >You may have a good point there. I will do some testing at this end as >well. > >Thanks > >David > >At 10/12/2008, you wrote: > >I understand that, but it still gives you the appropriate format for a CSV. > >I may have some code from my Master's Thesis Project that will handle this. > >I will look for it when I get home. > >Also, I think that you could use DoCmd.TransferText or > >docmd.TransferSpreadsheet to invoke this functionality in code. I will try > >that out and check how different number of fields will affect it. > >Regards, > >Steve Goodhall, PMP > >248-505-5204 mobile > > > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > >Sent: Saturday, October 11, 2008 3:24 PM > >To: Access Developers discussion and problem solving > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > >This would work if I was using the menus to export, import, but > >everything is done by code to handle rows with different numbers of > >fields in them. I think Drew's (final) solution may be the one to use. > > > >Thanks all for your input > > > >David > > > >At 10/11/2008, you wrote: > > >I checked this by exporting and importing a file using Menu, File, Export > > >and Menu, File, Get External Data. I start with a table that looks like > > >this: > > >Table1 > > >ID T1 T2 > > >1 T11 T21 > > >2 T2,2 T22 > > >3 T32 T3,2 > > >4 T4,1 T4,2 > > >5 T4"1 T5'2 > > > > > >I export it to a CSV format which looks like this: > > >"ID","T1","T2" > > >1,"T11","T21" > > >2,"T2,2","T22" > > >3,"T32","T3,2" > > >4,"T4,1","T4,2" > > >5,"T4""1","T5'2" > > >I import it and I get: > > >Table1A > > >ID T1 T2 > > >1 T11 T21 > > >2 T2,2 T22 > > >3 T32 T3,2 > > >4 T4,1 T4,2 > > >5 T4"1 T5'2 > > > > > >As you see, commas inside double quotes are not a problem. > > >I also tried double quotes and single quotes. Double quotes within the > > >field need to be changed to 2 double quotes when writing the CSV file. > > >Regards, > > >Steve Goodhall, PMP > > >248-505-5204 mobile > > > > > >Steve Goodhall, PMP > > >248-505-5204 mobile > > > > > > > > >-----Original Message----- > > >From: accessd-bounces at databaseadvisors.com > > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > > >Sent: Friday, October 10, 2008 1:19 AM > > >To: 'Access Developers discussion and problem solving' > > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > > > >Is that why they are called CSV files? - > > > > > >CSV=Comma Separated Values. Not only are the "notorious" but "essential" > > > > > >Max > > > > > > > > >-----Original Message----- > > >From: accessd-bounces at databaseadvisors.com > > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > > >Elizabeth.J.Doering at wellsfargo.com > > >Sent: 10 October 2008 03:16 > > >To: accessd at databaseadvisors.com > > >Subject: Re: [AccessD] Exporting/Importing CSV files > > > > > > > > >David, > > > > > >You may have better success removing commas from all fields, all the > > >time. CSVs are notorious for being comma separated! > > > > > >Either enforce farther back that commas can't be entered in the fields, > > >or use Replace to get rid of them as you are exporting. > > > > > >HTH, > > > > > > > > >Liz > > > > > >-----Original Message----- > > >From: accessd-bounces at databaseadvisors.com > > >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David Emerson > > >Sent: Thursday, October 09, 2008 7:11 PM > > >To: accessd at databaseadvisors.com > > >Subject: [AccessD] Exporting/Importing CSV files > > > > > >Team, > > > > > >I am wanting to export fields into a CSV file. This I can do using > > >Print #. I am also enclosing each field in single quotes thus: > > > > > >Print #lngFileHandle, "'DET','" & rst!Field1 & "','" & rst!Field2 & > > >"','" & rst!Field3 & "'" > > > > > >Result: > > >'DET','1','Joe','Bloggs','10 Kingston Lane' > > > > > >I can also read the files back into an arrany using Input #: > > > > > >Input #lngFileHandle, strData(0), strData(2), strData(3), strData(4) > > > > > >This works fine unless one of the output fields includes a comma. Eg > > >'DET','1','Joe','Bloggs','10 Kingston Lane, Jamaca' > > > > > >In this case the Input# only gets "'10 Kingston Lane" and assumes that " > > >Jamaca'" is for the next field. > > > > > >How do I allow for comma's to be included in fields? > > > > > > > > >Regards > > > > > >David Emerson > > >Dalyn Software Ltd > > >Wellington, New Zealand > > > >-- > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > >-- > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >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 Fri Oct 17 09:34:02 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 17 Oct 2008 15:34:02 +0100 Subject: [AccessD] How to start .Netting Message-ID: <200810171434.m9HEY5rn009230@databaseadvisors.com> Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From RRANTHON at sentara.com Fri Oct 17 09:53:46 2008 From: RRANTHON at sentara.com (RANDALL R ANTHONY) Date: Fri, 17 Oct 2008 10:53:46 -0400 Subject: [AccessD] How to start .Netting In-Reply-To: <200810171434.m9HEY5rn009230@databaseadvisors.com> References: <200810171434.m9HEY5rn009230@databaseadvisors.com> Message-ID: <200810171454.m9HErvFs018923@databaseadvisors.com> Andy, Just think of it as .Net, and you can learn VB, C# etc., to write .Net code. Two books I can recommend are from Microsoft Press, VB.Net version 2003 and 2005 which include chapters on ado.net and asp.net. (I got them in a bargain bin for about $10 and $20, respectfully). If you are comfortable with VB you should be able to grasp the concepts, but I will say it's not easy. I think the Express version can definitely get you started, however IIRC there are a lot of functions not available, like the SQL links. >>> On 10/17/2008 at 10:34 AM, in message <200810171434.m9HEY5rn009230 at databaseadvisors.com>, "Andy Lacey" wrote: Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- Andy Lacey http://www.minstersystems.co.uk ( 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 ( http://www.databaseadvisors.com/ ) From sbamber at hss.com Fri Oct 17 09:57:25 2008 From: sbamber at hss.com (Simon Bamber) Date: Fri, 17 Oct 2008 15:57:25 +0100 Subject: [AccessD] How to start .Netting Message-ID: <05D396DAB16E924384091182F16B4EA009B506ED@exchange2.hss.co.uk> Hello Andy, I started learning .Net last year and downloaded a copy of Visual Studio Express Edition 2005 (I believe there is now a 2008 release) for free from Microsoft. Just google it and follow the link. I started with VB.Net and ADO.Net as I needed to connect m applications to SQL Server DB's (also an express edition of this free) and Microsoft Access DB's. I am now a confused.Net developer. I acquired some VB and ADO Net books o eBay and started there then started downloading free video training from LearnVisualStudio.Net website. I will now be learning .Net for the rest of my life as there is so much. Hope this helps... Simon Think of the environment; Please don't print this e-mail unless you really need to. This message, and any associated files, are intended only for the use of the message recipient and may contain information that is confidential, subject to copyright or constitute a trade secret. If you are not the message recipient you are hereby notified that any dissemination, copying or distribution of this message, or files associated with this message, is strictly prohibited. If you have received this message in error, please notify the sender immediately by replying to the message and then deleting it from your computer. HSS Hire Service Group Limited may monitor email traffic data and also the content of email for the purposes of security and staff training. Any views or opinions presented are solely those of sbamber at hss.com and do not necessarily represent those of the company. HSS Hire Service Group is a limited company registered in England and Wales. Registered number: 644490. Registered office: 25 Willow Lane, Mitcham, Surrey, CR4 4TS, United Kingdom. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: 17 October 2008 15:34 To: Dba Subject: [AccessD] How to start .Netting Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- 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 Fri Oct 17 09:58:28 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 17 Oct 2008 07:58:28 -0700 Subject: [AccessD] How to start .Netting In-Reply-To: <200810171434.m9HEY5rn009230@databaseadvisors.com> References: <200810171434.m9HEY5rn009230@databaseadvisors.com> Message-ID: Welcome to the future, Andy! The language you choose in .net is a matter of choice, although if you're looking for a programming job, C# and ASP.Net are the preferred skills. The framework doesn't care which language you choose but if you want to get started the fastest, I'd suggest you stay with VB.Net, since it will be the most familiar to you coming from Access. You can't avoid ADO.Net, so you'll learn that as you go along. It will be easier if you're comfortable with ADO and classes in VBA. I started using the AppDev training DVDs because that's what my company purchased for moving us from Access to .Net, but others will have recommendations on books and other learning resources. >>How long is this going to take me The learning curve is fairly steep, largely because there are so many choices. There are many ways to approach almost anything you do in .Net, so part of the process is learning what works in any give situation and then testing that out to see if it remains true. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Friday, October 17, 2008 7:34 AM To: Dba Subject: [AccessD] How to start .Netting Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- 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 R.Griffiths at bury.gov.uk Fri Oct 17 10:53:45 2008 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Fri, 17 Oct 2008 16:53:45 +0100 Subject: [AccessD] How to start .Netting In-Reply-To: <200810171434.m9HEY5rn009230@databaseadvisors.com> References: <200810171434.m9HEY5rn009230@databaseadvisors.com> Message-ID: <200810171534.m9HFYTD17873@smarthost.yourcomms.net> Hi I started .net many years ago and still learning...that's I.T for you. I moved to VB.net as this seemed the obvious choice...but I did suggest at the time it was an opportunity to start afresh with C#...missed opportunity. I am now considering learning C# - I reckon Vb.net will be around for quite a while yet.....5-10 years. But what may happen sooner is that more and more sample code/blogs etc. etc. will be in C#. As I am 44 now, I don't want to start learning C# in 5-10 years time say. Learning .net , asp.net and the nuances of C# is a big ask - but like anything probably worth it in the end. (once you are proficient take a look as CSLA - I use this framework and code generation for my Business Object classes, and it's pretty neat - but one thing at a time).. Richard -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: 17 October 2008 15:34 To: Dba Subject: [AccessD] How to start .Netting Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- 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 ----------------------------------------------------------------- Why not visit our website www.bury.gov.uk ----------------------------------------------------------------- The information contained in this e-mail and any files transmitted with it is for the intended recipient(s) alone. It may contain confidential information that is exempt from the disclosure under English law and may also be covered by legal,professional or other privilege. If you are not the intended recipient, you must not copy, distribute or take any action in reliance on it. If you have received this e-mail in error, please notify us immediately by using the reply facility on your e-mail system. If this message is being transmitted over the Internet, be aware that it may be intercepted by third parties. As a public body, the Council may be required to disclose this e-mail or any response to it under the Freedom of Information Act 2000 unless the information in it is covered by one of the exemptions in the Act. By responding to this e-mail you accept that your response may be subject of recording/monitoring to ensure compliance with the Council's ICT Security Policy. Electronic service accepted only at legalservices at bury.gov.uk and on fax number 0161 253 5119 . ************************************************************* From andy at minstersystems.co.uk Fri Oct 17 16:44:46 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 17 Oct 2008 22:44:46 +0100 Subject: [AccessD] How to start .Netting In-Reply-To: <200810171534.m9HFYTD17873@smarthost.yourcomms.net> Message-ID: <15DE55ECDC4D49D4A84354B1D1F18464@MINSTER> Thanks for the advice. Anyone else got any insights. Other book recommendations? Andy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Griffiths, Richard Sent: 17 October 2008 16:54 To: Access Developers discussion and problem solving Subject: Re: [AccessD] How to start .Netting Hi I started .net many years ago and still learning...that's I.T for you. I moved to VB.net as this seemed the obvious choice...but I did suggest at the time it was an opportunity to start afresh with C#...missed opportunity. I am now considering learning C# - I reckon Vb.net will be around for quite a while yet.....5-10 years. But what may happen sooner is that more and more sample code/blogs etc. etc. will be in C#. As I am 44 now, I don't want to start learning C# in 5-10 years time say. Learning .net , asp.net and the nuances of C# is a big ask - but like anything probably worth it in the end. (once you are proficient take a look as CSLA - I use this framework and code generation for my Business Object classes, and it's pretty neat - but one thing at a time).. Richard -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: 17 October 2008 15:34 To: Dba Subject: [AccessD] How to start .Netting Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- 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 ----------------------------------------------------------------- Why not visit our website www.bury.gov.uk ----------------------------------------------------------------- The information contained in this e-mail and any files transmitted with it is for the intended recipient(s) alone. It may contain confidential information that is exempt from the disclosure under English law and may also be covered by legal,professional or other privilege. If you are not the intended recipient, you must not copy, distribute or take any action in reliance on it. If you have received this e-mail in error, please notify us immediately by using the reply facility on your e-mail system. If this message is being transmitted over the Internet, be aware that it may be intercepted by third parties. As a public body, the Council may be required to disclose this e-mail or any response to it under the Freedom of Information Act 2000 unless the information in it is covered by one of the exemptions in the Act. By responding to this e-mail you accept that your response may be subject of recording/monitoring to ensure compliance with the Council's ICT Security Policy. Electronic service accepted only at legalservices at bury.gov.uk and on fax number 0161 253 5119 . ************************************************************* -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Oct 17 17:22:15 2008 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 18 Oct 2008 00:22:15 +0200 Subject: [AccessD] How to start .Netting Message-ID: Hi Andy Look up the thread "Old Dog - New Tricks" from January, indeed the postings from Shamil and indeed these links: http://www.asp.net/get-started/ http://quickstarts.asp.net/QuickStartv20/aspnet/Default.aspx http://www.asp.net/learn/ http://www.asp.net/learn/data-access/ The last may be the most important. This will learn you to stay off the low level stuff with SqlCommand etc. which in my opinion is waste of time. This site alone will keep you busy for a long time. I have never bought a book - there is so much free material to learn from including videos. Just start with the official site: http://www.microsoft.com/learning/vstudio/2008/default.mspx the amount of material is overwhelming. When I started with .Net I had the same considerations about VB or C# - picked C# as a challenge and I haven't looked back. In the beginning it's a mess but after a while you "picturise" the code and now I really like it. The Express versions are limited but in no way crippled. However, if you subscribe to the Microsoft Action Pack, the Standard version is either included or available after passing a tiny "test" (can't recall right now). Much bad can be said about MS and indeed the direction Access has taken for developers, but VS is really a star. It is wonderful to work with because you feel every feature is made with the developer in mind. It really shines with .Net 3.5 and the latest service pack where IntelliSense has reached a new level which gently catches most errors while you type without stopping you. As Charlotte mentions, a big challenge is to decide how to do things because quite often no single "right" method exists. But, as with everything else, you will learn and find your favourites. /gustav >>> andy at minstersystems.co.uk 17-10-2008 16:34 >>> Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- Andy Lacey http://www.minstersystems.co.uk From andy at minstersystems.co.uk Fri Oct 17 17:31:49 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 17 Oct 2008 23:31:49 +0100 Subject: [AccessD] How to start .Netting In-Reply-To: Message-ID: <21698133F9F04CC99D6431A7FE21EE1C@MINSTER> Terrific stuff, thanks Gustav. Andy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 17 October 2008 23:22 To: accessd at databaseadvisors.com Subject: Re: [AccessD] How to start .Netting Hi Andy Look up the thread "Old Dog - New Tricks" from January, indeed the postings from Shamil and indeed these links: http://www.asp.net/get-started/ http://quickstarts.asp.net/QuickStartv20/aspnet/Default.aspx http://www.asp.net/learn/ http://www.asp.net/learn/data-access/ The last may be the most important. This will learn you to stay off the low level stuff with SqlCommand etc. which in my opinion is waste of time. This site alone will keep you busy for a long time. I have never bought a book - there is so much free material to learn from including videos. Just start with the official site: http://www.microsoft.com/learning/vstudio/2008/default.mspx the amount of material is overwhelming. When I started with .Net I had the same considerations about VB or C# - picked C# as a challenge and I haven't looked back. In the beginning it's a mess but after a while you "picturise" the code and now I really like it. The Express versions are limited but in no way crippled. However, if you subscribe to the Microsoft Action Pack, the Standard version is either included or available after passing a tiny "test" (can't recall right now). Much bad can be said about MS and indeed the direction Access has taken for developers, but VS is really a star. It is wonderful to work with because you feel every feature is made with the developer in mind. It really shines with .Net 3.5 and the latest service pack where IntelliSense has reached a new level which gently catches most errors while you type without stopping you. As Charlotte mentions, a big challenge is to decide how to do things because quite often no single "right" method exists. But, as with everything else, you will learn and find your favourites. /gustav >>> andy at minstersystems.co.uk 17-10-2008 16:34 >>> Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- Andy Lacey http://www.minstersystems.co.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dbdoug at gmail.com Fri Oct 17 18:30:01 2008 From: dbdoug at gmail.com (Doug Steele) Date: Fri, 17 Oct 2008 16:30:01 -0700 Subject: [AccessD] Access FE to SQL Server Compact BE Message-ID: <4dd71a0c0810171630g386eeac1v9e06943f438fccfd@mail.gmail.com> Hello All: I am trying to connect to a SQL Server Compact edition db (.sdf) from Access 2003. Here's the start of my code: Const sdfPath = "C:\SSCE\AmphiData.sdf" Dim pConn as ADODB.Connection Set pConn = new ADODB.Connection pConn.ConnectionString = "PROVIDER=Microsoft.SQLSERVER.CE.OLEDB.3.5;Data Source = " & sdfPath pConn.Open The .Open command fails with error: Method 'Open' of object '_Connection' failed. The path to the .sdf file is correct; I don't have SSCE installed on this computer but I did register the file "SQLCEOLEDB35.dll". Before I registered the dll I got a 'Provider not found' error, so I assume that I got the right dll. I'm not sure how to proceed from here - does anyone have a suggestion? Thanks, Doug Steele From dwaters at usinternet.com Fri Oct 17 21:16:14 2008 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 17 Oct 2008 21:16:14 -0500 Subject: [AccessD] Delete Sent Email Message-ID: <4CBB4031ADBE4EC4A50ACD517FA25C0E@danwaters> I need to delete all the email in Outlook's Sent items folder. How can I do that? Thanks! Dan From gustav at cactus.dk Sat Oct 18 02:49:43 2008 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 18 Oct 2008 09:49:43 +0200 Subject: [AccessD] Access FE to SQL Server Compact BE Message-ID: Hi Doug Sounds like you need to run the SQL Server 2005 CE install anyway. It probably does more than just registering the dll. /gustav >>> dbdoug at gmail.com 18-10-2008 01:30 >>> Hello All: I am trying to connect to a SQL Server Compact edition db (.sdf) from Access 2003. Here's the start of my code: Const sdfPath = "C:\SSCE\AmphiData.sdf" Dim pConn as ADODB.Connection Set pConn = new ADODB.Connection pConn.ConnectionString = "PROVIDER=Microsoft.SQLSERVER.CE.OLEDB.3.5;Data Source = " & sdfPath pConn.Open The .Open command fails with error: Method 'Open' of object '_Connection' failed. The path to the .sdf file is correct; I don't have SSCE installed on this computer but I did register the file "SQLCEOLEDB35.dll". Before I registered the dll I got a 'Provider not found' error, so I assume that I got the right dll. I'm not sure how to proceed from here - does anyone have a suggestion? Thanks, Doug Steele From max.wanadoo at gmail.com Sat Oct 18 03:24:42 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Sat, 18 Oct 2008 09:24:42 +0100 Subject: [AccessD] Delete Sent Email In-Reply-To: <4CBB4031ADBE4EC4A50ACD517FA25C0E@danwaters> References: <4CBB4031ADBE4EC4A50ACD517FA25C0E@danwaters> Message-ID: <48f99d44.09a8100a.5970.5f87@mx.google.com> Just open them in Outlook, Ctrl-A will select all of them- hit the delete key. Or do you mean programmatically via Access? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: 18 October 2008 03:16 To: 'Access Developers discussion and problem solving' Subject: [AccessD] Delete Sent Email I need to delete all the email in Outlook's Sent items folder. How can I do that? Thanks! Dan -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Sat Oct 18 08:22:16 2008 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 18 Oct 2008 08:22:16 -0500 Subject: [AccessD] Delete Sent Email In-Reply-To: <48f99d44.09a8100a.5970.5f87@mx.google.com> References: <4CBB4031ADBE4EC4A50ACD517FA25C0E@danwaters> <48f99d44.09a8100a.5970.5f87@mx.google.com> Message-ID: Hi Max, Yes - programmatically from Access. Something like: Set outApp = CreateObject("Outlook.Application") outApp.MailFolders("Sent Items").DeleteContents '-- Obviously a weird guess Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Saturday, October 18, 2008 3:25 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Delete Sent Email Just open them in Outlook, Ctrl-A will select all of them- hit the delete key. Or do you mean programmatically via Access? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: 18 October 2008 03:16 To: 'Access Developers discussion and problem solving' Subject: [AccessD] Delete Sent Email I need to delete all the email in Outlook's Sent items folder. How can I do that? Thanks! Dan -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dbdoug at gmail.com Sat Oct 18 08:49:47 2008 From: dbdoug at gmail.com (Doug Steele) Date: Sat, 18 Oct 2008 06:49:47 -0700 Subject: [AccessD] Access FE to SQL Server Compact BE In-Reply-To: References: Message-ID: <4dd71a0c0810180649p30342203k4f1088b804db205a@mail.gmail.com> Thanks, Gustav - that's what I ended up doing, and the code worked. Too bad, I was hoping to keep the installation as simple as possible. Doug On Sat, Oct 18, 2008 at 12:49 AM, Gustav Brock wrote: > Hi Doug > > Sounds like you need to run the SQL Server 2005 CE install anyway. > It probably does more than just registering the dll. > > /gustav > > From dwaters at usinternet.com Sat Oct 18 09:12:31 2008 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 18 Oct 2008 09:12:31 -0500 Subject: [AccessD] Delete Sent Email In-Reply-To: References: <4CBB4031ADBE4EC4A50ACD517FA25C0E@danwaters><48f99d44.09a8100a.5970.5f87@mx.google.com> Message-ID: <34FE967F5F9545A7AC9ED7ACE2BC0FA3@danwaters> Well - I did a web search and found it on http://www.microsoft.com/technet/scriptcenter/resources/qanda/feb07/hey0201. mspx Const olFolderSentMail = 5 Set objOutlook = CreateObject("Outlook.Application") Set objNamespace = objOutlook.GetNamespace("MAPI") Set objFolder = objNamespace.GetDefaultFolder(olFolderSentMail) Set colItems = objFolder.Items For i = colItems.Count to 1 Step - 1 colItems(i).Delete Next And that will do it! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Saturday, October 18, 2008 8:22 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Delete Sent Email Hi Max, Yes - programmatically from Access. Something like: Set outApp = CreateObject("Outlook.Application") outApp.MailFolders("Sent Items").DeleteContents '-- Obviously a weird guess Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Saturday, October 18, 2008 3:25 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Delete Sent Email Just open them in Outlook, Ctrl-A will select all of them- hit the delete key. Or do you mean programmatically via Access? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: 18 October 2008 03:16 To: 'Access Developers discussion and problem solving' Subject: [AccessD] Delete Sent Email I need to delete all the email in Outlook's Sent items folder. How can I do that? Thanks! Dan -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From iggy at nanaimo.ark.com Sat Oct 18 11:14:27 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sat, 18 Oct 2008 09:14:27 -0700 Subject: [AccessD] Creating SubDirectories Message-ID: <48FA0B63.6000904@nanaimo.ark.com> Hey All I am wanting to allow the user to indicate a path (for file storage). The program checks to see if the path exists, if not it notifies the user that the path doesn't exist and would they like the program to create it. I can do this, but rather then reinventing the wheel does anyone know of a custom function that would loop through the path and create the necessary folders/directories. Eg. C:\One\Two\Three Directory One doesn't exist so create the full path. Directory One and Two do exist so create folder Three From dwaters at usinternet.com Sat Oct 18 12:30:04 2008 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 18 Oct 2008 12:30:04 -0500 Subject: [AccessD] Creating SubDirectories In-Reply-To: <48FA0B63.6000904@nanaimo.ark.com> References: <48FA0B63.6000904@nanaimo.ark.com> Message-ID: How about: Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.FolderExists("C:\One\") = False Then fso.CreateFolder ("C:\One\Two\Three\") Else If fso.FolderExists("C:\One\Two") = False Then fso.CreateFolder ("C:\One\Two\Three\") Else If fso.FolderExists("C:\One\Two\Three") = False Then fso.CreateFolder("C:\One\Two\Three\") End If End If End If fso.close Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav Sent: Saturday, October 18, 2008 11:14 AM To: Access Developers discussion and problem solving Subject: [AccessD] Creating SubDirectories Hey All I am wanting to allow the user to indicate a path (for file storage). The program checks to see if the path exists, if not it notifies the user that the path doesn't exist and would they like the program to create it. I can do this, but rather then reinventing the wheel does anyone know of a custom function that would loop through the path and create the necessary folders/directories. Eg. C:\One\Two\Three Directory One doesn't exist so create the full path. Directory One and Two do exist so create folder Three -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From iggy at nanaimo.ark.com Sat Oct 18 12:12:36 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sat, 18 Oct 2008 10:12:36 -0700 Subject: [AccessD] Creating SubDirectories In-Reply-To: References: <48FA0B63.6000904@nanaimo.ark.com> Message-ID: <48FA1904.9030304@nanaimo.ark.com> Hey Dan Thanks I will try it out. Will have to do some looping because path could vary. Dan Waters wrote: >How about: > >Dim fso As Object > >Set fso = CreateObject("Scripting.FileSystemObject") > >If fso.FolderExists("C:\One\") = False Then > fso.CreateFolder ("C:\One\Two\Three\") >Else > If fso.FolderExists("C:\One\Two") = False Then > fso.CreateFolder ("C:\One\Two\Three\") > Else > If fso.FolderExists("C:\One\Two\Three") = False Then > fso.CreateFolder("C:\One\Two\Three\") > End If > End If >End If > >fso.close > >Dan > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >Sent: Saturday, October 18, 2008 11:14 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] Creating SubDirectories > >Hey All >I am wanting to allow the user to indicate a path (for file storage). >The program checks to see if the path exists, if not it notifies the >user that the path doesn't exist and would they like the program to >create it. >I can do this, but rather then reinventing the wheel does anyone know of >a custom function that would loop through the path and create the >necessary folders/directories. >Eg. >C:\One\Two\Three >Directory One doesn't exist so create the full path. >Directory One and Two do exist so create folder Three > > > From max.wanadoo at gmail.com Sat Oct 18 13:27:02 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Sat, 18 Oct 2008 19:27:02 +0100 Subject: [AccessD] Creating SubDirectories In-Reply-To: References: <48FA0B63.6000904@nanaimo.ark.com> Message-ID: <48fa2a70.06a0100a.7593.ffffe8e5@mx.google.com> Hi, I have no code to hand, but what I do is just create the drive I want (use code to move up and down my drive structure, regardless of what is actually there) and just create it using a FS object (File scripting object). If it already exists, just trap the error and move on. If you are still struggling on Monday when I get back to work, I will send the code. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: 18 October 2008 18:30 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Creating SubDirectories How about: Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") If fso.FolderExists("C:\One\") = False Then fso.CreateFolder ("C:\One\Two\Three\") Else If fso.FolderExists("C:\One\Two") = False Then fso.CreateFolder ("C:\One\Two\Three\") Else If fso.FolderExists("C:\One\Two\Three") = False Then fso.CreateFolder("C:\One\Two\Three\") End If End If End If fso.close Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav Sent: Saturday, October 18, 2008 11:14 AM To: Access Developers discussion and problem solving Subject: [AccessD] Creating SubDirectories Hey All I am wanting to allow the user to indicate a path (for file storage). The program checks to see if the path exists, if not it notifies the user that the path doesn't exist and would they like the program to create it. I can do this, but rather then reinventing the wheel does anyone know of a custom function that would loop through the path and create the necessary folders/directories. Eg. C:\One\Two\Three Directory One doesn't exist so create the full path. Directory One and Two do exist so create folder Three -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Sat Oct 18 15:35:50 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Sat, 18 Oct 2008 14:35:50 -0600 Subject: [AccessD] Creating SubDirectories In-Reply-To: <48FA0B63.6000904@nanaimo.ark.com> References: <48FA0B63.6000904@nanaimo.ark.com> Message-ID: I use the function below. It assumes that the drive and root path (in our case S:\GOM\) exists, because that is the location of the backend data file. All paths are relative to that root. This is why lngI is initialized to 7 in the code. A full solution should enumerate drives and should check that each or at least the last folder is created (Dir function) should there be a rights issue with a particular drive. No need to use the the scripting runtime library and its file system object. Public Function fnCreateBasePath(strCreatePath As String) As Boolean On Error GoTo ErrorHandler Dim strPath As String Dim lngpos As Long strCreatePath = Trim$(strCreatePath) If Right$(strCreatePath, 1) <> "\" Then strCreatePath = strCreatePath & "\" lngpos = 7 Do Until lngpos = 1 lngpos = InStr(lngpos + 1, strCreatePath, "\") If lngpos Then strPath = Left$(strCreatePath, lngpos - 1) If Not Len(Dir(strPath, vbDirectory)) > 0 Then MkDir strPath End If End If lngpos = lngpos + 1 Loop fnCreateBasePath = True ExitRoutine: On Error Resume Next Exit FunctionErrorHandler: With Err Select Case .Number Case Else MsgBox .Number & vbCrLf & .Description & vbCrLf & vbCrLf & _ " Error in creating Folder: '" & strCreatePath & "'", _ vbInformation, "Error - fnCreateBasePath" End Select End With 'Resume 0 Resume ExitRoutineEnd FunctionCiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> Date: Sat, 18 Oct 2008 09:14:27 -0700> From: iggy at nanaimo.ark.com> To: accessd at databaseadvisors.com> Subject: [AccessD] Creating SubDirectories> > Hey All> I am wanting to allow the user to indicate a path (for file storage).> The program checks to see if the path exists, if not it notifies the > user that the path doesn't exist and would they like the program to > create it.> I can do this, but rather then reinventing the wheel does anyone know of > a custom function that would loop through the path and create the > necessary folders/directories.> Eg.> C:\One\Two\Three> Directory One doesn't exist so create the full path.> Directory One and Two do exist so create folder Three _________________________________________________________________ From iggy at nanaimo.ark.com Sun Oct 19 10:01:44 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sun, 19 Oct 2008 08:01:44 -0700 Subject: [AccessD] Creating Subdirectories Message-ID: <48FB4BD8.4010600@nanaimo.ark.com> Hey All Thanks to all of you that responded. Yesterday was a "tired brain day". This morning I built a little routine using MKDIR to check and create the necessary subdirectories. I check first to see if the drive exists. Incorporated Jurgen's idea to check to see if the folder/directory was created (rights issue). One little glitch is if I try to delete the folder immediately after creating it, I get a message "Cannot delete folder. It is being used by another person or program". I have to exit Access and then I can delete it. Thanks again From max.wanadoo at gmail.com Sun Oct 19 10:26:29 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Sun, 19 Oct 2008 16:26:29 +0100 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB4BD8.4010600@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> Message-ID: <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> Try sticking a DEEVENTS in there. That will release the processing to the OS to do whatever it needs and then come back to you. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav Sent: 19 October 2008 16:02 To: Access Developers discussion and problem solving Subject: [AccessD] Creating Subdirectories Hey All Thanks to all of you that responded. Yesterday was a "tired brain day". This morning I built a little routine using MKDIR to check and create the necessary subdirectories. I check first to see if the drive exists. Incorporated Jurgen's idea to check to see if the folder/directory was created (rights issue). One little glitch is if I try to delete the folder immediately after creating it, I get a message "Cannot delete folder. It is being used by another person or program". I have to exit Access and then I can delete it. Thanks again -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Sun Oct 19 10:45:15 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Sun, 19 Oct 2008 09:45:15 -0600 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB4BD8.4010600@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> Message-ID: I just tried making and then deleting a folder in the same sub procedure with a hard coded folder beneath our S:\GOM folder and there was no difficulty. I checked explorer to verify that the folder did not preexist before running the code. Should there have been an exisiting folder, I would have had to first delete any files or sub folders below the GOM\toe\ root. Public Sub MkRmDir() MkDir "s:\Gom\toe" If GetAttr("s:\Gom\toe") And vbDirectory Then MsgBox "Folder created" RmDir "s:\gom\toe" If Len(Dir("S:\Gom\toe")) Then MsgBox "Creation succeeded and Deletion failed" Else MsgBox "Creation and Deletion succeeded" End If Else MsgBox "folder creation failed" End If End Sub Running the code reports creation, then creation and deletion of the folder. Folder deletion always fails when there are files in the folder. Could that be an issue? Ciao J?rgen Welz Edmonton, Alberta jwelz at hotmail.com > Date: Sun, 19 Oct 2008 08:01:44 -0700 > From: iggy at nanaimo.ark.com > To: accessd at databaseadvisors.com > Subject: [AccessD] Creating Subdirectories > > Hey All > Thanks to all of you that responded. Yesterday was a "tired brain day". > This morning I built a little routine using MKDIR to check and create > the necessary subdirectories. I check first to see if the drive exists. > Incorporated Jurgen's idea to check to see if the folder/directory was > created (rights issue). > One little glitch is if I try to delete the folder immediately after > creating it, I get a message "Cannot delete folder. It is being used by > another person or program". I have to exit Access and then I can delete it. > > Thanks again > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ From iggy at nanaimo.ark.com Sun Oct 19 10:49:03 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sun, 19 Oct 2008 08:49:03 -0700 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> Message-ID: <48FB56EF.7060507@nanaimo.ark.com> Hey Max DoEvents did something because now I am getting "Cannot delete folder: Access is denied" Max Wanadoo wrote: >Try sticking a DEEVENTS in there. >That will release the processing to the OS to do whatever it needs and then >come back to you. > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >Sent: 19 October 2008 16:02 >To: Access Developers discussion and problem solving >Subject: [AccessD] Creating Subdirectories > >Hey All >Thanks to all of you that responded. Yesterday was a "tired brain day". >This morning I built a little routine using MKDIR to check and create >the necessary subdirectories. I check first to see if the drive exists. >Incorporated Jurgen's idea to check to see if the folder/directory was >created (rights issue). >One little glitch is if I try to delete the folder immediately after >creating it, I get a message "Cannot delete folder. It is being used by >another person or program". I have to exit Access and then I can delete it. > >Thanks again > > From iggy at nanaimo.ark.com Sun Oct 19 11:14:33 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sun, 19 Oct 2008 09:14:33 -0700 Subject: [AccessD] Creating Subdirectories In-Reply-To: References: <48FB4BD8.4010600@nanaimo.ark.com> Message-ID: <48FB5CE9.4030308@nanaimo.ark.com> Hey Jurgen I think you got it sort of. I have to work on this. I did put an empty data.mdb into the folder. In 2 steps If the file exists I kill the file then RMDir the folder. First time I get the error message on RMDir, second try works fine, same if I don't put the file in the folder. As I say I am getting closer, it will just take a bit of poking around. Thanks again Jurgen Welz wrote: >I just tried making and then deleting a folder in the same sub procedure with a hard coded folder beneath our S:\GOM folder and there was no difficulty. I checked explorer to verify that the folder did not preexist before running the code. Should there have been an exisiting folder, I would have had to first delete any files or sub folders below the GOM\toe\ root. > >Public Sub MkRmDir() > MkDir "s:\Gom\toe" > If GetAttr("s:\Gom\toe") And vbDirectory Then > MsgBox "Folder created" > RmDir "s:\gom\toe" > If Len(Dir("S:\Gom\toe")) Then > MsgBox "Creation succeeded and Deletion failed" > Else > MsgBox "Creation and Deletion succeeded" > End If > Else > MsgBox "folder creation failed" > End If >End Sub > >Running the code reports creation, then creation and deletion of the folder. >Folder deletion always fails when there are files in the folder. Could that be an issue? > >Ciao >J?rgen Welz >Edmonton, Alberta >jwelz at hotmail.com > > > >>Date: Sun, 19 Oct 2008 08:01:44 -0700 >>From: iggy at nanaimo.ark.com >>To: accessd at databaseadvisors.com >>Subject: [AccessD] Creating Subdirectories >> >>Hey All >>Thanks to all of you that responded. Yesterday was a "tired brain day". >>This morning I built a little routine using MKDIR to check and create >>the necessary subdirectories. I check first to see if the drive exists. >>Incorporated Jurgen's idea to check to see if the folder/directory was >>created (rights issue). >>One little glitch is if I try to delete the folder immediately after >>creating it, I get a message "Cannot delete folder. It is being used by >>another person or program". I have to exit Access and then I can delete it. >> >>Thanks again >>-- >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > >_________________________________________________________________ > > > > From jwelz at hotmail.com Sun Oct 19 11:18:49 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Sun, 19 Oct 2008 10:18:49 -0600 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB56EF.7060507@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> Message-ID: I once got an access denied error when I accidentally created a few folders with a trailing space in the name. I created folders that used the PK and 15 characters of a string and occasionally there was a space between words at the 15th character. A trunc() fixed that problem. Funny thing was, under that version of the server software, no one, not even the IT department could delete the folders I created with the trailing spaces. Those folders stayed there for over 6 months and the Access Denied message even came up from the Windows Explorer UI.CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> Date: Sun, 19 Oct 2008 08:49:03 -0700> From: iggy at nanaimo.ark.com> To: accessd at databaseadvisors.com> Subject: Re: [AccessD] Creating Subdirectories> > Hey Max> DoEvents did something because now I am getting "Cannot delete folder: > Access is denied"> > Max Wanadoo wrote:> > >Try sticking a DEEVENTS in there.> >That will release the processing to the OS to do whatever it needs and then> >come back to you.> >> >Max> >> >> >-----Original Message-----> >From: accessd-bounces at databaseadvisors.com> >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav> >Sent: 19 October 2008 16:02> >To: Access Developers discussion and problem solving> >Subject: [AccessD] Creating Subdirectories> >> >Hey All> >Thanks to all of you that responded. Yesterday was a "tired brain day". > >This morning I built a little routine using MKDIR to check and create > >the necessary subdirectories. I check first to see if the drive exists. > >Incorporated Jurgen's idea to check to see if the folder/directory was > >created (rights issue).> >One little glitch is if I try to delete the folder immediately after > >creating it, I get a message "Cannot delete folder. It is being used by > >another person or program". I have to exit Access and then I can delete it.> >> >Thanks again> > > >> > -- > AccessD mailing list> AccessD at databaseadvisors.com> http://databaseadvisors.com/mailman/listinfo/accessd> Website: http://www.databaseadvisors.com _________________________________________________________________ From iggy at nanaimo.ark.com Sun Oct 19 11:32:46 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sun, 19 Oct 2008 09:32:46 -0700 Subject: [AccessD] Creating Subdirectories In-Reply-To: References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> Message-ID: <48FB612E.6050107@nanaimo.ark.com> Hey Jurgen Thanks again I will try it. Maybe in my looping and checking and putting the path back together I am picking up some spaces. But kind of still wondering why it works on the second try. Anyway back to it. Jurgen Welz wrote: >I once got an access denied error when I accidentally created a few folders with a trailing space in the name. I created folders that used the PK and 15 characters of a string and occasionally there was a space between words at the 15th character. A trunc() fixed that problem. > >Funny thing was, under that version of the server software, no one, not even the IT department could delete the folders I created with the trailing spaces. Those folders stayed there for over 6 months and the Access Denied message even came up from the Windows Explorer UI.CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> Date: Sun, 19 Oct 2008 08:49:03 -0700> From: iggy at nanaimo.ark.com> To: accessd at databaseadvisors.com> Subject: Re: [AccessD] Creating Subdirectories> > Hey Max> DoEvents did something because now I am getting "Cannot delete folder: > Access is denied"> > Max Wanadoo wrote:> > >Try sticking a DEEVENTS in there.> >That will release the processing to the OS to do whatever it needs and then> >come back to you.> >> >Max> >> >> >-----Original Message-----> >From: accessd-bounces at databaseadvisors.com> >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav> >Sent: 19 October 2008 16:02> >To: Access Developers discussion and problem solving> >Subject: [AccessD] Creating Subdirectories> >> >Hey All> >Thanks to all of you that responded. Yesterday was a "tired brain day". > >This morning I built a little routine using MKDIR to check and create > >the necessary subdirectories. I check first to see if the drive exists. > >Incorporated Jurgen's idea to check to see if the folder/directory was > >created (rights issue).> >One little glitch is if I try to delete the folder immediately after > >creating it, I get a message "Cannot delete folder. It is being used by > >another person or program". I have to exit Access and then I can delete it.> >> >Thanks again> > > >> > -- > AccessD mailing list> AccessD at databaseadvisors.com> http://databaseadvisors.com/mailman/listinfo/accessd> Website: http://www.databaseadvisors.com >_________________________________________________________________ > > > From max.wanadoo at gmail.com Sun Oct 19 11:55:56 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Sun, 19 Oct 2008 17:55:56 +0100 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB56EF.7060507@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> Message-ID: <48fb6697.0856100a.7a7b.fffff49d@mx.google.com> Tony, maybe I am getting the wrong end of the stick. If you want to create a dir, then do so. If the dir already exists, then just trap the error and move on -job done! Why are you trying to delete it if you intend to create it again?? I don't really understand what you are trying to do, so I will just drop out. Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav Sent: 19 October 2008 16:49 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Creating Subdirectories Hey Max DoEvents did something because now I am getting "Cannot delete folder: Access is denied" Max Wanadoo wrote: >Try sticking a DEEVENTS in there. >That will release the processing to the OS to do whatever it needs and then >come back to you. > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >Sent: 19 October 2008 16:02 >To: Access Developers discussion and problem solving >Subject: [AccessD] Creating Subdirectories > >Hey All >Thanks to all of you that responded. Yesterday was a "tired brain day". >This morning I built a little routine using MKDIR to check and create >the necessary subdirectories. I check first to see if the drive exists. >Incorporated Jurgen's idea to check to see if the folder/directory was >created (rights issue). >One little glitch is if I try to delete the folder immediately after >creating it, I get a message "Cannot delete folder. It is being used by >another person or program". I have to exit Access and then I can delete it. > >Thanks again > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From iggy at nanaimo.ark.com Sun Oct 19 12:23:54 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Sun, 19 Oct 2008 10:23:54 -0700 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48fb6697.0856100a.7a7b.fffff49d@mx.google.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> <48fb6697.0856100a.7a7b.fffff49d@mx.google.com> Message-ID: <48FB6D2A.2030006@nanaimo.ark.com> Hey Max Not trying to confuse you. It is just that when I am testing an application, I try to duplicate as many of the "goofy things" a client might do. Client has the ability to enter a path for data and file storage. If the path does not exist then ask them if they want to allow the program to create the folders. Path is created and the path string gets entered into a list of paths, along with some other information. The client has the ability to delete a path from the list. Now in most instances the client would not create a subdirectory and turn around and delete it and then create it again. I am just testing the worst case scenarios, and in doing so I ran into the RMDir problem. Sorry if it sounded weird as to what I was trying to do. Max Wanadoo wrote: >Tony, maybe I am getting the wrong end of the stick. >If you want to create a dir, then do so. If the dir already exists, then >just trap the error and move on -job done! Why are you trying to delete it >if you intend to create it again?? >I don't really understand what you are trying to do, so I will just drop >out. > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >Sent: 19 October 2008 16:49 >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Creating Subdirectories > >Hey Max >DoEvents did something because now I am getting "Cannot delete folder: >Access is denied" > >Max Wanadoo wrote: > > > >>Try sticking a DEEVENTS in there. >>That will release the processing to the OS to do whatever it needs and then >>come back to you. >> >>Max >> >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >>Sent: 19 October 2008 16:02 >>To: Access Developers discussion and problem solving >>Subject: [AccessD] Creating Subdirectories >> >>Hey All >>Thanks to all of you that responded. Yesterday was a "tired brain day". >>This morning I built a little routine using MKDIR to check and create >>the necessary subdirectories. I check first to see if the drive exists. >>Incorporated Jurgen's idea to check to see if the folder/directory was >>created (rights issue). >>One little glitch is if I try to delete the folder immediately after >>creating it, I get a message "Cannot delete folder. It is being used by >>another person or program". I have to exit Access and then I can delete it. >> >>Thanks again >> >> >> >> > > > From gustav at cactus.dk Sun Oct 19 12:31:10 2008 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 19 Oct 2008 19:31:10 +0200 Subject: [AccessD] Creating Subdirectories Message-ID: Hi Tony The issue could be that you have made the subdirectory, you wish to delete, the current directory. Try calling ChDir CurDir & "\.." before attempting to delete the directory. /gustav >>> iggy at nanaimo.ark.com 19-10-2008 17:01 >>> Hey All Thanks to all of you that responded. Yesterday was a "tired brain day". This morning I built a little routine using MKDIR to check and create the necessary subdirectories. I check first to see if the drive exists. Incorporated Jurgen's idea to check to see if the folder/directory was created (rights issue). One little glitch is if I try to delete the folder immediately after creating it, I get a message "Cannot delete folder. It is being used by another person or program". I have to exit Access and then I can delete it. Thanks again From max.wanadoo at gmail.com Sun Oct 19 12:50:19 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Sun, 19 Oct 2008 18:50:19 +0100 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB6D2A.2030006@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> <48fb6697.0856100a.7a7b.fffff49d@mx.google.com> <48FB6D2A.2030006@nanaimo.ark.com> Message-ID: <48fb7355.096c100a.3705.ffffdef4@mx.google.com> Aha. OK now I understand. Thanks Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav Sent: 19 October 2008 18:24 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Creating Subdirectories Hey Max Not trying to confuse you. It is just that when I am testing an application, I try to duplicate as many of the "goofy things" a client might do. Client has the ability to enter a path for data and file storage. If the path does not exist then ask them if they want to allow the program to create the folders. Path is created and the path string gets entered into a list of paths, along with some other information. The client has the ability to delete a path from the list. Now in most instances the client would not create a subdirectory and turn around and delete it and then create it again. I am just testing the worst case scenarios, and in doing so I ran into the RMDir problem. Sorry if it sounded weird as to what I was trying to do. Max Wanadoo wrote: >Tony, maybe I am getting the wrong end of the stick. >If you want to create a dir, then do so. If the dir already exists, then >just trap the error and move on -job done! Why are you trying to delete it >if you intend to create it again?? >I don't really understand what you are trying to do, so I will just drop >out. > >Max > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >Sent: 19 October 2008 16:49 >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Creating Subdirectories > >Hey Max >DoEvents did something because now I am getting "Cannot delete folder: >Access is denied" > >Max Wanadoo wrote: > > > >>Try sticking a DEEVENTS in there. >>That will release the processing to the OS to do whatever it needs and then >>come back to you. >> >>Max >> >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Tony Septav >>Sent: 19 October 2008 16:02 >>To: Access Developers discussion and problem solving >>Subject: [AccessD] Creating Subdirectories >> >>Hey All >>Thanks to all of you that responded. Yesterday was a "tired brain day". >>This morning I built a little routine using MKDIR to check and create >>the necessary subdirectories. I check first to see if the drive exists. >>Incorporated Jurgen's idea to check to see if the folder/directory was >>created (rights issue). >>One little glitch is if I try to delete the folder immediately after >>creating it, I get a message "Cannot delete folder. It is being used by >>another person or program". I have to exit Access and then I can delete it. >> >>Thanks again >> >> >> >> > > > -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Sun Oct 19 13:16:14 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Sun, 19 Oct 2008 12:16:14 -0600 Subject: [AccessD] Creating Subdirectories In-Reply-To: <48FB612E.6050107@nanaimo.ark.com> References: <48FB4BD8.4010600@nanaimo.ark.com> <48fb51a0.02ab100a.1534.fffffe89@mx.google.com> <48FB56EF.7060507@nanaimo.ark.com> <48FB612E.6050107@nanaimo.ark.com> Message-ID: If you've added a file or files to the created subfolder and opened any of the files, then you will be unable to remove the folder while they are open. Since you say you've placed an empty mdb file in the folder, you may have done so by file copy or by the createdatabase function. The 2nd approach would probably involve a reference to an mdb object. If that reference is not properly released, the file system will respond with the error you've described and will allow deletion only after closing your application. That might explain why it works after you restart your application. You need to be careful working with deleting folders because users have a way of dropping other files and folders in them. A recursive deltree removal function is something I use when moving files or synchronizing files between servers. You should probably check for any unexpected files or folders before attempting to remove a directorry. My application builds an analog of the database structure in the file system.. The system creates folders for each type of record (tabledef) when a 'cmdDocuments' command button is clicked from a record. The file structure is based on table name and a unique record identifier. In most cases the identifier is the primary key, but the users have mandated that they be able to search the file system by person, project or company name as well as project number. I hate when they mess with the files because I've had to find folders that they've accidentally dragged below other folders whenever they get into Windows Explorer with their mice. It's especially bad when we get mouse lag in terminal server or VPN sessions. I've had instances where all the estimate files for a years worth of estimates for an office were moved beneath a different year (Project Number path has a 2 character prefix for the year) resulting in a panic when over 50,000 files were lost with an errant drag. I found them in two minutes when notified, but this kind of issue makes me want to keep users out of that part of the file system permanently. That way I could simply use the PK as a path element. Oh well... Beneath that basic structure, the application provides folders for change records, invoices, pictures and other standard kinds of files related to the type of record. If a person navigates to a record and clicks the 'cmdDocuments' button, the system runs an algorithm that determines whether the folder exists and creates the folder if it doesn't. If it does exist, it displays the files and folders in a list box. Form the list container Documents form, there is a combo that allows a user to pick a document type to create. When a type is chosen, the list is filtered and the option to create new files is enabled. If a user simply needed to see if there were related documents, then there would be no need for the folder to remain in existence if none pre-existed. In that casse, upon closing the Documents form for the record, the application determines that the particular record's folder is empty and the folder is removed. Perhaps I could have deferred the folder creation until the user actually wishes to create a file, but I also allow the option for a user to pop an explorer window for the record to drop in something like a scanned document or other externally generated document or email, it was expedient to immediately create the folder and populate the listboox with no files rather than run different code that didn't populate the list. When a user creates an Invoice, an approprate invoice subfolder is created and the document created in locus. Ciao J?rgen Welz Edmonton, Alberta jwelz at hotmail.com > Date: Sun, 19 Oct 2008 09:32:46 -0700 > From: iggy at nanaimo.ark.com > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Creating Subdirectories > > Hey Jurgen > Thanks again I will try it. Maybe in my looping and checking and putting > the path back together I am picking up some spaces. But kind of still > wondering why it works on the second try. > Anyway back to it. _________________________________________________________________ From Darryl.Collins at coles.com.au Sun Oct 19 19:36:42 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Mon, 20 Oct 2008 11:36:42 +1100 Subject: [AccessD] How to start .Netting In-Reply-To: <21698133F9F04CC99D6431A7FE21EE1C@MINSTER> Message-ID: <57E6E6CA42105A48B977303A2CDC2720077342E0E7@WPEXCH22.retail.ad.cmltd.net.au> Hi Andy, I would also suggest going with C#. Seems to be the way the world is moving... Cheers Darryl -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Saturday, 18 October 2008 9:32 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] How to start .Netting Terrific stuff, thanks Gustav. Andy -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 17 October 2008 23:22 To: accessd at databaseadvisors.com Subject: Re: [AccessD] How to start .Netting Hi Andy Look up the thread "Old Dog - New Tricks" from January, indeed the postings from Shamil and indeed these links: http://www.asp.net/get-started/ http://quickstarts.asp.net/QuickStartv20/aspnet/Default.aspx http://www.asp.net/learn/ http://www.asp.net/learn/data-access/ The last may be the most important. This will learn you to stay off the low level stuff with SqlCommand etc. which in my opinion is waste of time. This site alone will keep you busy for a long time. I have never bought a book - there is so much free material to learn from including videos. Just start with the official site: http://www.microsoft.com/learning/vstudio/2008/default.mspx the amount of material is overwhelming. When I started with .Net I had the same considerations about VB or C# - picked C# as a challenge and I haven't looked back. In the beginning it's a mess but after a while you "picturise" the code and now I really like it. The Express versions are limited but in no way crippled. However, if you subscribe to the Microsoft Action Pack, the Standard version is either included or available after passing a tiny "test" (can't recall right now). Much bad can be said about MS and indeed the direction Access has taken for developers, but VS is really a star. It is wonderful to work with because you feel every feature is made with the developer in mind. It really shines with .Net 3.5 and the latest service pack where IntelliSense has reached a new level which gently catches most errors while you type without stopping you. As Charlotte mentions, a big challenge is to decide how to do things because quite often no single "right" method exists. But, as with everything else, you will learn and find your favourites. /gustav >>> andy at minstersystems.co.uk 17-10-2008 16:34 >>> Ok I'm sorry, I'm sorry. This has no doubt been answered before on the list but I wonder if a consensus has been arived at. The question is, coming from Access how do I start learning .Net? Which are the best books, or other resources? I don't even know the questions to ask really. Am I talking about VB.Net? I guess so. Will I need to also learn ASP.Net, ADO.Net, xyz.Net, ramalamadingdong.Net or is VB.Net all I need? Anyone got a learning plan for me? How long is this going to take me (to be able to turn out a decent app)? What software do I need to buy (or will the free Express version get me going?) So many questions, so little brain. -- Andy Lacey http://www.minstersystems.co.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From iggy at nanaimo.ark.com Mon Oct 20 10:47:13 2008 From: iggy at nanaimo.ark.com (Tony Septav) Date: Mon, 20 Oct 2008 08:47:13 -0700 Subject: [AccessD] Creating Subdirectories Solved Message-ID: <48FCA801.7010603@nanaimo.ark.com> Hey All Just thought I would share this (some of you will probably say "Of course you twit that was the problem"). Way too much time wasted on this one. Pulled the code apart,checked the path string etc. etc etc. and discovered. Len(Dir(Trim(PDrive), vbDirectory)) was causing the problem. MkDir Trim(PDrive) If Len(Dir(Trim(PDrive), vbDirectory)) = 0 Then DoCmd.Beep MsgBox "Sorry cannot create this path - " & PDrive & ". Please check that you have access rights...", 48, "Message" Exit Sub End If I added this and I no longer get error messages and the folder deleted no problem. If Len(Dir("C:\", vbDirectory)) = 0 Then End If Further down in the code I had something similiar If len(dir(trim(PDrive) & "Data.mdb")) = 0 then to see if the data.mdb existed, if not place a clean copy in the folder/directory, had the same delete problem until I changed my code logic. From Chester_Kaup at kindermorgan.com Mon Oct 20 13:57:32 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Mon, 20 Oct 2008 13:57:32 -0500 Subject: [AccessD] Last Record Problem Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0F094774@houex1.kindermorgan.com> Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From Lambert.Heenan at AIG.com Mon Oct 20 14:02:42 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 20 Oct 2008 15:02:42 -0400 Subject: [AccessD] Last Record Problem Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC079B6@XLIVMBX35bkup.aig.com> Because though you moved past the end of the recordset, you did not try to access any non-existing data. As soon as you actually reference a field name you'll get error 3021 - No Current Record. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 2:58 PM To: Access Developers discussion and problem solving Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 bill_patten at embarqmail.com Mon Oct 20 14:06:55 2008 From: bill_patten at embarqmail.com (Bill Patten) Date: Mon, 20 Oct 2008 12:06:55 -0700 Subject: [AccessD] Last Record Problem In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C0F094774@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0F094774@houex1.kindermorgan.com> Message-ID: <27937C0D89F440938A7E7E6DA4DF1128@BPCS> Hi Chester, Just a guess but if your on the last record and move one more record it is in the add mode, if you tried to read it you would probably get an error, but if you added data it would probably take it. HTH Bill ----- Original Message ----- From: "Kaup, Chester" To: "Access Developers discussion and problem solving" Sent: Monday, October 20, 2008 11:57 AM Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 Chester_Kaup at kindermorgan.com Mon Oct 20 14:12:58 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Mon, 20 Oct 2008 14:12:58 -0500 Subject: [AccessD] Last Record Problem In-Reply-To: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC079B6@XLIVMBX35bkup.aig.com> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC079B6@XLIVMBX35bkup.aig.com> Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0F09478E@houex1.kindermorgan.com> The next statement is NextDate = rs4.Fields(0) Would this not try to access non-existing data? Set warnings is set to true. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 2:03 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Because though you moved past the end of the recordset, you did not try to access any non-existing data. As soon as you actually reference a field name you'll get error 3021 - No Current Record. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 2:58 PM To: Access Developers discussion and problem solving Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 Lambert.Heenan at AIG.com Mon Oct 20 16:02:07 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Mon, 20 Oct 2008 16:02:07 -0500 Subject: [AccessD] Last Record Problem Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC07A9A@XLIVMBX35bkup.aig.com> Well the question was "Why does the following not generate an error. It seems I would be past the last record?" rs4.MoveLast rs4.MoveNext" You kept the next line of code a secret. :-) NextDate = rs4.Fields(0) *should* generate the same error. I just tried it out on one of my tables and it does just that. This is the case *even with* DoCmd.SetWarnings False Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 3:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Last Record Problem The next statement is NextDate = rs4.Fields(0) Would this not try to access non-existing data? Set warnings is set to true. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 2:03 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Because though you moved past the end of the recordset, you did not try to access any non-existing data. As soon as you actually reference a field name you'll get error 3021 - No Current Record. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 2:58 PM To: Access Developers discussion and problem solving Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Mon Oct 20 16:04:39 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Mon, 20 Oct 2008 15:04:39 -0600 Subject: [AccessD] Creating Subdirectories Solved In-Reply-To: <48FCA801.7010603@nanaimo.ark.com> References: <48FCA801.7010603@nanaimo.ark.com> Message-ID: I'm not sure what it is that you have discovered to be the problem. For your information, the vbDirectory parameter in the Dir function does not limit the return strings to directories. For example, from the debug window, if I have a file named Omdata.mdb on my S drive in a folder named GOM, executing the following: ?dir("S:\GOM\omdata.mdb", vbDirectory) returns the file name: OmData.mdb In order to check whether the return string is in fact a folder, you should probably check the attributes: ?getattr("S:\GOM\Omdata.mdb") and vbDirectory Returns 0 or false. ?getattr("S:\GOM") and vbDirectory Returns 16 which evaluates to true. ?getattr("S:\GOM\") and vbDirectory Adding the trailing '\' also evaluates to 16 or true. ?dir("S:\GOM") returns nothing whereas ?dir("S:\GOM\") returns the first file in the folder as though you used the wild cards '*.*" ?dir("S:\GOM\", vbDirectory) returns a '.', a decimal that is a nonzero length string that represents a folder at a lower level. ?dir("S:\GOM", vbDirectory) Returns the folder name, 'GOM' To prevent confusion with files that have the same name as a folder, you pretty much need tto test with GetAttr. You would be wise to check for any other files in the folder before you delete them also. My preference is to send files to the recycle bin rather than Kill them. The Kill method just deletes the file with no recycle bin capability. According to your last post, you added, wrapped in Len(): ?dir("C:\", vbDirectory) The problem is, that will always return the first file name in the C root directory. That will always have a length and has no viaable possible purpose if that is literally your test. Not knowing the difference between your hard coded path string and the contents of PDrive, I don't see how this has any bearing on your ability to delete a folder. No 'Of course you....' from me. You would be better off checking for the specific file string as a return rather than the length of an unknown return and the existence of any other return strings (call dir in a loop using the string parameter at the outset of the loop). Sorry, but I don't believe you've spent enough time on this yet, but I'd hardly call it wasted if you wind up learning anthing from the exercise. Ciao J?rgen Welz Edmonton, Alberta jwelz at hotmail.com > Date: Mon, 20 Oct 2008 08:47:13 -0700 > From: iggy at nanaimo.ark.com > To: accessd at databaseadvisors.com > Subject: [AccessD] Creating Subdirectories Solved > > Hey All > Just thought I would share this (some of you will probably say "Of > course you twit that was the problem"). Way too much time wasted on this > one. > Pulled the code apart,checked the path string etc. etc etc. and discovered. > Len(Dir(Trim(PDrive), vbDirectory)) was causing the problem. > > MkDir Trim(PDrive) > If Len(Dir(Trim(PDrive), vbDirectory)) = 0 Then > DoCmd.Beep > MsgBox "Sorry cannot create this path - " & PDrive & ". Please > check that you have access rights...", 48, "Message" > Exit Sub > End If > > I added this and I no longer get error messages and the folder deleted > no problem. > If Len(Dir("C:\", vbDirectory)) = 0 Then > End If > > Further down in the code I had something similiar > If len(dir(trim(PDrive) & "Data.mdb")) = 0 then > to see if the data.mdb existed, if not place a clean copy in the > folder/directory, had the same delete problem until I changed my code > logic. _________________________________________________________________ From davidmcafee at gmail.com Mon Oct 20 16:32:02 2008 From: davidmcafee at gmail.com (David McAfee) Date: Mon, 20 Oct 2008 14:32:02 -0700 Subject: [AccessD] Access FE to SQL Server Compact BE In-Reply-To: <4dd71a0c0810180649p30342203k4f1088b804db205a@mail.gmail.com> References: <4dd71a0c0810180649p30342203k4f1088b804db205a@mail.gmail.com> Message-ID: <8786a4c00810201432p6f9bd78cqa52e9549e3ad632@mail.gmail.com> I had to write a program in .Net for our sale force to use in the field. It sends us all of their invoices and then downloads all of their price lists and customers. I was trying to connect to an SDF while still on a Pocket PC (PPC), then found out you couldnt do that. I had to copy the SDF over to a directory on the users PC. I create the directory, if it doesnt exist on the users PC. Delete the SDF on the users PC, if it exists. Connect to the PPC Verify file exists on PPC Using rapi, I copy SDF from PPC to PC I open the SDF and verify some records against the logged in user, then send datasets up to a webservice. I download the updated customer list and price lists then send the SDF process back to the PPC: connect to PPC verify file exists on PPC rename file on PPC (to rollback in the event something goes wrong) copy over SDF. This whole process happens very quickly. It was a major pain to set up but works flawless now :) If you are doing something similar and need help, let me know. David On Sat, Oct 18, 2008 at 6:49 AM, Doug Steele wrote: > Thanks, Gustav - that's what I ended up doing, and the code worked. Too > bad, I was hoping to keep the installation as simple as possible. > > Doug > > On Sat, Oct 18, 2008 at 12:49 AM, Gustav Brock wrote: > > > Hi Doug > > > > Sounds like you need to run the SQL Server 2005 CE install anyway. > > It probably does more than just registering the dll. > > > > /gustav > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Chester_Kaup at kindermorgan.com Tue Oct 21 07:33:21 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Tue, 21 Oct 2008 07:33:21 -0500 Subject: [AccessD] Last Record Problem In-Reply-To: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC07A9A@XLIVMBX35bkup.aig.com> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC07A9A@XLIVMBX35bkup.aig.com> Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0F09483E@houex1.kindermorgan.com> Rather than spend a lot of time figuring out what is going on I just stuck in an EOF check statement. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 4:02 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Well the question was "Why does the following not generate an error. It seems I would be past the last record?" rs4.MoveLast rs4.MoveNext" You kept the next line of code a secret. :-) NextDate = rs4.Fields(0) *should* generate the same error. I just tried it out on one of my tables and it does just that. This is the case *even with* DoCmd.SetWarnings False Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 3:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Last Record Problem The next statement is NextDate = rs4.Fields(0) Would this not try to access non-existing data? Set warnings is set to true. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 2:03 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Because though you moved past the end of the recordset, you did not try to access any non-existing data. As soon as you actually reference a field name you'll get error 3021 - No Current Record. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 2:58 PM To: Access Developers discussion and problem solving Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 21 08:48:59 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 21 Oct 2008 09:48:59 -0400 Subject: [AccessD] Last Record Problem Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC07BAA@XLIVMBX35bkup.aig.com> Sounds like a plan to me. :-) Sometimes it's just best to avoid the error rather than trap it. IMHO Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Tuesday, October 21, 2008 8:33 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Last Record Problem Rather than spend a lot of time figuring out what is going on I just stuck in an EOF check statement. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 4:02 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Well the question was "Why does the following not generate an error. It seems I would be past the last record?" rs4.MoveLast rs4.MoveNext" You kept the next line of code a secret. :-) NextDate = rs4.Fields(0) *should* generate the same error. I just tried it out on one of my tables and it does just that. This is the case *even with* DoCmd.SetWarnings False Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 3:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Last Record Problem The next statement is NextDate = rs4.Fields(0) Would this not try to access non-existing data? Set warnings is set to true. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Monday, October 20, 2008 2:03 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Last Record Problem Because though you moved past the end of the recordset, you did not try to access any non-existing data. As soon as you actually reference a field name you'll get error 3021 - No Current Record. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Monday, October 20, 2008 2:58 PM To: Access Developers discussion and problem solving Subject: [AccessD] Last Record Problem Why does the following not generate an error. It seems I would be past the last record? strSql = "SELECT TestDate, LinePres, TubingPres, [LinePres]-[TubingPres] AS Difference " & _ "FROM tbl_Pressure_Date " & _ "WHERE (((TestDate)=Date() Or (TestDate)=Date()-7 Or (TestDate)=Date()-14 Or (TestDate)=Date()-21 Or (TestDate)=Date()-28 Or (TestDate)=Date()-35 Or (TestDate)=Date()-42)) " & _ "ORDER BY TestDate;" Set rs4 = MyDb.OpenRecordset(strSql) rs4.MoveLast rs4.MoveNext Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 21 09:38:49 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 21 Oct 2008 14:38:49 +0000 Subject: [AccessD] (no subject) In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> Message-ID: Hello All, Sorry for the re-post...but I didn't see any responses... I have a form with a number of graphs. I am exporting them to Powerpoint. When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the graphs do not load right away. If I step through the code...they never load any data??? I can get around this by opening the form prior to my starting the export...but I thought I should be able to run this whole thing with one click??? Can I docmd.open...then wait? Any Thoughts? Thanks, Mark A. Matte _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 From markamatte at hotmail.com Tue Oct 21 09:51:22 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 21 Oct 2008 14:51:22 +0000 Subject: [AccessD] Chart Loading Delay In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> Message-ID: Hello All, Sorry for the re-post...but I didn't see any responses... I have a form with a number of graphs. I am exporting them to Powerpoint. When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the graphs do not load right away. If I step through the code...they never load any data??? I can get around this by opening the form prior to my starting the export...but I thought I should be able to run this whole thing with one click??? Can I docmd.open...then wait? Any Thoughts? Thanks, Mark A. Matte _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 From sbamber at hss.com Tue Oct 21 09:58:20 2008 From: sbamber at hss.com (Simon Bamber) Date: Tue, 21 Oct 2008 15:58:20 +0100 Subject: [AccessD] (no subject) Message-ID: <05D396DAB16E924384091182F16B4EA009B506F0@exchange2.hss.co.uk> Hello, In the past I have used the DoEvents to force a Access to wait while the previous code to execute. Maybe this will work for you. Simon Bamber Think of the environment; Please don't print this e-mail unless you really need to. This message, and any associated files, are intended only for the use of the message recipient and may contain information that is confidential, subject to copyright or constitute a trade secret. If you are not the message recipient you are hereby notified that any dissemination, copying or distribution of this message, or files associated with this message, is strictly prohibited. If you have received this message in error, please notify the sender immediately by replying to the message and then deleting it from your computer. HSS Hire Service Group Limited may monitor email traffic data and also the content of email for the purposes of security and staff training. Any views or opinions presented are solely those of sbamber at hss.com and do not necessarily represent those of the company. HSS Hire Service Group is a limited company registered in England and Wales. Registered number: 644490. Registered office: 25 Willow Lane, Mitcham, Surrey, CR4 4TS, United Kingdom. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: 21 October 2008 15:39 To: Access Developers discussion and problem solving Subject: [AccessD] (no subject) Hello All, Sorry for the re-post...but I didn't see any responses... I have a form with a number of graphs. I am exporting them to Powerpoint. When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the graphs do not load right away. If I step through the code...they never load any data??? I can get around this by opening the form prior to my starting the export...but I thought I should be able to run this whole thing with one click??? Can I docmd.open...then wait? Any Thoughts? Thanks, Mark A. Matte _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog -cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dbdoug at gmail.com Tue Oct 21 10:16:51 2008 From: dbdoug at gmail.com (Doug Steele) Date: Tue, 21 Oct 2008 08:16:51 -0700 Subject: [AccessD] Access FE to SQL Server Compact BE In-Reply-To: <8786a4c00810201432p6f9bd78cqa52e9549e3ad632@mail.gmail.com> References: <4dd71a0c0810180649p30342203k4f1088b804db205a@mail.gmail.com> <8786a4c00810201432p6f9bd78cqa52e9549e3ad632@mail.gmail.com> Message-ID: <4dd71a0c0810210816u6db7a820mae6bb08bb644e55e@mail.gmail.com> Hi David: Thanks for your offer. My app is considerably simpler than yours. It's an inventory counting program using a single (for the moment) hand held scanner. I have to pass inventory data from our existing Access database into an .sdf for the scanner to edit, then collect the scanner output, verify it, and push it back into Access. At the moment I'm just using ActiveSync to pass the .sdf back and forth from the scanner. I hadn't heard of RAPI until you mentioned it (I've only been working with Windows Mobile for a week or so). I will check it out. Doug Steele On Mon, Oct 20, 2008 at 2:32 PM, David McAfee wrote: > I had to write a program in .Net for our sale force to use in the field. It > sends us all of their invoices and then downloads all of their price lists > and customers. > > From Chester_Kaup at kindermorgan.com Tue Oct 21 13:27:08 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Tue, 21 Oct 2008 13:27:08 -0500 Subject: [AccessD] Problem Defining New Table Field Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0F094962@houex1.kindermorgan.com> I want to define a field in a new table as an integer type in VBA. The compiler does not like the following statement. I is dimmed as an integer. Message is runtime error 3001 invalid argument Set fldNewField = tdfNewDef.CreateField(CInt(I + 1), dbInteger) I have also tried the following version with the same error Set fldNewField = tdfNewDef.CreateField(I + 1, dbInteger) Set fldNewField = tdfNewDef.CreateField(I + 1) This statement however works Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) Here is the whole loop it is in if that matters For I = 0 To rstSource.RecordCount - 1 Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) tdfNewDef.Fields.Append fldNewField Next I Thanks for any ideas. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From bill_patten at embarqmail.com Tue Oct 21 13:54:26 2008 From: bill_patten at embarqmail.com (Bill Patten) Date: Tue, 21 Oct 2008 11:54:26 -0700 Subject: [AccessD] Problem Defining New Table Field In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C0F094962@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0F094962@houex1.kindermorgan.com> Message-ID: Perhaps field names need to be characters does this work? Set fldNewField = tdfNewDef.CreateField(Cstr(I + 1), dbInteger) HTH Bill ----- Original Message ----- From: "Kaup, Chester" To: "Access Developers discussion and problem solving" Sent: Tuesday, October 21, 2008 11:27 AM Subject: [AccessD] Problem Defining New Table Field I want to define a field in a new table as an integer type in VBA. The compiler does not like the following statement. I is dimmed as an integer. Message is runtime error 3001 invalid argument Set fldNewField = tdfNewDef.CreateField(CInt(I + 1), dbInteger) I have also tried the following version with the same error Set fldNewField = tdfNewDef.CreateField(I + 1, dbInteger) Set fldNewField = tdfNewDef.CreateField(I + 1) This statement however works Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) Here is the whole loop it is in if that matters For I = 0 To rstSource.RecordCount - 1 Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) tdfNewDef.Fields.Append fldNewField Next I Thanks for any ideas. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 Chester_Kaup at kindermorgan.com Tue Oct 21 14:01:48 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Tue, 21 Oct 2008 14:01:48 -0500 Subject: [AccessD] Problem Defining New Table Field In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0F094962@houex1.kindermorgan.com> Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C0F09497B@houex1.kindermorgan.com> That worked. Thanks! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Tuesday, October 21, 2008 1:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Problem Defining New Table Field Perhaps field names need to be characters does this work? Set fldNewField = tdfNewDef.CreateField(Cstr(I + 1), dbInteger) HTH Bill ----- Original Message ----- From: "Kaup, Chester" To: "Access Developers discussion and problem solving" Sent: Tuesday, October 21, 2008 11:27 AM Subject: [AccessD] Problem Defining New Table Field I want to define a field in a new table as an integer type in VBA. The compiler does not like the following statement. I is dimmed as an integer. Message is runtime error 3001 invalid argument Set fldNewField = tdfNewDef.CreateField(CInt(I + 1), dbInteger) I have also tried the following version with the same error Set fldNewField = tdfNewDef.CreateField(I + 1, dbInteger) Set fldNewField = tdfNewDef.CreateField(I + 1) This statement however works Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) Here is the whole loop it is in if that matters For I = 0 To rstSource.RecordCount - 1 Set fldNewField = tdfNewDef.CreateField(CStr(I + 1), dbText) tdfNewDef.Fields.Append fldNewField Next I Thanks for any ideas. Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 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 davidmcafee at gmail.com Tue Oct 21 14:05:53 2008 From: davidmcafee at gmail.com (David McAfee) Date: Tue, 21 Oct 2008 12:05:53 -0700 Subject: [AccessD] (no subject) In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> Message-ID: <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> Can you open the form hidden a step or two before then make it visible after you populate the charts? On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: > > > Hello All, > > Sorry for the re-post...but I didn't see any responses... > > I have a form with a number of graphs. I am exporting them to Powerpoint. > When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the > graphs do not load right away. If I step through the code...they never load > any data??? I can get around this by opening the form prior to my starting > the export...but I thought I should be able to run this whole thing with one > click??? > > Can I docmd.open...then wait? Any Thoughts? > > Thanks, > > Mark A. Matte > _________________________________________________________________ > Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From markamatte at hotmail.com Tue Oct 21 14:44:28 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 21 Oct 2008 19:44:28 +0000 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) In-Reply-To: <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> Message-ID: It doesn't matter where I put it in the code...if I step through the code...the charts never populate. If I let the code run as is...the charts(even though the open form was the first thing) won't populate until everything else is done. My issue is not how it looks...I need the charts populated before the rest of my code fires. Will hiding it do this? Thanks, Mark A. Matte > Date: Tue, 21 Oct 2008 12:05:53 -0700 > From: davidmcafee at gmail.com > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] (no subject) > > Can you open the form hidden a step or two before then make it visible after > you populate the charts? > > On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: > >> >> >> Hello All, >> >> Sorry for the re-post...but I didn't see any responses... >> >> I have a form with a number of graphs. I am exporting them to Powerpoint. >> When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the >> graphs do not load right away. If I step through the code...they never load >> any data??? I can get around this by opening the form prior to my starting >> the export...but I thought I should be able to run this whole thing with one >> click??? >> >> Can I docmd.open...then wait? Any Thoughts? >> >> Thanks, >> >> Mark A. Matte >> _________________________________________________________________ >> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. >> >> http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 From markamatte at hotmail.com Tue Oct 21 14:45:03 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 21 Oct 2008 19:45:03 +0000 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) In-Reply-To: <05D396DAB16E924384091182F16B4EA009B506F0@exchange2.hss.co.uk> References: <05D396DAB16E924384091182F16B4EA009B506F0@exchange2.hss.co.uk> Message-ID: I'll have to give it a try. Thanks, Mark > Date: Tue, 21 Oct 2008 15:58:20 +0100 > From: sbamber at hss.com > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] (no subject) > > Hello, > > In the past I have used the DoEvents to force a Access to wait while the > previous code to execute. > > Maybe this will work for you. > > Simon Bamber > > Think of the environment; Please don't print this e-mail unless you > really need to. > > > > This message, and any associated files, are intended only for the use of the message recipient and may contain information that is confidential, subject to copyright or constitute a trade secret. If you are not the message recipient you are hereby notified that any dissemination, copying or distribution of this message, or files associated with this message, is strictly prohibited. If you have received this message in error, please notify the sender immediately by replying to the message and then deleting it from your computer. HSS Hire Service Group Limited may monitor email traffic data and also the content of email for the purposes of security and staff training. Any views or opinions presented are solely those of sbamber at hss.com and do not necessarily represent those of the company. > > HSS Hire Service Group is a limited company registered in England and Wales. Registered number: 644490. > Registered office: 25 Willow Lane, Mitcham, Surrey, CR4 4TS, United Kingdom. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte > Sent: 21 October 2008 15:39 > To: Access Developers discussion and problem solving > Subject: [AccessD] (no subject) > > > > Hello All, > > Sorry for the re-post...but I didn't see any responses... > > I have a form with a number of graphs. I am exporting them to > Powerpoint. When I open this form via code using DoCmd.OpenForm > "frmGraphs" ...the graphs do not load right away. If I step through the > code...they never load any data??? I can get around this by opening the > form prior to my starting the export...but I thought I should be able to > run this whole thing with one click??? > > Can I docmd.open...then wait? Any Thoughts? > > Thanks, > > Mark A. Matte > _________________________________________________________________ > Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog > -cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go?take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ From davidmcafee at gmail.com Tue Oct 21 16:46:36 2008 From: davidmcafee at gmail.com (David McAfee) Date: Tue, 21 Oct 2008 14:46:36 -0700 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> Message-ID: <8786a4c00810211446v1bc967bega109be7b64eab896@mail.gmail.com> I think a combination of opening it hidden and using DoEvents as suggested would take care of the problem. On Tue, Oct 21, 2008 at 12:44 PM, Mark A Matte wrote: > > It doesn't matter where I put it in the code...if I step through the > code...the charts never populate. If I let the code run as is...the > charts(even though the open form was the first thing) won't populate until > everything else is done. > > My issue is not how it looks...I need the charts populated before the rest > of my code fires. Will hiding it do this? > > Thanks, > > Mark A. Matte > > > > Date: Tue, 21 Oct 2008 12:05:53 -0700 > > From: davidmcafee at gmail.com > > To: accessd at databaseadvisors.com > > Subject: Re: [AccessD] (no subject) > > > > Can you open the form hidden a step or two before then make it visible > after > > you populate the charts? > > > > On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: > > > >> > >> > >> Hello All, > >> > >> Sorry for the re-post...but I didn't see any responses... > >> > >> I have a form with a number of graphs. I am exporting them to > Powerpoint. > >> When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the > >> graphs do not load right away. If I step through the code...they never > load > >> any data??? I can get around this by opening the form prior to my > starting > >> the export...but I thought I should be able to run this whole thing with > one > >> click??? > >> > >> Can I docmd.open...then wait? Any Thoughts? > >> > >> Thanks, > >> > >> Mark A. Matte > >> _________________________________________________________________ > >> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > >> > >> > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > >> -- > >> AccessD mailing list > >> AccessD at databaseadvisors.com > >> http://databaseadvisors.com/mailman/listinfo/accessd > >> Website: http://www.databaseadvisors.com > >> > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From markamatte at hotmail.com Wed Oct 22 09:11:55 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 22 Oct 2008 14:11:55 +0000 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) In-Reply-To: <8786a4c00810211446v1bc967bega109be7b64eab896@mail.gmail.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> <8786a4c00810211446v1bc967bega109be7b64eab896@mail.gmail.com> Message-ID: The DoEvents approach I KINDA understand...but why would opening it hidden have an effect? Thanks, Mark A. Matte > Date: Tue, 21 Oct 2008 14:46:36 -0700 > From: davidmcafee at gmail.com > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Chart Loading Delay...WAS..(no subject) > > I think a combination of opening it hidden and using DoEvents as suggested > would take care of the problem. > > On Tue, Oct 21, 2008 at 12:44 PM, Mark A Matte wrote: > >> >> It doesn't matter where I put it in the code...if I step through the >> code...the charts never populate. If I let the code run as is...the >> charts(even though the open form was the first thing) won't populate until >> everything else is done. >> >> My issue is not how it looks...I need the charts populated before the rest >> of my code fires. Will hiding it do this? >> >> Thanks, >> >> Mark A. Matte >> >> >>> Date: Tue, 21 Oct 2008 12:05:53 -0700 >>> From: davidmcafee at gmail.com >>> To: accessd at databaseadvisors.com >>> Subject: Re: [AccessD] (no subject) >>> >>> Can you open the form hidden a step or two before then make it visible >> after >>> you populate the charts? >>> >>> On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: >>> >>>> >>>> >>>> Hello All, >>>> >>>> Sorry for the re-post...but I didn't see any responses... >>>> >>>> I have a form with a number of graphs. I am exporting them to >> Powerpoint. >>>> When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the >>>> graphs do not load right away. If I step through the code...they never >> load >>>> any data??? I can get around this by opening the form prior to my >> starting >>>> the export...but I thought I should be able to run this whole thing with >> one >>>> click??? >>>> >>>> Can I docmd.open...then wait? Any Thoughts? >>>> >>>> Thanks, >>>> >>>> Mark A. Matte >>>> _________________________________________________________________ >>>> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. >>>> >>>> >> http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 >>>> -- >>>> AccessD mailing list >>>> AccessD at databaseadvisors.com >>>> http://databaseadvisors.com/mailman/listinfo/accessd >>>> Website: http://www.databaseadvisors.com >>>> >>> -- >>> AccessD mailing list >>> AccessD at databaseadvisors.com >>> http://databaseadvisors.com/mailman/listinfo/accessd >>> Website: http://www.databaseadvisors.com >> >> _________________________________________________________________ >> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. >> >> http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Stay organized with simple drag and drop from Windows Live Hotmail. http://windowslive.com/Explore/hotmail?ocid=TXT_TAGLM_WL_hotmail_102008 From markamatte at hotmail.com Wed Oct 22 10:47:06 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 22 Oct 2008 15:47:06 +0000 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) SOLVED In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> <8786a4c00810211446v1bc967bega109be7b64eab896@mail.gmail.com> Message-ID: Hello All, The issue was I did not understand why if I used docmd.openform("myform")...and then a bunch of other code...and myform had a chart on it...if I stepped through the code...the chart would never load...no matter if I put a loop or some delay...it would not load. If I ran the code withOUT stepping through the charts would not finish loading until all the rest of the code finished executing... I am still curious as to why this occurs... But here is my solution: doevents in side of a timer loop. Thanks, Mark A. Matte DoCmd.OpenForm "frmGraphs" Dim MyTimer MyTimer = Now() Do While Now() < DateAdd("s", 5, MyTimer) DoEvents Loop > From: markamatte at hotmail.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 14:11:55 +0000 > Subject: Re: [AccessD] Chart Loading Delay...WAS..(no subject) > > > The DoEvents approach I KINDA understand...but why would opening it hidden have an effect? > > Thanks, > > Mark A. Matte > > >> Date: Tue, 21 Oct 2008 14:46:36 -0700 >> From: davidmcafee at gmail.com >> To: accessd at databaseadvisors.com >> Subject: Re: [AccessD] Chart Loading Delay...WAS..(no subject) >> >> I think a combination of opening it hidden and using DoEvents as suggested >> would take care of the problem. >> >> On Tue, Oct 21, 2008 at 12:44 PM, Mark A Matte wrote: >> >>> >>> It doesn't matter where I put it in the code...if I step through the >>> code...the charts never populate. If I let the code run as is...the >>> charts(even though the open form was the first thing) won't populate until >>> everything else is done. >>> >>> My issue is not how it looks...I need the charts populated before the rest >>> of my code fires. Will hiding it do this? >>> >>> Thanks, >>> >>> Mark A. Matte >>> >>> >>>> Date: Tue, 21 Oct 2008 12:05:53 -0700 >>>> From: davidmcafee at gmail.com >>>> To: accessd at databaseadvisors.com >>>> Subject: Re: [AccessD] (no subject) >>>> >>>> Can you open the form hidden a step or two before then make it visible >>> after >>>> you populate the charts? >>>> >>>> On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: >>>> >>>>> >>>>> >>>>> Hello All, >>>>> >>>>> Sorry for the re-post...but I didn't see any responses... >>>>> >>>>> I have a form with a number of graphs. I am exporting them to >>> Powerpoint. >>>>> When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the >>>>> graphs do not load right away. If I step through the code...they never >>> load >>>>> any data??? I can get around this by opening the form prior to my >>> starting >>>>> the export...but I thought I should be able to run this whole thing with >>> one >>>>> click??? >>>>> >>>>> Can I docmd.open...then wait? Any Thoughts? >>>>> >>>>> Thanks, >>>>> >>>>> Mark A. Matte >>>>> _________________________________________________________________ >>>>> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. >>>>> >>>>> >>> http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 >>>>> -- >>>>> AccessD mailing list >>>>> AccessD at databaseadvisors.com >>>>> http://databaseadvisors.com/mailman/listinfo/accessd >>>>> Website: http://www.databaseadvisors.com >>>>> >>>> -- >>>> AccessD mailing list >>>> AccessD at databaseadvisors.com >>>> http://databaseadvisors.com/mailman/listinfo/accessd >>>> Website: http://www.databaseadvisors.com >>> >>> _________________________________________________________________ >>> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. >>> >>> http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 >>> -- >>> AccessD mailing list >>> AccessD at databaseadvisors.com >>> http://databaseadvisors.com/mailman/listinfo/accessd >>> Website: http://www.databaseadvisors.com >>> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Stay organized with simple drag and drop from Windows Live Hotmail. > http://windowslive.com/Explore/hotmail?ocid=TXT_TAGLM_WL_hotmail_102008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go?take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ From davidmcafee at gmail.com Wed Oct 22 11:28:19 2008 From: davidmcafee at gmail.com (David McAfee) Date: Wed, 22 Oct 2008 09:28:19 -0700 Subject: [AccessD] Chart Loading Delay...WAS..(no subject) In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C0DB453F6@houex1.kindermorgan.com> <8786a4c00810211205g57b711c3m59efaa89653cce48@mail.gmail.com> <8786a4c00810211446v1bc967bega109be7b64eab896@mail.gmail.com> Message-ID: <8786a4c00810220928h70086a41xed25bdd3eed22a15@mail.gmail.com> It doesn't, it only hides it while things are happening so it doesnt look like a blank form has opened up. Without actually looking at the code, I don't know what was happening. On Wed, Oct 22, 2008 at 7:11 AM, Mark A Matte wrote: > > The DoEvents approach I KINDA understand...but why would opening it hidden > have an effect? > > Thanks, > > Mark A. Matte > > > > Date: Tue, 21 Oct 2008 14:46:36 -0700 > > From: davidmcafee at gmail.com > > To: accessd at databaseadvisors.com > > Subject: Re: [AccessD] Chart Loading Delay...WAS..(no subject) > > > > I think a combination of opening it hidden and using DoEvents as > suggested > > would take care of the problem. > > > > On Tue, Oct 21, 2008 at 12:44 PM, Mark A Matte wrote: > > > >> > >> It doesn't matter where I put it in the code...if I step through the > >> code...the charts never populate. If I let the code run as is...the > >> charts(even though the open form was the first thing) won't populate > until > >> everything else is done. > >> > >> My issue is not how it looks...I need the charts populated before the > rest > >> of my code fires. Will hiding it do this? > >> > >> Thanks, > >> > >> Mark A. Matte > >> > >> > >>> Date: Tue, 21 Oct 2008 12:05:53 -0700 > >>> From: davidmcafee at gmail.com > >>> To: accessd at databaseadvisors.com > >>> Subject: Re: [AccessD] (no subject) > >>> > >>> Can you open the form hidden a step or two before then make it visible > >> after > >>> you populate the charts? > >>> > >>> On Tue, Oct 21, 2008 at 7:38 AM, Mark A Matte wrote: > >>> > >>>> > >>>> > >>>> Hello All, > >>>> > >>>> Sorry for the re-post...but I didn't see any responses... > >>>> > >>>> I have a form with a number of graphs. I am exporting them to > >> Powerpoint. > >>>> When I open this form via code using DoCmd.OpenForm "frmGraphs" ...the > >>>> graphs do not load right away. If I step through the code...they never > >> load > >>>> any data??? I can get around this by opening the form prior to my > >> starting > >>>> the export...but I thought I should be able to run this whole thing > with > >> one > >>>> click??? > >>>> > >>>> Can I docmd.open...then wait? Any Thoughts? > >>>> > >>>> Thanks, > >>>> > >>>> Mark A. Matte > >>>> _________________________________________________________________ > >>>> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > >>>> > >>>> > >> > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > >>>> -- > >>>> AccessD mailing list > >>>> AccessD at databaseadvisors.com > >>>> http://databaseadvisors.com/mailman/listinfo/accessd > >>>> Website: http://www.databaseadvisors.com > >>>> > >>> -- > >>> AccessD mailing list > >>> AccessD at databaseadvisors.com > >>> http://databaseadvisors.com/mailman/listinfo/accessd > >>> Website: http://www.databaseadvisors.com > >> > >> _________________________________________________________________ > >> Want to read Hotmail messages in Outlook? The Wordsmiths show you how. > >> > >> > http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 > >> -- > >> AccessD mailing list > >> AccessD at databaseadvisors.com > >> http://databaseadvisors.com/mailman/listinfo/accessd > >> Website: http://www.databaseadvisors.com > >> > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Stay organized with simple drag and drop from Windows Live Hotmail. > http://windowslive.com/Explore/hotmail?ocid=TXT_TAGLM_WL_hotmail_102008 > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bheygood at abestsystems.com Wed Oct 22 11:59:25 2008 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 22 Oct 2008 09:59:25 -0700 Subject: [AccessD] Random rows ? In-Reply-To: <002201c7d785$e7330050$0d08a8c0@carltonone.local> References: <002001c7d777$7d2a9050$0301a8c0@HAL9005> <002201c7d785$e7330050$0d08a8c0@carltonone.local> Message-ID: Hello to the list, I need to create a table of one row that looks like below: 0000001 0000002 0000003 2000000 I have had no problem so far. But the client wants the table output to be random. Like: 1114453 0000022 2000000 0048941 And so forth. And of course no repeating rows...... Any thoughts?? Bob From ssharkins at gmail.com Wed Oct 22 14:09:40 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 22 Oct 2008 15:09:40 -0400 Subject: [AccessD] Identifying Primary Key's Message-ID: <06d701c93479$bd013570$2f8601c7@SusanOne> Is there anything in one of the system tables that identifies a table's primary key column(s)? Susan H. From gustav at cactus.dk Wed Oct 22 15:35:08 2008 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 22 Oct 2008 22:35:08 +0200 Subject: [AccessD] Random rows ? Message-ID: Hi Bob One method is to create the table with two fields: Guid - Autonumber Guid > save table, then: Id - Autonumber Long, Format: 0000000 Now, run this sub: Public Sub T2M() Dim rst As DAO.Recordset Dim lngCount As Long Set rst = CurrentDb.OpenRecordset("tblRandom") For lngCount = 1 To 2000000 rst.AddNew ' A record is created. Save it. rst.Update Next rst.Close Set rst = Nothing End Sub This will take a while to run as the table continuously sorts on the (by nature) random Guid. However, this is what you want as - when you open the table - it will be sorted by the Guids, thus the Ids appear in random order. To preserve the formatted field Id, you may at this point add a new text field of length seven which you update to the formatted value of field Id; if the table is fixed, you may now choose to delete the Id field. /gustav >>> bheygood at abestsystems.com 22-10-2008 18:59 >>> Hello to the list, I need to create a table of one row that looks like below: 0000001 0000002 0000003 2000000 I have had no problem so far. But the client wants the table output to be random. Like: 1114453 0000022 2000000 0048941 And so forth. And of course no repeating rows...... Any thoughts?? Bob From markamatte at hotmail.com Wed Oct 22 15:36:19 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 22 Oct 2008 20:36:19 +0000 Subject: [AccessD] Random rows ? In-Reply-To: References: <002001c7d777$7d2a9050$0301a8c0@HAL9005> <002201c7d785$e7330050$0d08a8c0@carltonone.local> Message-ID: Why not use an autonumber field...set the "New Value" property to random??? > From: bheygood at abestsystems.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 09:59:25 -0700 > Subject: [AccessD] Random rows ? > > Hello to the list, > > I need to create a table of one row that looks like below: > > 0000001 > 0000002 > 0000003 > > 2000000 > > > I have had no problem so far. > > But the client wants the table output to be random. Like: > > 1114453 > 0000022 > 2000000 > 0048941 > And so forth. And of course no repeating rows...... > > Any thoughts?? > > Bob > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go?take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ From bheygood at abestsystems.com Wed Oct 22 16:06:59 2008 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 22 Oct 2008 14:06:59 -0700 Subject: [AccessD] Random rows ? In-Reply-To: References: <002001c7d777$7d2a9050$0301a8c0@HAL9005><002201c7d785$e7330050$0d08a8c0@carltonone.local> Message-ID: <7A46E896F1844A6DA485D6E6367759FE@speedy> That would only then work for new entries. And, I would have no control over the limits (I need 1 to 2000000). Thanks for responding. Bob -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Wednesday, October 22, 2008 1:36 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Random rows ? Why not use an autonumber field...set the "New Value" property to random??? > From: bheygood at abestsystems.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 09:59:25 -0700 > Subject: [AccessD] Random rows ? > > Hello to the list, > > I need to create a table of one row that looks like below: > > 0000001 > 0000002 > 0000003 > > 2000000 > > > I have had no problem so far. > > But the client wants the table output to be random. Like: > > 1114453 > 0000022 > 2000000 > 0048941 > And so forth. And of course no repeating rows...... > > Any thoughts?? > > Bob > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go-take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Wed Oct 22 16:11:08 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 22 Oct 2008 17:11:08 -0400 Subject: [AccessD] Identifying Primary Key's Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082F7@XLIVMBX35bkup.aig.com> Here's a little snippet of code that you should be able to figure it out from For cntFlds = 0 To curTbl.Fields.count - 1 'If Left(curFld.Name, 4) = "bCur" Then Stop Set curFld = curTbl.Fields(cntFlds) '** Loop though all the indexes in the current table For cntKey = 0 To curTbl.Indexes.count - 1 Set curIdx = curTbl.Indexes(cntKey) '** Loop though all the fields in the current index For cntIdx = 0 To curIdx.Fields.count - 1 Set curIdxFld = curIdx.Fields(cntIdx) '* is the current field part of the primary key? '####################################### If (curFld.Name = curIdxFld.Name) And (curIdx.Primary = True) Then rstTblDetail("PrimaryKey") = True End If '####################################### Next cntIdx ' move to next field in the current index Next cntKey ' move to next index in current table Next cntFlds By definition a primary key has an associated index, and this code says if the name of an index on a table is the same as the name of the field, then check the index property 'Primary'. Now compound primary keys are another kettle of fish. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, October 22, 2008 3:10 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Identifying Primary Key's Is there anything in one of the system tables that identifies a table's primary key column(s)? Susan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheygood at abestsystems.com Wed Oct 22 16:11:43 2008 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 22 Oct 2008 14:11:43 -0700 Subject: [AccessD] Random rows ? In-Reply-To: References: Message-ID: <7277176D7BEB48DEA01AE515F69864B3@speedy> Hello, I don't think I can have more than one autonumber field in a table. I do not see where I can create a "Autonumber Guid". Did you mean "Replication ID"? A2003 My client has relented and accepted the resulting text file in order. I still think there is an easy way to do this tho..... Thanks for your response. Bob Heygood -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 22, 2008 1:35 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Random rows ? Hi Bob One method is to create the table with two fields: Guid - Autonumber Guid > save table, then: Id - Autonumber Long, Format: 0000000 Now, run this sub: Public Sub T2M() Dim rst As DAO.Recordset Dim lngCount As Long Set rst = CurrentDb.OpenRecordset("tblRandom") For lngCount = 1 To 2000000 rst.AddNew ' A record is created. Save it. rst.Update Next rst.Close Set rst = Nothing End Sub This will take a while to run as the table continuously sorts on the (by nature) random Guid. However, this is what you want as - when you open the table - it will be sorted by the Guids, thus the Ids appear in random order. To preserve the formatted field Id, you may at this point add a new text field of length seven which you update to the formatted value of field Id; if the table is fixed, you may now choose to delete the Id field. /gustav >>> bheygood at abestsystems.com 22-10-2008 18:59 >>> Hello to the list, I need to create a table of one row that looks like below: 0000001 0000002 0000003 2000000 I have had no problem so far. But the client wants the table output to be random. Like: 1114453 0000022 2000000 0048941 And so forth. And of course no repeating rows...... Any thoughts?? Bob -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lambert.Heenan at AIG.com Wed Oct 22 16:15:31 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 22 Oct 2008 17:15:31 -0400 Subject: [AccessD] Random rows ? Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FD@XLIVMBX35bkup.aig.com> Not so. :-) Using a random automnumber is just a variation of Gustav's GUID idea. You said you needed to *create* a table, so everything will be a new entry. The table will have two fields, the autonumber, and the one that holds the 0000001 - 2000000 data values. So just run the 2,000,000 iterations of a loop adding records to the table and then sort it by the autonumber field, which will scramble the order of the 2mil records. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Heygood Sent: Wednesday, October 22, 2008 5:07 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? That would only then work for new entries. And, I would have no control over the limits (I need 1 to 2000000). Thanks for responding. Bob -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Wednesday, October 22, 2008 1:36 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Random rows ? Why not use an autonumber field...set the "New Value" property to random??? > From: bheygood at abestsystems.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 09:59:25 -0700 > Subject: [AccessD] Random rows ? > > Hello to the list, > > I need to create a table of one row that looks like below: > > 0000001 > 0000002 > 0000003 > > 2000000 > > > I have had no problem so far. > > But the client wants the table output to be random. Like: > > 1114453 > 0000022 > 2000000 > 0048941 > And so forth. And of course no repeating rows...... > > Any thoughts?? > > Bob > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go-take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Wed Oct 22 16:18:25 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Wed, 22 Oct 2008 16:18:25 -0500 Subject: [AccessD] Random rows ? Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FF@XLIVMBX35bkup.aig.com> Right 'Replication ID' gives you a filed containing GUID strings. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Heygood Sent: Wednesday, October 22, 2008 5:12 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? Hello, I don't think I can have more than one autonumber field in a table. I do not see where I can create a "Autonumber Guid". Did you mean "Replication ID"? A2003 My client has relented and accepted the resulting text file in order. I still think there is an easy way to do this tho..... Thanks for your response. Bob Heygood -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 22, 2008 1:35 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Random rows ? Hi Bob One method is to create the table with two fields: Guid - Autonumber Guid > save table, then: Id - Autonumber Long, Format: 0000000 Now, run this sub: Public Sub T2M() Dim rst As DAO.Recordset Dim lngCount As Long Set rst = CurrentDb.OpenRecordset("tblRandom") For lngCount = 1 To 2000000 rst.AddNew ' A record is created. Save it. rst.Update Next rst.Close Set rst = Nothing End Sub This will take a while to run as the table continuously sorts on the (by nature) random Guid. However, this is what you want as - when you open the table - it will be sorted by the Guids, thus the Ids appear in random order. To preserve the formatted field Id, you may at this point add a new text field of length seven which you update to the formatted value of field Id; if the table is fixed, you may now choose to delete the Id field. /gustav >>> bheygood at abestsystems.com 22-10-2008 18:59 >>> Hello to the list, I need to create a table of one row that looks like below: 0000001 0000002 0000003 2000000 I have had no problem so far. But the client wants the table output to be random. Like: 1114453 0000022 2000000 0048941 And so forth. And of course no repeating rows...... Any thoughts?? 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 ssharkins at gmail.com Wed Oct 22 16:32:29 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 22 Oct 2008 17:32:29 -0400 Subject: [AccessD] Identifying Primary Key's References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082F7@XLIVMBX35bkup.aig.com> Message-ID: <078a01c9348d$b6438080$2f8601c7@SusanOne> I've been trying to do something similar with the ADOX PrimaryKey property, but don't have it quite right yet -- I'll take at look, maybe it'll inspire me. Thanks! Susan H. > For cntKey = 0 To curTbl.Indexes.count - 1 > Set curIdx = curTbl.Indexes(cntKey) > '** Loop though all the fields in the current index > For cntIdx = 0 To curIdx.Fields.count - 1 > Set curIdxFld = curIdx.Fields(cntIdx) > '* is the current field part of the primary key? From bheygood at abestsystems.com Wed Oct 22 17:29:50 2008 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 22 Oct 2008 15:29:50 -0700 Subject: [AccessD] Random rows ? In-Reply-To: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FD@XLIVMBX35bkup.aig.com> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FD@XLIVMBX35bkup.aig.com> Message-ID: <79AB2BF49F6A4AE7A52576F34D8A3FF4@speedy> You are so right. I was hoping to modify the table I had already created which already contained the values I needed, just not in a random order. Thanks again, Bob -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, October 22, 2008 2:16 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? Not so. :-) Using a random automnumber is just a variation of Gustav's GUID idea. You said you needed to *create* a table, so everything will be a new entry. The table will have two fields, the autonumber, and the one that holds the 0000001 - 2000000 data values. So just run the 2,000,000 iterations of a loop adding records to the table and then sort it by the autonumber field, which will scramble the order of the 2mil records. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Heygood Sent: Wednesday, October 22, 2008 5:07 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? That would only then work for new entries. And, I would have no control over the limits (I need 1 to 2000000). Thanks for responding. Bob -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Wednesday, October 22, 2008 1:36 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Random rows ? Why not use an autonumber field...set the "New Value" property to random??? > From: bheygood at abestsystems.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 09:59:25 -0700 > Subject: [AccessD] Random rows ? > > Hello to the list, > > I need to create a table of one row that looks like below: > > 0000001 > 0000002 > 0000003 > > 2000000 > > > I have had no problem so far. > > But the client wants the table output to be random. Like: > > 1114453 > 0000022 > 2000000 > 0048941 > And so forth. And of course no repeating rows...... > > Any thoughts?? > > Bob > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ When your life is on the go-take your life with you. http://clk.atdmt.com/MRT/go/115298558/direct/01/ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 22 17:34:38 2008 From: bheygood at abestsystems.com (Bob Heygood) Date: Wed, 22 Oct 2008 15:34:38 -0700 Subject: [AccessD] Random rows ? In-Reply-To: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FF@XLIVMBX35bkup.aig.com> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FF@XLIVMBX35bkup.aig.com> Message-ID: <4EE1D2BFFABE4D858CCA8324B9D9D077@speedy> And sure enough if we use different types of Autonumber fields, Access will allow two Autonumber fields in the same table. Thanks again to all. Bob -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, October 22, 2008 2:18 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? Right 'Replication ID' gives you a filed containing GUID strings. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Heygood Sent: Wednesday, October 22, 2008 5:12 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Random rows ? Hello, I don't think I can have more than one autonumber field in a table. I do not see where I can create a "Autonumber Guid". Did you mean "Replication ID"? A2003 My client has relented and accepted the resulting text file in order. I still think there is an easy way to do this tho..... Thanks for your response. Bob Heygood -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 22, 2008 1:35 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Random rows ? Hi Bob One method is to create the table with two fields: Guid - Autonumber Guid > save table, then: Id - Autonumber Long, Format: 0000000 Now, run this sub: Public Sub T2M() Dim rst As DAO.Recordset Dim lngCount As Long Set rst = CurrentDb.OpenRecordset("tblRandom") For lngCount = 1 To 2000000 rst.AddNew ' A record is created. Save it. rst.Update Next rst.Close Set rst = Nothing End Sub This will take a while to run as the table continuously sorts on the (by nature) random Guid. However, this is what you want as - when you open the table - it will be sorted by the Guids, thus the Ids appear in random order. To preserve the formatted field Id, you may at this point add a new text field of length seven which you update to the formatted value of field Id; if the table is fixed, you may now choose to delete the Id field. /gustav >>> bheygood at abestsystems.com 22-10-2008 18:59 >>> Hello to the list, I need to create a table of one row that looks like below: 0000001 0000002 0000003 2000000 I have had no problem so far. But the client wants the table output to be random. Like: 1114453 0000022 2000000 0048941 And so forth. And of course no repeating rows...... Any thoughts?? 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 stuart at lexacorp.com.pg Wed Oct 22 17:46:57 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 23 Oct 2008 08:46:57 +1000 Subject: [AccessD] Random rows ? In-Reply-To: References: <002001c7d777$7d2a9050$0301a8c0@HAL9005>, <002201c7d785$e7330050$0d08a8c0@carltonone.local>, Message-ID: <48FFAD61.25377.2E45C6FB@stuart.lexacorp.com.pg> Function RandomOrder(Dummy as long) as Single RandomOrder = Rnd() End Function Then use a query: Select myNumber from myTable Order by RandomOrder(myNumber) Remember to make a call to Randomize at some stage before running the query -- Stuart On 22 Oct 2008 at 9:59, Bob Heygood wrote: > Hello to the list, > > I need to create a table of one row that looks like below: > > 0000001 > 0000002 > 0000003 > > 2000000 > > > I have had no problem so far. > > But the client wants the table output to be random. Like: > > 1114453 > 0000022 > 2000000 > 0048941 > And so forth. And of course no repeating rows...... > > Any thoughts?? > > Bob > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From tewald at wowway.com Wed Oct 22 18:56:37 2008 From: tewald at wowway.com (Thomas Ewald) Date: Wed, 22 Oct 2008 19:56:37 -0400 Subject: [AccessD] About Finding About in 2007 In-Reply-To: References: Message-ID: <000001c934a1$d2918160$77b48420$@com> Does anyone know if there is the equivalent of "About" in Access 2007? That is, how can I tell what patches may or may not have been applied? Hard to believe Microsoft took its best suite of products and changed the interface so much, negating so many years of experience for so many people. Can anyone say, "New Coke"? Thanks, Tom Ewald Detroit Area From ssharkins at gmail.com Wed Oct 22 19:21:10 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 22 Oct 2008 20:21:10 -0400 Subject: [AccessD] Identifying Primary Key's References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082F7@XLIVMBX35bkup.aig.com> Message-ID: <08be01c934a5$427b6100$2f8601c7@SusanOne> Here's what I ended up with, but seems little more complex than it ought to. Function ListPK(tbl As String) 'List primary keys for passed table. 'Must reference ADOX library: 'Microsoft ADO Ext. 2.8 for DDL and Security. Dim cat As New ADOX.Catalog Dim tblADOX As New ADOX.table Dim idxADOX As New ADOX.Index Dim colADOX As New ADOX.Column Dim keyADOX As New ADOX.key cat.ActiveConnection = CurrentProject.AccessConnection For Each tblADOX In cat.Tables If tblADOX.Name = tbl Then If tblADOX.Indexes.Count <> 0 Then For Each idxADOX In tblADOX.Indexes With idxADOX If .PrimaryKey Then For Each colADOX In .Columns Debug.Print colADOX.Name Next End If End With Next Else Debug.Print "No primary key" End If End If Next End Function > Here's a little snippet of code that you should be able to figure it out > from > > For cntFlds = 0 To curTbl.Fields.count - 1 > 'If Left(curFld.Name, 4) = "bCur" Then Stop > Set curFld = curTbl.Fields(cntFlds) From Darryl.Collins at coles.com.au Wed Oct 22 19:28:49 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Thu, 23 Oct 2008 11:28:49 +1100 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <08be01c934a5$427b6100$2f8601c7@SusanOne> Message-ID: <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too. Sorry for repeating this. I have code like this which writes new records into a table - easy: '-------------------------------------------------------------------------------------------------------- Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable) With gDAOrs .AddNew .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With '-------------------------------------------------------------------------------------------------------- What I want is to update an existing record, rather than add a new one. Something Like: With gDAOrs .Update KeyID = lngMyKeyID .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With. Can someone please help with the syntax on this. Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From ssharkins at gmail.com Wed Oct 22 19:37:17 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 22 Oct 2008 20:37:17 -0400 Subject: [AccessD] Updating a specific record using VBA. References: <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <090901c934a7$81f241d0$2f8601c7@SusanOne> You have to find and select the record first -- look up Find and FindFirst Susan H. > > With gDAOrs > .Update KeyID = lngMyKeyID > .Fields("APLIDLoadedNumber").Value = lngAPLID > .Fields("APLIDLoadedDesc").Value = strProgName > .Fields("APLIDasString").Value = strAPLID > .Update > End With. > > Can someone please help with the syntax on this. From dbdoug at gmail.com Wed Oct 22 19:46:40 2008 From: dbdoug at gmail.com (Doug Steele) Date: Wed, 22 Oct 2008 17:46:40 -0700 Subject: [AccessD] About Finding About in 2007 In-Reply-To: <000001c934a1$d2918160$77b48420$@com> References: <000001c934a1$d2918160$77b48420$@com> Message-ID: <4dd71a0c0810221746t6bd6f9b9l5e39dff0de8e07c2@mail.gmail.com> Click on the non-Windows-standard round button at the top left of the screen. Find the semi-hidden 'Access Options' button near the bottom right of the next screen and click on it. Click on the intuitively labelled 'Resources' button in the Access Options screen. Now hunt around on this screen for the 'About' button. There. Wasn't that easy? Doug Steele On Wed, Oct 22, 2008 at 4:56 PM, Thomas Ewald wrote: > Does anyone know if there is the equivalent of "About" in Access 2007? That > is, how can I tell what patches may or may not have been applied? > > Hard to believe Microsoft took its best suite of products and changed the > interface so much, negating so many years of experience for so many people. > Can anyone say, "New Coke"? > > Thanks, > > Tom Ewald > Detroit Area > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From jwelz at hotmail.com Wed Oct 22 21:42:31 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Wed, 22 Oct 2008 20:42:31 -0600 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> References: <08be01c934a5$427b6100$2f8601c7@SusanOne> <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: CurrentDb.Execute ("Update tmpUseOneProdCode Set APLIDLoadedNumber= " & lngAPLID & _ ", APLIDLoadedDesc= '" & strProgName & "', APLIDasString= '" & strAPLID & _ "' Where KeyID = " & lngMyKeyID) or you could open a recordset on the record with a where clause stipulating KeyID = lngMyKeyID, then With gDAOrs .Edit .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .UpdateEnd With. The first example could use a DAO database object variable and a string variable for the sql string. If you create a database object, you may check the database variable .RecordsAffected property to be sure that a record was found and updated. Looks like this is a temp table with one record? CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> From: Darryl.Collins at coles.com.au> To: accessd at databaseadvisors.com> Date: Thu, 23 Oct 2008 11:28:49 +1100> Subject: [AccessD] Updating a specific record using VBA.> > Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too.> > Sorry for repeating this.> > I have code like this which writes new records into a table - easy:> '--------------------------------------------------------------------------------------------------------> Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable)> > With gDAOrs> .AddNew> .Fields("APLIDLoadedNumber").Value = lngAPLID> .Fields("APLIDLoadedDesc").Value = strProgName> .Fields("APLIDasString").Value = strAPLID> .Update> End With> > '--------------------------------------------------------------------------------------------------------> > What I want is to update an existing record, rather than add a new one.> Something Like:> > With gDAOrs> .Update KeyID = lngMyKeyID> .Fields("APLIDLoadedNumber").Value = lngAPLID> .Fields("APLIDLoadedDesc").Value = strProgName> .Fields("APLIDasString").Value = strAPLID> .Update> End With.> > Can someone please help with the syntax on this.> > Cheers> Darryl. _________________________________________________________________ From rockysmolin at bchacc.com Thu Oct 23 00:04:04 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 22 Oct 2008 22:04:04 -0700 Subject: [AccessD] z score to percentile calculator Message-ID: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005> Dear List: I need a z score to percentile calculator. Does anyone have a link to such a routine? Or is there a built in function for this in Access or VBA? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From andy at minstersystems.co.uk Thu Oct 23 00:42:20 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 23 Oct 2008 06:42:20 +0100 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <1FAD2F94F8A24834ADCC47D32E961DDE@MINSTER> Hi Darryl Quick way is using an index to find the record. So With gDAOrs .Index = "NameOfIndexThatYouCreateOnKeyField" .Seek "=",lngMyKeyId If Not .NoMatch then .Edit .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End If End With. HTH Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: 23 October 2008 01:29 To: 'Access Developers discussion and problem solving' Subject: [AccessD] Updating a specific record using VBA. Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too. Sorry for repeating this. I have code like this which writes new records into a table - easy: '--------------------------------------------------------------------------- ----------------------------- Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable) With gDAOrs .AddNew .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With '--------------------------------------------------------------------------- ----------------------------- What I want is to update an existing record, rather than add a new one. Something Like: With gDAOrs .Update KeyID = lngMyKeyID .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With. Can someone please help with the syntax on this. Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- 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 Oct 23 01:48:41 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 23 Oct 2008 16:48:41 +1000 Subject: [AccessD] z score to percentile calculator In-Reply-To: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005> Message-ID: <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> Simplest way is to set a reference to Excel and then use the NormSDist() function: Function NormSDist(ZScore As Double) As Double 'Dim xlapp As New Excel.Application 'NormSDist = xlapp.NormSDist(ZScore) 'xlapp.Quit 'Set xlapp = Nothing NormSDist = 1/2 End Function -- Stuart On 22 Oct 2008 at 22:04, Rocky Smolin at Beach Access wrote: > Dear List: > > I need a z score to percentile calculator. Does anyone have a link to such > a routine? Or is there a built in function for this in Access or VBA? > > MTIA > > > > > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.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 Oct 23 01:55:22 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 23 Oct 2008 16:55:22 +1000 Subject: [AccessD] z score to percentile calculator In-Reply-To: <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> Message-ID: <4900AC7A.29688.53AB46@stuart.lexacorp.com.pg> On 23 Oct 2008 at 16:48, Stuart McLachlan wrote: > NormSDist = 1/2 Don't know how that line snuck in there. Delete it :-( -- Stuart From stuart at lexacorp.com.pg Thu Oct 23 01:57:14 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 23 Oct 2008 16:57:14 +1000 Subject: [AccessD] z score to percentile calculator In-Reply-To: <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> Message-ID: <4900ACEA.18574.555F19@stuart.lexacorp.com.pg> Oops, try this: Simplest way is to set a reference to Excel and then use the NormSDist() function: Function NormSDist(ZScore As Double) As Double Dim xlapp As New Excel.Application NormSDist = xlapp.NormSDist(ZScore) xlapp.Quit Set xlapp = Nothing End Function -- Stuart From Gustav at cactus.dk Thu Oct 23 02:54:45 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Thu, 23 Oct 2008 09:54:45 +0200 Subject: [AccessD] Random rows ? Message-ID: Hi Bob > I was hoping to modify the table I had already created which already > contained the values I needed, just not in a random order. Well, that is quite different from your original statement: > I need to create a table of one row .. Anyway, add the autonumber field of Guid (ReplicationId) and make that the primary key. Or, do as Stuart suggests by using Rnd(). This is also what I what do if the table exists. /gustav >>> bheygood at abestsystems.com 23-10-2008 00:29 >>> You are so right. I was hoping to modify the table I had already created which already contained the values I needed, just not in a random order. From stuart at lexacorp.com.pg Thu Oct 23 06:22:47 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 23 Oct 2008 21:22:47 +1000 Subject: [AccessD] z score to percentile calculator In-Reply-To: <4900ACEA.18574.555F19@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg>, <4900ACEA.18574.555F19@stuart.lexacorp.com.pg> Message-ID: <4900EB27.23890.1487F6A@stuart.lexacorp.com.pg> Thinking about this a bit more, I'd probably use the function below once to build a look up table. On second thoughts, I probably build a lookup table for speed: Function CreateTable() Dim strsql As String Dim i As Currency 'use Currency to avoid rounding errors in ZScores Dim xlapp As New Excel.Application strsql = "Create table tblZScoreToPercentile (ZScore Double primary key,Percentile double)" CurrentDb.Execute strsql For i = -5 To 5 Step 0.01 CurrentDb.Execute "Insert into tblZScoreToPercentile (ZScore,Percentile) values(" & i & "," & xlapp.NormSDist(i) & ")" Next xlapp.Quit Set xlapp = Nothing End Function -- Stuart On 23 Oct 2008 at 16:57, Stuart McLachlan wrote: > Oops, try this: > > Simplest way is to set a reference to Excel and then use the NormSDist() > function: > > Function NormSDist(ZScore As Double) As Double > Dim xlapp As New Excel.Application > NormSDist = xlapp.NormSDist(ZScore) > xlapp.Quit > Set xlapp = Nothing > End Function > -- > Stuart > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Oct 23 08:41:21 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 23 Oct 2008 13:41:21 +0000 Subject: [AccessD] Random rows ? In-Reply-To: <79AB2BF49F6A4AE7A52576F34D8A3FF4@speedy> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082FD@XLIVMBX35bkup.aig.com> <79AB2BF49F6A4AE7A52576F34D8A3FF4@speedy> Message-ID: If you already have your 2 milllion records...and want a random sort...or what appears to be a random sort...pick another field...lets say first name as an example...and sort descending on the 3rd character? Mid([firstname],3,1) Just a thought. Good Luck, Mark > From: bheygood at abestsystems.com > To: accessd at databaseadvisors.com > Date: Wed, 22 Oct 2008 15:29:50 -0700 > Subject: Re: [AccessD] Random rows ? > > You are so right. > I was hoping to modify the table I had already created which already > contained the values I needed, just not in a random order. > > Thanks again, > > Bob > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert > Sent: Wednesday, October 22, 2008 2:16 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Random rows ? > > Not so. :-) > > Using a random automnumber is just a variation of Gustav's GUID idea. You > said you needed to *create* a table, so everything will be a new entry. > > The table will have two fields, the autonumber, and the one that holds the > 0000001 - 2000000 data values. > > So just run the 2,000,000 iterations of a loop adding records to the table > and then sort it by the autonumber field, which will scramble the order of > the 2mil records. > > Lambert > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Heygood > Sent: Wednesday, October 22, 2008 5:07 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Random rows ? > > That would only then work for new entries. > And, I would have no control over the limits (I need 1 to 2000000). > > Thanks for responding. > > Bob > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte > Sent: Wednesday, October 22, 2008 1:36 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Random rows ? > > > Why not use an autonumber field...set the "New Value" property to random??? > > >> From: bheygood at abestsystems.com >> To: accessd at databaseadvisors.com >> Date: Wed, 22 Oct 2008 09:59:25 -0700 >> Subject: [AccessD] Random rows ? >> >> Hello to the list, >> >> I need to create a table of one row that looks like below: >> >> 0000001 >> 0000002 >> 0000003 >> >> 2000000 >> >> >> I have had no problem so far. >> >> But the client wants the table output to be random. Like: >> >> 1114453 >> 0000022 >> 2000000 >> 0048941 >> And so forth. And of course no repeating rows...... >> >> Any thoughts?? >> >> Bob >> >> -- >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > _________________________________________________________________ > When your life is on the go-take your life with you. > http://clk.atdmt.com/MRT/go/115298558/direct/01/ > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 From rockysmolin at bchacc.com Thu Oct 23 08:49:39 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 23 Oct 2008 06:49:39 -0700 Subject: [AccessD] z score to percentile calculator In-Reply-To: <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005> <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg> Message-ID: <230F3BC110D6448B85C657005516C4C4@HAL9005> Perfect. Exactly what I was looking for. I think. I'll give it a test. But it looks right. I had read in MSDN about this technique but didn't know what the Excel function was or if there was one. That I couldn't find in the Excel help. Interesting app, BTW. Pediatric endocrinologist at Children's Hospital treating diabetics primarily, wants to put together a db to slice and dice data with the objective of doing various kinds of studies. Big 'what if' kind of database. So he needs the Z (which I can calculate) and percentile on things like height vs. Age, weight vs. Age, head circumference, etc. Thank you. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Wednesday, October 22, 2008 11:49 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] z score to percentile calculator Simplest way is to set a reference to Excel and then use the NormSDist() function: Function NormSDist(ZScore As Double) As Double 'Dim xlapp As New Excel.Application 'NormSDist = xlapp.NormSDist(ZScore) 'xlapp.Quit 'Set xlapp = Nothing NormSDist = 1/2 End Function -- Stuart On 22 Oct 2008 at 22:04, Rocky Smolin at Beach Access wrote: > Dear List: > > I need a z score to percentile calculator. Does anyone have a link to > such a routine? Or is there a built in function for this in Access or VBA? > > MTIA > > > > > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Thu Oct 23 08:53:19 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 23 Oct 2008 06:53:19 -0700 Subject: [AccessD] z score to percentile calculator In-Reply-To: <4900EB27.23890.1487F6A@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900AAE9.3724.4D8CAF@stuart.lexacorp.com.pg>, <4900ACEA.18574.555F19@stuart.lexacorp.com.pg> <4900EB27.23890.1487F6A@stuart.lexacorp.com.pg> Message-ID: Stuart: You think the function would be that slow? I don't know how many calls there would be to it for any inquiry. But the number of patients in the db will probably never be over 5-6000. Still I'll probably go with the table. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Thursday, October 23, 2008 4:23 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] z score to percentile calculator Thinking about this a bit more, I'd probably use the function below once to build a look up table. On second thoughts, I probably build a lookup table for speed: Function CreateTable() Dim strsql As String Dim i As Currency 'use Currency to avoid rounding errors in ZScores Dim xlapp As New Excel.Application strsql = "Create table tblZScoreToPercentile (ZScore Double primary key,Percentile double)" CurrentDb.Execute strsql For i = -5 To 5 Step 0.01 CurrentDb.Execute "Insert into tblZScoreToPercentile (ZScore,Percentile) values(" & i & "," & xlapp.NormSDist(i) & ")" Next xlapp.Quit Set xlapp = Nothing End Function -- Stuart On 23 Oct 2008 at 16:57, Stuart McLachlan wrote: > Oops, try this: > > Simplest way is to set a reference to Excel and then use the NormSDist() > function: > > Function NormSDist(ZScore As Double) As Double > Dim xlapp As New Excel.Application > NormSDist = xlapp.NormSDist(ZScore) > xlapp.Quit > Set xlapp = Nothing > End Function > -- > Stuart > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Thu Oct 23 10:39:44 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 23 Oct 2008 08:39:44 -0700 Subject: [AccessD] Recover a password Message-ID: <6E07329FE2434527BC0BFFDBB2C1ADF9@HAL9005> Dear List: I have a password protected mdb which I need to open right away - can't wait to find the user who passworded it. What's the best way to recover the password? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From rockysmolin at bchacc.com Thu Oct 23 10:51:02 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 23 Oct 2008 08:51:02 -0700 Subject: [AccessD] Recover a password In-Reply-To: <6E07329FE2434527BC0BFFDBB2C1ADF9@HAL9005> References: <6E07329FE2434527BC0BFFDBB2C1ADF9@HAL9005> Message-ID: <585BD8B21E5045EDBC1BFF6A8778874A@HAL9005> Never mind - got this cracker off the 'net: http://www.nirsoft.net/utils/accesspv.html Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Thursday, October 23, 2008 8:40 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Recover a password Dear List: I have a password protected mdb which I need to open right away - can't wait to find the user who passworded it. What's the best way to recover the password? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Thu Oct 23 10:59:13 2008 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 23 Oct 2008 10:59:13 -0500 Subject: [AccessD] Recover a password In-Reply-To: <6E07329FE2434527BC0BFFDBB2C1ADF9@HAL9005> References: <6E07329FE2434527BC0BFFDBB2C1ADF9@HAL9005> Message-ID: <3E861160A93B4DF9AEBB84C63582F2AD@danwaters> You can import all the objects into a new database. Then you'll need to reset startup options, references, database name, code options, etc. Then go find that user!! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Thursday, October 23, 2008 10:40 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Recover a password Dear List: I have a password protected mdb which I need to open right away - can't wait to find the user who passworded it. What's the best way to recover the password? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From fuller.artful at gmail.com Thu Oct 23 12:07:59 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Thu, 23 Oct 2008 13:07:59 -0400 Subject: [AccessD] SelPos etc. Message-ID: <29f585dd0810231007maffb401p8ff4d2a576784e0c@mail.gmail.com> I need to guarantee that when a user clicks a date control, the cursor will appear at position 1 within the control. Currently it appears wherever you happen to click the mouse, and this has been deemed unacceptable by the client. I've tried various things like .ctl.SelPos = 1 and it's not working. Any suggestions? TIA Arthur From bill_patten at embarqmail.com Thu Oct 23 12:27:56 2008 From: bill_patten at embarqmail.com (Bill Patten) Date: Thu, 23 Oct 2008 10:27:56 -0700 Subject: [AccessD] SelPos etc. In-Reply-To: <29f585dd0810231007maffb401p8ff4d2a576784e0c@mail.gmail.com> References: <29f585dd0810231007maffb401p8ff4d2a576784e0c@mail.gmail.com> Message-ID: <4383D782563F4115B6DF841FFFCB7FD2@BPCS> Hi Arthur try txtboxname.selStart = 0 in the onClick event. HTH Bill ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Thursday, October 23, 2008 10:07 AM Subject: [AccessD] SelPos etc. I need to guarantee that when a user clicks a date control, the cursor will appear at position 1 within the control. Currently it appears wherever you happen to click the mouse, and this has been deemed unacceptable by the client. I've tried various things like .ctl.SelPos = 1 and it's not working. Any suggestions? TIA Arthur -- 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 Oct 23 13:24:45 2008 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Thu, 23 Oct 2008 13:24:45 -0500 Subject: [AccessD] SelPos etc. Message-ID: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC085C9@XLIVMBX35bkup.aig.com> That'll do it, but I just avoid having users type dates. When they click on a date textbox I pop up a calendar. Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Thursday, October 23, 2008 1:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SelPos etc. Hi Arthur try txtboxname.selStart = 0 in the onClick event. HTH Bill ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Thursday, October 23, 2008 10:07 AM Subject: [AccessD] SelPos etc. I need to guarantee that when a user clicks a date control, the cursor will appear at position 1 within the control. Currently it appears wherever you happen to click the mouse, and this has been deemed unacceptable by the client. I've tried various things like .ctl.SelPos = 1 and it's not working. Any suggestions? TIA Arthur -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 23 15:40:11 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 24 Oct 2008 06:40:11 +1000 Subject: [AccessD] z score to percentile calculator In-Reply-To: References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900EB27.23890.1487F6A@stuart.lexacorp.com.pg>, Message-ID: <49016DCB.25737.346CCE9@stuart.lexacorp.com.pg> The problem is that it has to open and close an Excel application every time it is called. OK if you are calling it for a single record, but embed it in a query based on your 5-6000 row table and it would take a looooong time :-) -- Stuart On 23 Oct 2008 at 6:53, Rocky Smolin at Beach Access wrote: > Stuart: > > You think the function would be that slow? I don't know how many calls > there would be to it for any inquiry. But the number of patients in the db > will probably never be over 5-6000. > > Still I'll probably go with the table. > > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.e-z-mrp.com > www.bchacc.com > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan > Sent: Thursday, October 23, 2008 4:23 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] z score to percentile calculator > > Thinking about this a bit more, I'd probably use the function below once to > build a look up table. > > On second thoughts, I probably build a lookup table for speed: > > Function CreateTable() > Dim strsql As String > Dim i As Currency 'use Currency to avoid rounding errors in ZScores Dim > xlapp As New Excel.Application strsql = "Create table tblZScoreToPercentile > (ZScore Double primary key,Percentile double)" > CurrentDb.Execute strsql > For i = -5 To 5 Step 0.01 > CurrentDb.Execute "Insert into tblZScoreToPercentile (ZScore,Percentile) > values(" & i & "," > & xlapp.NormSDist(i) & ")" > Next > xlapp.Quit > Set xlapp = Nothing > End Function > > -- > Stuart > > > On 23 Oct 2008 at 16:57, Stuart McLachlan wrote: > > > Oops, try this: > > > > Simplest way is to set a reference to Excel and then use the NormSDist() > > function: > > > > Function NormSDist(ZScore As Double) As Double > > Dim xlapp As New Excel.Application > > NormSDist = xlapp.NormSDist(ZScore) > > xlapp.Quit > > Set xlapp = Nothing > > End Function > > -- > > Stuart > > > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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.Serrano at dayzim.com Thu Oct 23 17:29:14 2008 From: John.Serrano at dayzim.com (Serrano, John K) Date: Thu, 23 Oct 2008 18:29:14 -0400 Subject: [AccessD] SelPos etc. In-Reply-To: <4383D782563F4115B6DF841FFFCB7FD2@BPCS> Message-ID: <441B3C415B36F54397BC7CC8567776E703A68A41@tagmail.corp.dayzim.com> Hey I tried that and it works GREAT!!!! Thanks!!! John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Thursday, October 23, 2008 1:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SelPos etc. Hi Arthur try txtboxname.selStart = 0 in the onClick event. HTH Bill ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Thursday, October 23, 2008 10:07 AM Subject: [AccessD] SelPos etc. I need to guarantee that when a user clicks a date control, the cursor will appear at position 1 within the control. Currently it appears wherever you happen to click the mouse, and this has been deemed unacceptable by the client. I've tried various things like .ctl.SelPos = 1 and it's not working. Any suggestions? TIA Arthur -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Thu Oct 23 17:35:18 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 23 Oct 2008 15:35:18 -0700 Subject: [AccessD] z score to percentile calculator In-Reply-To: <49016DCB.25737.346CCE9@stuart.lexacorp.com.pg> References: <1B344D93DB3047FA9A0D4E237D61B9AE@HAL9005>, <4900EB27.23890.1487F6A@stuart.lexacorp.com.pg>, <49016DCB.25737.346CCE9@stuart.lexacorp.com.pg> Message-ID: Got it. Table building it is. And I suppose I only have to build it once and store it in the front end. Thanks again. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Thursday, October 23, 2008 1:40 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] z score to percentile calculator The problem is that it has to open and close an Excel application every time it is called. OK if you are calling it for a single record, but embed it in a query based on your 5-6000 row table and it would take a looooong time :-) -- Stuart On 23 Oct 2008 at 6:53, Rocky Smolin at Beach Access wrote: > Stuart: > > You think the function would be that slow? I don't know how many calls > there would be to it for any inquiry. But the number of patients in > the db will probably never be over 5-6000. > > Still I'll probably go with the table. > > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.e-z-mrp.com > www.bchacc.com > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart > McLachlan > Sent: Thursday, October 23, 2008 4:23 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] z score to percentile calculator > > Thinking about this a bit more, I'd probably use the function below > once to build a look up table. > > On second thoughts, I probably build a lookup table for speed: > > Function CreateTable() > Dim strsql As String > Dim i As Currency 'use Currency to avoid rounding errors in ZScores > Dim xlapp As New Excel.Application strsql = "Create table > tblZScoreToPercentile (ZScore Double primary key,Percentile double)" > CurrentDb.Execute strsql > For i = -5 To 5 Step 0.01 > CurrentDb.Execute "Insert into tblZScoreToPercentile > (ZScore,Percentile) values(" & i & "," > & xlapp.NormSDist(i) & ")" > Next > xlapp.Quit > Set xlapp = Nothing > End Function > > -- > Stuart > > > On 23 Oct 2008 at 16:57, Stuart McLachlan wrote: > > > Oops, try this: > > > > Simplest way is to set a reference to Excel and then use the > > NormSDist() > > function: > > > > Function NormSDist(ZScore As Double) As Double Dim xlapp As New > > Excel.Application NormSDist = xlapp.NormSDist(ZScore) xlapp.Quit > > Set xlapp = Nothing End Function > > -- > > Stuart > > > > -- > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 sc.rr.com Thu Oct 23 17:53:19 2008 From: bheid at sc.rr.com (Bobby Heid) Date: Thu, 23 Oct 2008 18:53:19 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> References: <08be01c934a5$427b6100$2f8601c7@SusanOne> <57E6E6CA42105A48B977303A2CDC2720077449CCAB@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <00d301c93562$24f76530$6ee62f90$@rr.com> In addition to using the methods suggested by others you could (air code): 'No recordset needed Dim db as dao.database Dim sql as string Set db=currentdb() 'the following does not handle quotes in the text fields Sql="UPDATE tablename " & _ "SET APLIDLoadedNumber = " & lngAPLID & ", " & _ " APLIDLoadedDesc = '" & strProgName & ', " & _ " APLIDasString = '" & strAPLID & " " & _ "WHERE KeyID = " & lngMyKeyID & ";" Db.execute sql,dbfailonerror Db.close Set db=nothing Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: Wednesday, October 22, 2008 8:29 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Updating a specific record using VBA. Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too. Sorry for repeating this. I have code like this which writes new records into a table - easy: '--------------------------------------------------------------------------- ----------------------------- Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable) With gDAOrs .AddNew .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With '--------------------------------------------------------------------------- ----------------------------- What I want is to update an existing record, rather than add a new one. Something Like: With gDAOrs .Update KeyID = lngMyKeyID .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With. Can someone please help with the syntax on this. Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Thu Oct 23 17:57:47 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Fri, 24 Oct 2008 09:57:47 +1100 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <00d301c93562$24f76530$6ee62f90$@rr.com> Message-ID: <57E6E6CA42105A48B977303A2CDC2720077449CCB2@WPEXCH22.retail.ad.cmltd.net.au> Very Nice Bobby... :) I will test this out today and see which method suits, although I like this approach a lot. Cheers and thank you everyone for their input. Darryl -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Friday, 24 October 2008 9:53 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Updating a specific record using VBA. In addition to using the methods suggested by others you could (air code): 'No recordset needed Dim db as dao.database Dim sql as string Set db=currentdb() 'the following does not handle quotes in the text fields Sql="UPDATE tablename " & _ "SET APLIDLoadedNumber = " & lngAPLID & ", " & _ " APLIDLoadedDesc = '" & strProgName & ', " & _ " APLIDasString = '" & strAPLID & " " & _ "WHERE KeyID = " & lngMyKeyID & ";" Db.execute sql,dbfailonerror Db.close Set db=nothing Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: Wednesday, October 22, 2008 8:29 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Updating a specific record using VBA. Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too. Sorry for repeating this. I have code like this which writes new records into a table - easy: '--------------------------------------------------------------------------- ----------------------------- Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable) With gDAOrs .AddNew .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With '--------------------------------------------------------------------------- ----------------------------- What I want is to update an existing record, rather than add a new one. Something Like: With gDAOrs .Update KeyID = lngMyKeyID .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With. Can someone please help with the syntax on this. Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From bheid at sc.rr.com Thu Oct 23 20:57:22 2008 From: bheid at sc.rr.com (Bobby Heid) Date: Thu, 23 Oct 2008 21:57:22 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720077449CCB2@WPEXCH22.retail.ad.cmltd.net.au> References: <00d301c93562$24f76530$6ee62f90$@rr.com> <57E6E6CA42105A48B977303A2CDC2720077449CCB2@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <000f01c9357b$db6cf410$9246dc30$@rr.com> Darryl, Glad to help. I generally prefer to use the sql/db.execute method over the .edit/.add and .update methods. I believe in many cases that the sql methods are faster. But the .edit/.add methods do have their place. Just to make the example complete, to insert a new record via SQL would be something like: 'No recordset needed Dim db as dao.database Dim sql as string Set db=currentdb() 'the following does not handle quotes in the text fields Sql="INSERT INTO tablename (APLIDLoadedNumber, APLIDLoadedDesc, APLIDasString) " & _ "VALUES (" & _ lngAPLID & ", " & _ "'" & strProgName & "', " & _ "'" & strAPLID & "');" Db.execute sql,dbfailonerror Db.close Set db=nothing The thing with the above code is that you have to requery the db to get the ID if you need it after insertion. In that case I would use the method that you originally used. In looking at my original example, I left out a couple of quotes. Here's the corrected version of the sql: Sql="UPDATE tablename " & _ "SET APLIDLoadedNumber = " & lngAPLID & ", " & _ " APLIDLoadedDesc = '" & strProgName & "', " & _ " APLIDasString = '" & strAPLID & "' " & _ "WHERE KeyID = " & lngMyKeyID & ";" Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: Thursday, October 23, 2008 6:58 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Updating a specific record using VBA. Very Nice Bobby... :) I will test this out today and see which method suits, although I like this approach a lot. Cheers and thank you everyone for their input. Darryl -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Friday, 24 October 2008 9:53 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Updating a specific record using VBA. In addition to using the methods suggested by others you could (air code): 'No recordset needed Dim db as dao.database Dim sql as string Set db=currentdb() 'the following does not handle quotes in the text fields Sql="UPDATE tablename " & _ "SET APLIDLoadedNumber = " & lngAPLID & ", " & _ " APLIDLoadedDesc = '" & strProgName & ', " & _ " APLIDasString = '" & strAPLID & " " & _ "WHERE KeyID = " & lngMyKeyID & ";" Db.execute sql,dbfailonerror Db.close Set db=nothing Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darryl Collins Sent: Wednesday, October 22, 2008 8:29 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Updating a specific record using VBA. Bah! I have asked this before but I cannot find the answer in the archives. and it is sooo darn simple too. Sorry for repeating this. I have code like this which writes new records into a table - easy: '--------------------------------------------------------------------------- ----------------------------- Set gDAOrs = gDAOdb.OpenRecordset("tmpUseOneProdCode", dbOpenTable) With gDAOrs .AddNew .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With '--------------------------------------------------------------------------- ----------------------------- What I want is to update an existing record, rather than add a new one. Something Like: With gDAOrs .Update KeyID = lngMyKeyID .Fields("APLIDLoadedNumber").Value = lngAPLID .Fields("APLIDLoadedDesc").Value = strProgName .Fields("APLIDasString").Value = strAPLID .Update End With. Can someone please help with the syntax on this. Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Fri Oct 24 00:34:54 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Thu, 23 Oct 2008 23:34:54 -0600 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <000f01c9357b$db6cf410$9246dc30$@rr.com> References: <00d301c93562$24f76530$6ee62f90$@rr.com> <57E6E6CA42105A48B977303A2CDC2720077449CCB2@WPEXCH22.retail.ad.cmltd.net.au> <000f01c9357b$db6cf410$9246dc30$@rr.com> Message-ID: Other than the redundant trailing semi colon and the incorrect tablename, your SQL now evaluates to what I posted previously in this thread. I did not specify the dbFailOnError parameter, suggesting instead a check on the database object variable's RecordsAffected property since that allows one to confirm the update and hence, a means to verify the absence of an error. Also, there was an unrectified bug acknowledged by M$ relating to the use of the dbFailOnError parameter against ODBC tables with Jet 3.5 and 3.51: http://support.microsoft.com/kb/195226. It can also trigger an IPF and crash Access with older operating systems: http://support.microsoft.com/kb/180348. dbFailOnError is useful for development purposes because it will give a developer a meaningul error message explaining the reason for the error and provide a debugging tool. The error is far less useful to a user as it is too cryptic. For these reasons, I nearly always get rid of the parameter prior to delivery. If you don't know how many records should be affected, which is not the case here, then the dbFailOnError raises a trappable error that can be used to do something like roll back a transaction should a block of records all need to be processed concurrently. CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> From: bheid at sc.rr.com> To: accessd at databaseadvisors.com> Date: Thu, 23 Oct 2008 21:57:22 -0400> Subject: Re: [AccessD] Updating a specific record using VBA.> > Darryl,> > Glad to help. I generally prefer to use the sql/db.execute method over the> .edit/.add and .update methods. I believe in many cases that the sql> methods are faster. But the .edit/.add methods do have their place.> > Just to make the example complete, to insert a new record via SQL would be> something like:> > 'No recordset needed> Dim db as dao.database> Dim sql as string> > Set db=currentdb()> > 'the following does not handle quotes in the text fields> Sql="INSERT INTO tablename (APLIDLoadedNumber, APLIDLoadedDesc,> APLIDasString) " & _> "VALUES (" & _> lngAPLID & ", " & _> "'" & strProgName & "', " & _> "'" & strAPLID & "');"> > Db.execute sql,dbfailonerror> > Db.close> Set db=nothing> > The thing with the above code is that you have to requery the db to get the> ID if you need it after insertion. In that case I would use the method that> you originally used.> > In looking at my original example, I left out a couple of quotes. Here's> the corrected version of the sql:> > Sql="UPDATE tablename " & _> "SET APLIDLoadedNumber = " & lngAPLID & ", " & _> " APLIDLoadedDesc = '" & strProgName & "', " & _> " APLIDasString = '" & strAPLID & "' " & _> "WHERE KeyID = " & lngMyKeyID & ";"> > Thanks,> Bobby _________________________________________________________________ From Gustav at cactus.dk Fri Oct 24 02:04:43 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Fri, 24 Oct 2008 09:04:43 +0200 Subject: [AccessD] Updating a specific record using VBA. Message-ID: Hi Bobby For a single update that may be true but for many records like in a loop it is indeed not. That's one of the ways you can pinpoint an ASP or old-school VB programmer - they write code using endless series of sql execute methods. I once cleaned up an application made in Access but converted from a previous VB application by someone else. It was well done - no sloppy code - but the client complained about the slowness of an update routine. It ran several interrelated loops retrieving, verifying, and uploading data and pictures from/to an FTP server where all datatable manipulation was done calling SQL code. I transferred this to a system of recordsets and the speed increase was so high that I hardly believed it myself - and I gained eternal guru status at the client! Thus, as you write: > .. the .edit/.add methods do have their place. /gustav >>> bheid at sc.rr.com 24-10-2008 03:57 >>> I believe in many cases that the sql methods are faster. From andy at minstersystems.co.uk Fri Oct 24 03:56:26 2008 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 24 Oct 2008 09:56:26 +0100 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: Message-ID: <21AE76C3E3B348BFB54C1DEE485207F3@MINSTER> That's my experience too (with indexes of course). That's why my suggestion used that. I agree 100% with Gustav. Andy Lacey -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 24 October 2008 08:05 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Updating a specific record using VBA. Hi Bobby For a single update that may be true but for many records like in a loop it is indeed not. That's one of the ways you can pinpoint an ASP or old-school VB programmer - they write code using endless series of sql execute methods. I once cleaned up an application made in Access but converted from a previous VB application by someone else. It was well done - no sloppy code - but the client complained about the slowness of an update routine. It ran several interrelated loops retrieving, verifying, and uploading data and pictures from/to an FTP server where all datatable manipulation was done calling SQL code. I transferred this to a system of recordsets and the speed increase was so high that I hardly believed it myself - and I gained eternal guru status at the client! Thus, as you write: > .. the .edit/.add methods do have their place. /gustav >>> bheid at sc.rr.com 24-10-2008 03:57 >>> I believe in many cases that the sql methods are faster. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Fri Oct 24 06:49:21 2008 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 24 Oct 2008 07:49:21 -0400 Subject: [AccessD] SelPos etc. In-Reply-To: <4383D782563F4115B6DF841FFFCB7FD2@BPCS> References: <29f585dd0810231007maffb401p8ff4d2a576784e0c@mail.gmail.com> <4383D782563F4115B6DF841FFFCB7FD2@BPCS> Message-ID: Arthur You might want to also be sure that the entire field is then selected ... txtboxname.SelStart = 0 txtboxname.SelLength = Nz(Len(txtboxname), 0) Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: Thursday, October 23, 2008 13:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SelPos etc. Hi Arthur try txtboxname.selStart = 0 in the onClick event. HTH Bill ----- Original Message ----- From: "Arthur Fuller" To: "Access Developers discussion and problem solving" Sent: Thursday, October 23, 2008 10:07 AM Subject: [AccessD] SelPos etc. I need to guarantee that when a user clicks a date control, the cursor will appear at position 1 within the control. Currently it appears wherever you happen to click the mouse, and this has been deemed unacceptable by the client. I've tried various things like .ctl.SelPos = 1 and it's not working. Any suggestions? TIA Arthur -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From fuller.artful at gmail.com Fri Oct 24 09:18:13 2008 From: fuller.artful at gmail.com (Arthur Fuller) Date: Fri, 24 Oct 2008 10:18:13 -0400 Subject: [AccessD] SelPos etc. In-Reply-To: References: <29f585dd0810231007maffb401p8ff4d2a576784e0c@mail.gmail.com> <4383D782563F4115B6DF841FFFCB7FD2@BPCS> Message-ID: <29f585dd0810240718h3acbcda5tbe87e5992170d01d@mail.gmail.com> Thanks, guys. I've been buried so deep in SQL Server for the past few months that I've forgotten almost all the Access basics that I ever knew. :) So now I'm a great career position. I don't know much about .NET and have forgotten everything I ever knew about Access, so the only thing I have left is SQL Server -- not that that is necessarily a bad thing, but it is career-limiting in terms of breadth. O well. We make decisions and suffer consequences. On the up side, I know a whole lot more about SQL Server than I did even months ago. Thanks, A. From rockysmolin at bchacc.com Fri Oct 24 10:18:32 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Fri, 24 Oct 2008 08:18:32 -0700 Subject: [AccessD] [dba-OT] You canceled the previous operation In-Reply-To: <7a037ed50810231316q2313adefpc77c1c5f98d7c9cb@mail.gmail.com> References: <4F80A499AB33438D973EABB1A5A95E66@HAL9005> <7a037ed50810231316q2313adefpc77c1c5f98d7c9cb@mail.gmail.com> Message-ID: Sounds like a lot of work. And I'm wondering if the theory is right. You won't believe this kluge of a temporary workaround: Private Sub cboFindPatient_AfterUpdate() On Error GoTo Bogus: If Not IsNull(Me.cboFindPatient) Then Me.RecordsetClone.FindFirst "fldPatientID = " & Me.cboFindPatient.Column(0) Me.Bookmark = Me.RecordsetClone.Bookmark 'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBreakfast 'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateLunch 'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateDinner 'Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBedtime Me.cmdMainMenu.SetFocus Me.cboFindPatient.Visible = False End If Exit Sub Bogus: Me.Bookmark = Me.RecordsetClone.Bookmark Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBreakfast Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateLunch Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateDinner Forms.frmPatient.[sfrmInsulinModule-Injection].Form.UpdateBedtime Me.cmdMainMenu.SetFocus Me.cboFindPatient.Visible = False End Sub So it actually error on the first Me.Bookmark = goes to the Bogus: error routine, and carries on successfully. WTF? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: dba-ot-bounces at databaseadvisors.com [mailto:dba-ot-bounces at databaseadvisors.com] On Behalf Of Stephen Pickering Sent: Thursday, October 23, 2008 1:16 PM To: Off Topic Subject: Re: [dba-OT] You canceled the previous operation I hate to suggest such a thing, but have you tried importing all of your objects, except the code, into a new mdb, then copying the code from the modules in your existing mdb and pasting into new modules? It's cumbersome, but I wonder if something hasn't gone corrupt on you somewhere, and I'm assuming you've already done the Repair and Compact. I suggest the copying and pasting of your code instead of just importing the modules so you don't import the corruption with the code. One other suggestion, before you try that; did you do a Decompile and Recompile? On Thu, Oct 23, 2008 at 2:35 PM, Rocky Smolin at Beach Access Software wrote: > Dear List: > > I am getting the err 'You canceled the previous operation in a simple > module that works in lots of other apps. The error occurs in the line > Me.Bookmark = Me.RecordsetClone.Bookmark. > > Oddly if I click Debug and then, in the code window, click F5 to > continue, it goes right ahead and when I go back to the form it's > displaying the right record. > > Any ideas? > > Private Sub cboFindPatient_AfterUpdate() > > If Not IsNull(Me.cboFindPatient) Then > Me.RecordsetClone.FindFirst "fldPatientID = " & > Me.cboFindPatient.Column(0) > Me.Bookmark = Me.RecordsetClone.Bookmark > Me.cmdMainMenu.SetFocus > Me.cboFindPatient.Visible = False > End If > > End Sub > > MTIA, > > -- Steve _______________________________________________ dba-OT mailing list dba-OT at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/dba-ot Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Fri Oct 24 11:06:39 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Fri, 24 Oct 2008 09:06:39 -0700 Subject: [AccessD] Selected Records on a Continuous Form Message-ID: Dear List: Is there a way to determine which records on a continuous form have been selected using the record selector boxes. For complicated reasons I cannot use the Access delete records thing - had to put a 'Delete Selected Record' button on the form. That works OK and through code I delete the selected record and requery the form. Now the user wants to be able to select multiple records like they could before. I can use my code to delete the selected records if I can determine which ones are selected. But there's not .Selected property I can find for recordsets like there is with multi-select list boxes although it appears that you can only select contiguous records on a continuous form using the shift key. Control key to select non-contiguous forms doesn't seem to to work. Is there such a property or a way to find out which records have been selected? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From Chester_Kaup at kindermorgan.com Fri Oct 24 11:12:26 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Fri, 24 Oct 2008 11:12:26 -0500 Subject: [AccessD] Graphing Question Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C10753B4F@houex1.kindermorgan.com> Had a user ask if it is possible in an access chart to move the mouse over a series line and see the value at that point. I don't believe it is possible. Maybe an add-in to be able to do this? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From Gustav at cactus.dk Fri Oct 24 11:25:56 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Fri, 24 Oct 2008 18:25:56 +0200 Subject: [AccessD] Selected Records on a Continuous Form Message-ID: Hi Rocky That is Me.SelTop and Me.SelHeight /gustav >>> rockysmolin at bchacc.com 24-10-2008 18:06 >>> Dear List: Is there a way to determine which records on a continuous form have been selected using the record selector boxes. For complicated reasons I cannot use the Access delete records thing - had to put a 'Delete Selected Record' button on the form. That works OK and through code I delete the selected record and requery the form. Now the user wants to be able to select multiple records like they could before. I can use my code to delete the selected records if I can determine which ones are selected. But there's not .Selected property I can find for recordsets like there is with multi-select list boxes although it appears that you can only select contiguous records on a continuous form using the shift key. Control key to select non-contiguous forms doesn't seem to to work. Is there such a property or a way to find out which records have been selected? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From rockysmolin at bchacc.com Fri Oct 24 13:27:56 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Fri, 24 Oct 2008 11:27:56 -0700 Subject: [AccessD] Selected Records on a Continuous Form In-Reply-To: References: Message-ID: <210FEBB7D11047DE98CF48B68E943A33@HAL9005> Gustav, I saw that in an MSDN page but couldn't figure out what .Top and .Height properties had to do with whether or not a record was selected. But I guess I'll play with it a bit and see what's what. Thanks Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, October 24, 2008 9:26 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Selected Records on a Continuous Form Hi Rocky That is Me.SelTop and Me.SelHeight /gustav >>> rockysmolin at bchacc.com 24-10-2008 18:06 >>> Dear List: Is there a way to determine which records on a continuous form have been selected using the record selector boxes. For complicated reasons I cannot use the Access delete records thing - had to put a 'Delete Selected Record' button on the form. That works OK and through code I delete the selected record and requery the form. Now the user wants to be able to select multiple records like they could before. I can use my code to delete the selected records if I can determine which ones are selected. But there's not .Selected property I can find for recordsets like there is with multi-select list boxes although it appears that you can only select contiguous records on a continuous form using the shift key. Control key to select non-contiguous forms doesn't seem to to work. Is there such a property or a way to find out which records have been selected? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at sc.rr.com Fri Oct 24 16:30:08 2008 From: bheid at sc.rr.com (Bobby Heid) Date: Fri, 24 Oct 2008 17:30:08 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: References: <00d301c93562$24f76530$6ee62f90$@rr.com> <57E6E6CA42105A48B977303A2CDC2720077449CCB2@WPEXCH22.retail.ad.cmltd.net.au> <000f01c9357b$db6cf410$9246dc30$@rr.com> Message-ID: <005c01c9361f$b0a502a0$11ef07e0$@rr.com> Jurgen, I did not read through your original mail because it appears in my reader (Outlook 2007) as one big line and I did not feel like reformatting it to read it. Anyone else getting Jurgen's emails as one big line (it does wrap, but still). I did not know about the ODBC issue with Jet. I never use ODBC, but it is good to know. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jurgen Welz Sent: Friday, October 24, 2008 1:35 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Updating a specific record using VBA. Other than the redundant trailing semi colon and the incorrect tablename, your SQL now evaluates to what I posted previously in this thread. I did not specify the dbFailOnError parameter, suggesting instead a check on the database object variable's RecordsAffected property since that allows one to confirm the update and hence, a means to verify the absence of an error. Also, there was an unrectified bug acknowledged by M$ relating to the use of the dbFailOnError parameter against ODBC tables with Jet 3.5 and 3.51: http://support.microsoft.com/kb/195226. It can also trigger an IPF and crash Access with older operating systems: http://support.microsoft.com/kb/180348. dbFailOnError is useful for development purposes because it will give a developer a meaningul error message explaining the reason for the error and provide a debugging tool. The error is far less useful to a user as it is too cryptic. For these reasons, I nearly always get rid of the parameter prior to delivery. If you don't know how many records should be affected, which is not the case here, then the dbFailOnError raises a trappable error that can be used to do something like roll back a transaction should a block of records all need to be processed concurrently. CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> From: bheid at sc.rr.com> To: accessd at databaseadvisors.com> Date: Thu, 23 Oct 2008 21:57:22 -0400> Subject: Re: [AccessD] Updating a specific record using VBA.> > Darryl,> > Glad to help. I generally prefer to use the sql/db.execute method over the> .edit/.add and .update methods. I believe in many cases that the sql> methods are faster. But the .edit/.add methods do have their place.> > Just to make the example complete, to insert a new record via SQL would be> something like:> > 'No recordset needed> Dim db as dao.database> Dim sql as string> > Set db=currentdb()> > 'the following does not handle quotes in the text fields> Sql="INSERT INTO tablename (APLIDLoadedNumber, APLIDLoadedDesc,> APLIDasString) " & _> "VALUES (" & _> lngAPLID & ", " & _> "'" & strProgName & "', " & _> "'" & strAPLID & "');"> > Db.execute sql,dbfailonerror> > Db.close> Set db=nothing> > The thing with the above code is that you have to requery the db to get the> ID if you need it after insertion. In that case I would use the method that> you originally used.> > In looking at my original example, I left out a couple of quotes. Here's> the corrected version of the sql:> > Sql="UPDATE tablename " & _> "SET APLIDLoadedNumber = " & lngAPLID & ", " & _> " APLIDLoadedDesc = '" & strProgName & "', " & _> " APLIDasString = '" & strAPLID & "' " & _> "WHERE KeyID = " & lngMyKeyID & ";"> > Thanks,> Bobby _________________________________________________________________ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at sc.rr.com Fri Oct 24 16:33:29 2008 From: bheid at sc.rr.com (Bobby Heid) Date: Fri, 24 Oct 2008 17:33:29 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: References: Message-ID: <005d01c93620$28102590$783070b0$@rr.com> Gustav, Well, I have been at it for a while. I did know that for many records, it can be faster to use edit/add, but I have come across times where it was faster to use the execute SQL method. I do not know if had to do with indexes or what. Also, based upon the OP's original post, I could not tell for sure how many records were being inserted/updated at once time. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, October 24, 2008 3:05 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Updating a specific record using VBA. Hi Bobby For a single update that may be true but for many records like in a loop it is indeed not. That's one of the ways you can pinpoint an ASP or old-school VB programmer - they write code using endless series of sql execute methods. I once cleaned up an application made in Access but converted from a previous VB application by someone else. It was well done - no sloppy code - but the client complained about the slowness of an update routine. It ran several interrelated loops retrieving, verifying, and uploading data and pictures from/to an FTP server where all datatable manipulation was done calling SQL code. I transferred this to a system of recordsets and the speed increase was so high that I hardly believed it myself - and I gained eternal guru status at the client! Thus, as you write: > .. the .edit/.add methods do have their place. /gustav >>> bheid at sc.rr.com 24-10-2008 03:57 >>> I believe in many cases that the sql methods are faster. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From steve at goodhall.info Fri Oct 24 18:59:43 2008 From: steve at goodhall.info (Steve Goodhall) Date: Fri, 24 Oct 2008 19:59:43 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <005c01c9361f$b0a502a0$11ef07e0$@rr.com> Message-ID: <97489C1336B34B36A2E998737832F28C@StevenAcer> I looked at his message and I have the same problem. Sometimes fooling with Menu, Format, Unwrap Text will correct this but it didn't help. Regards, Steve Goodhall, PMP 248-505-5204 mobile -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Friday, October 24, 2008 5:30 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Updating a specific record using VBA. Jurgen, I did not read through your original mail because it appears in my reader (Outlook 2007) as one big line and I did not feel like reformatting it to read it. Anyone else getting Jurgen's emails as one big line (it does wrap, but still). I did not know about the ODBC issue with Jet. I never use ODBC, but it is good to know. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jurgen Welz Sent: Friday, October 24, 2008 1:35 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Updating a specific record using VBA. Other than the redundant trailing semi colon and the incorrect tablename, your SQL now evaluates to what I posted previously in this thread. I did not specify the dbFailOnError parameter, suggesting instead a check on the database object variable's RecordsAffected property since that allows one to confirm the update and hence, a means to verify the absence of an error. Also, there was an unrectified bug acknowledged by M$ relating to the use of the dbFailOnError parameter against ODBC tables with Jet 3.5 and 3.51: http://support.microsoft.com/kb/195226. It can also trigger an IPF and crash Access with older operating systems: http://support.microsoft.com/kb/180348. dbFailOnError is useful for development purposes because it will give a developer a meaningul error message explaining the reason for the error and provide a debugging tool. The error is far less useful to a user as it is too cryptic. For these reasons, I nearly always get rid of the parameter prior to delivery. If you don't know how many records should be affected, which is not the case here, then the dbFailOnError raises a trappable error that can be used to do something like roll back a transaction should a block of records all need to be processed concurrently. CiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> From: bheid at sc.rr.com> To: accessd at databaseadvisors.com> Date: Thu, 23 Oct 2008 21:57:22 -0400> Subject: Re: [AccessD] Updating a specific record using VBA.> > Darryl,> > Glad to help. I generally prefer to use the sql/db.execute method over the> .edit/.add and .update methods. I believe in many cases that the sql> methods are faster. But the .edit/.add methods do have their place.> > Just to make the example complete, to insert a new record via SQL would be> something like:> > 'No recordset needed> Dim db as dao.database> Dim sql as string> > Set db=currentdb()> > 'the following does not handle quotes in the text fields> Sql="INSERT INTO tablename (APLIDLoadedNumber, APLIDLoadedDesc,> APLIDasString) " & _> "VALUES (" & _> lngAPLID & ", " & _> "'" & strProgName & "', " & _> "'" & strAPLID & "');"> > Db.execute sql,dbfailonerror> > Db.close> Set db=nothing> > The thing with the above code is that you have to requery the db to get the> ID if you need it after insertion. In that case I would use the method that> you originally used.> > In looking at my original example, I left out a couple of quotes. Here's> the corrected version of the sql:> > Sql="UPDATE tablename " & _> "SET APLIDLoadedNumber = " & lngAPLID & ", " & _> " APLIDLoadedDesc = '" & strProgName & "', " & _> " APLIDasString = '" & strAPLID & "' " & _> "WHERE KeyID = " & lngMyKeyID & ";"> > 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 jwelz at hotmail.com Fri Oct 24 22:36:51 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Fri, 24 Oct 2008 21:36:51 -0600 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: <97489C1336B34B36A2E998737832F28C@StevenAcer> References: <005c01c9361f$b0a502a0$11ef07e0$@rr.com> <97489C1336B34B36A2E998737832F28C@StevenAcer> Message-ID: Hotmail destroys formatting every now and then. It's inconsistent. I nearly always switch to 'plain text' and it still messes up the formatting intermittently. Leaving it at the default rich text is worse. I've had this account since the latter 80's and it was much much better before Microsoft took it over and starting messing it up. I had the beta Live mail for a while and it couldn't handle international characters like the umlaut u in my signature. It used to be you went to hotmail.com and you could log in without having to type in @hotmail.com. It also used to be possible to add your Hotmail account to Outlook or Outlook Express - no more. I just don't get how stupid those buttheads have become and how difficult they've made it just to format a basic email. What you see is rarely what you get with Hotmail these days. I often paste code copied from the Access code window or debug window and it often screws up whether rich or plain text. I had a pop3 account with my ISP and the first time I opened it about a year after getting DSL, there were 1800 junk emails in it and I'd never once sent an email from that account. I sent an email to my ISP telling them not to distribute my email address and never opened that account again in the 3 years since. At least I don't get nearly as much junk with Hotmail even though I've never concealed my plain email address even when posting at internet forums. Maybe I should try a gmail account but the liklihood of getting a sensible account name is remote. I guess there is no longer any point in my attempting to post code here though. This post is formatted plain text and my signature should consist of 4 rows. I guess we'll see... Ciao J?rgen Welz Edmonton, Alberta jwelz at hotmail.com > From: steve at goodhall.info > To: accessd at databaseadvisors.com > Date: Fri, 24 Oct 2008 19:59:43 -0400 > Subject: Re: [AccessD] Updating a specific record using VBA. > > I looked at his message and I have the same problem. Sometimes fooling with > Menu, Format, Unwrap Text will correct this but it didn't help. > Regards, > Steve Goodhall, PMP > 248-505-5204 mobile > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid > Sent: Friday, October 24, 2008 5:30 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Updating a specific record using VBA. > > Jurgen, > > I did not read through your original mail because it appears in my reader > (Outlook 2007) as one big line and I did not feel like reformatting it to > read it. Anyone else getting Jurgen's emails as one big line (it does wrap, > but still). > > I did not know about the ODBC issue with Jet. I never use ODBC, but it is > good to know. > > Thanks, > Bobby _________________________________________________________________ From bheid at sc.rr.com Fri Oct 24 23:23:39 2008 From: bheid at sc.rr.com (Bobby Heid) Date: Sat, 25 Oct 2008 00:23:39 -0400 Subject: [AccessD] Updating a specific record using VBA. In-Reply-To: References: <005c01c9361f$b0a502a0$11ef07e0$@rr.com> <97489C1336B34B36A2E998737832F28C@StevenAcer> Message-ID: <000001c93659$75364550$5fa2cff0$@rr.com> Everything came out fine this time. AS for the junk emails, I think that spammers try all kinds of combinations of made up emails addresses. Once they get one that does not bounce, I think they sell it to others. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jurgen Welz Sent: Friday, October 24, 2008 11:37 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Updating a specific record using VBA. Hotmail destroys formatting every now and then. It's inconsistent. I nearly always switch to 'plain text' and it still messes up the formatting intermittently. Leaving it at the default rich text is worse. I've had this account since the latter 80's and it was much much better before Microsoft took it over and starting messing it up. I had the beta Live mail for a while and it couldn't handle international characters like the umlaut u in my signature. It used to be you went to hotmail.com and you could log in without having to type in @hotmail.com. It also used to be possible to add your Hotmail account to Outlook or Outlook Express - no more. I just don't get how stupid those buttheads have become and how difficult they've made it just to format a basic email. What you see is rarely what you get with Hotmail these days. I often paste code copied from the Access code window or debug window and it often screws up whether rich or plain text. I had a pop3 account with my ISP and the first time I opened it about a year after getting DSL, there were 1800 junk emails in it and I'd never once sent an email from that account. I sent an email to my ISP telling them not to distribute my email address and never opened that account again in the 3 years since. At least I don't get nearly as much junk with Hotmail even though I've never concealed my plain email address even when posting at internet forums. Maybe I should try a gmail account but the liklihood of getting a sensible account name is remote. I guess there is no longer any point in my attempting to post code here though. This post is formatted plain text and my signature should consist of 4 rows. I guess we'll see... Ciao J?rgen Welz Edmonton, Alberta jwelz at hotmail.com > From: steve at goodhall.info > To: accessd at databaseadvisors.com > Date: Fri, 24 Oct 2008 19:59:43 -0400 > Subject: Re: [AccessD] Updating a specific record using VBA. > > I looked at his message and I have the same problem. Sometimes fooling with > Menu, Format, Unwrap Text will correct this but it didn't help. > Regards, > Steve Goodhall, PMP > 248-505-5204 mobile > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid > Sent: Friday, October 24, 2008 5:30 PM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Updating a specific record using VBA. > > Jurgen, > > I did not read through your original mail because it appears in my reader > (Outlook 2007) as one big line and I did not feel like reformatting it to > read it. Anyone else getting Jurgen's emails as one big line (it does wrap, > but still). > > I did not know about the ODBC issue with Jet. I never use ODBC, but it is > good to know. > > Thanks, > Bobby _________________________________________________________________ -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at airtelmail.in Sat Oct 25 01:27:36 2008 From: adtp at airtelmail.in (A.D.Tejpal) Date: Sat, 25 Oct 2008 11:57:36 +0530 Subject: [AccessD] Selected Records on a Continuous Form References: Message-ID: <002101c9366b$1d2c68a0$d75ea27a@personald6374f> Rocky, Volatile nature of SelHeight property constitutes a typical hurdle faced in capturing the status of selected records on continuous form. This is because the erstwhile selection as well as the value of SelHeight is lost as soon you click a command button on the form. Simplest course of action would be to use bound check box for selecting / de-selecting records. If you wish to track the selection status without resorting to bound check box, my sample db named ContFormsKeyNavAndHighLightMultiSelect might be of interest to you. It is available at Rogers Access Library (other developers library). Link - http://www.rogersaccesslibrary.com/forum/forum_topics.asp?FID=45 This db demonstrates identification of selected records on a continuous form. Selection of scattered non-contiguous blocks of records is also permitted. ID's of all records selected in current session are displayed in a text box in form footer and remain intact till cleared by double click on any record. Best wishes, A.D. Tejpal ------------ ----- Original Message ----- From: Rocky Smolin at Beach Access Software To: 'Access Developers discussion and problem solving' Sent: Friday, October 24, 2008 21:36 Subject: [AccessD] Selected Records on a Continuous Form Dear List: Is there a way to determine which records on a continuous form have been selected using the record selector boxes. For complicated reasons I cannot use the Access delete records thing - had to put a 'Delete Selected Record' button on the form. That works OK and through code I delete the selected record and requery the form. Now the user wants to be able to select multiple records like they could before. I can use my code to delete the selected records if I can determine which ones are selected. But there's not .Selected property I can find for recordsets like there is with multi-select list boxes although it appears that you can only select contiguous records on a continuous form using the shift key. Control key to select non-contiguous forms doesn't seem to to work. Is there such a property or a way to find out which records have been selected? MTIA Rocky Smolin From gustav at cactus.dk Sat Oct 25 03:59:21 2008 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 25 Oct 2008 10:59:21 +0200 Subject: [AccessD] Selected Records on a Continuous Form Message-ID: Hi Rocky A.D is right, this may not be as simple as it seems. If you mark records and push Delete, selection remains and you can read SelTop and SelHeight. If you push a button, selection is lost as the focus moves. However, a piece of code I played with years ago lets you keep the selection and reapply it: Option Compare Database Option Explicit Dim lngSelTop As Long Dim lngSelHeight As Long Dim booCancelDelete As Boolean Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer) Cancel = booCancelDelete End Sub Private Sub Form_Current() lngSelHeight = 0 Me!btnDelete.Enabled = False End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) lngSelTop = Me.SelTop lngSelHeight = Me.SelHeight Me!btnDelete.Enabled = True End Sub Private Sub btnDelete_Click() If lngSelHeight > 0 Then ' Repaint selection of rows. Me.SelTop = lngSelTop Me.SelHeight = lngSelHeight Call DeleteRecords End If End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyDelete Then Call DeleteRecords End If End Sub Private Sub DeleteRecords() Dim strPrompt As String strPrompt = "Delete record" & Str(lngSelTop) & _ IIf(lngSelHeight = 1, vbNullString, " to" & Str(lngSelTop + lngSelHeight - 1)) & "?" If MsgBox(strPrompt, vbQuestion + vbOKCancel + vbDefaultButton2) = vbOK Then ' Delete record(s). Else booCancelDelete = True End If End Sub Note that this does not count for selection of records with the navigation keys combos: Ctrl+Shift+PgUp and Ctrl+Shift+PgDn. You would have to apply code for this as well. And fine tune as well - if you press Delete and cancel, selection remains as it should but the btnDelete stays disabled ... Anyway, I'm sure you get the idea. /gustav >>> adtp at airtelmail.in 25-10-2008 08:27 >>> Rocky, Volatile nature of SelHeight property constitutes a typical hurdle faced in capturing the status of selected records on continuous form. This is because the erstwhile selection as well as the value of SelHeight is lost as soon you click a command button on the form. Simplest course of action would be to use bound check box for selecting / de-selecting records. If you wish to track the selection status without resorting to bound check box, my sample db named ContFormsKeyNavAndHighLightMultiSelect might be of interest to you. It is available at Rogers Access Library (other developers library). Link - http://www.rogersaccesslibrary.com/forum/forum_topics.asp?FID=45 This db demonstrates identification of selected records on a continuous form. Selection of scattered non-contiguous blocks of records is also permitted. ID's of all records selected in current session are displayed in a text box in form footer and remain intact till cleared by double click on any record. Best wishes, A.D. Tejpal ------------ ----- Original Message ----- From: Rocky Smolin at Beach Access Software To: 'Access Developers discussion and problem solving' Sent: Friday, October 24, 2008 21:36 Subject: [AccessD] Selected Records on a Continuous Form Dear List: Is there a way to determine which records on a continuous form have been selected using the record selector boxes. For complicated reasons I cannot use the Access delete records thing - had to put a 'Delete Selected Record' button on the form. That works OK and through code I delete the selected record and requery the form. Now the user wants to be able to select multiple records like they could before. I can use my code to delete the selected records if I can determine which ones are selected. But there's not .Selected property I can find for recordsets like there is with multi-select list boxes although it appears that you can only select contiguous records on a continuous form using the shift key. Control key to select non-contiguous forms doesn't seem to to work. Is there such a property or a way to find out which records have been selected? MTIA Rocky Smolin From cfoust at infostatsystems.com Mon Oct 27 15:34:47 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 27 Oct 2008 13:34:47 -0700 Subject: [AccessD] Identifying Primary Key's In-Reply-To: <08be01c934a5$427b6100$2f8601c7@SusanOne> References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082F7@XLIVMBX35bkup.aig.com> <08be01c934a5$427b6100$2f8601c7@SusanOne> Message-ID: Susan, ADO always seems a little more complex than it ought to be! Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, October 22, 2008 5:21 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Identifying Primary Key's Here's what I ended up with, but seems little more complex than it ought to. Function ListPK(tbl As String) 'List primary keys for passed table. 'Must reference ADOX library: 'Microsoft ADO Ext. 2.8 for DDL and Security. Dim cat As New ADOX.Catalog Dim tblADOX As New ADOX.table Dim idxADOX As New ADOX.Index Dim colADOX As New ADOX.Column Dim keyADOX As New ADOX.key cat.ActiveConnection = CurrentProject.AccessConnection For Each tblADOX In cat.Tables If tblADOX.Name = tbl Then If tblADOX.Indexes.Count <> 0 Then For Each idxADOX In tblADOX.Indexes With idxADOX If .PrimaryKey Then For Each colADOX In .Columns Debug.Print colADOX.Name Next End If End With Next Else Debug.Print "No primary key" End If End If Next End Function > Here's a little snippet of code that you should be able to figure it > out from > > For cntFlds = 0 To curTbl.Fields.count - 1 > 'If Left(curFld.Name, 4) = "bCur" Then Stop > Set curFld = curTbl.Fields(cntFlds) -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Mon Oct 27 15:50:41 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Mon, 27 Oct 2008 16:50:41 -0400 Subject: [AccessD] Identifying Primary Key's References: <34C8A2AB1EF3564CB0D64DB6AFFDD5C21AC082F7@XLIVMBX35bkup.aig.com><08be01c934a5$427b6100$2f8601c7@SusanOne> Message-ID: <001701c93875$aeb90560$2f8601c7@SusanOne> I did change it a bit by adding a routine at the bottom that knew when to return "No primary key" -- I just couldn't fit into the If block logic. The original only returned "No primary key when there was an index, but no primary key -- couldn't figure out how to fit in tables that had no index and thus no primary key -- tried and tried but it just never worked right. And yes, I agree, I've always found ADO required more work than I liked. :) Susan H. > Susan, > > ADO always seems a little more complex than it ought to be! > > Charlotte Foust > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Wednesday, October 22, 2008 5:21 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Identifying Primary Key's > > Here's what I ended up with, but seems little more complex than it ought > to. > > Function ListPK(tbl As String) > 'List primary keys for passed table. > 'Must reference ADOX library: > 'Microsoft ADO Ext. 2.8 for DDL and Security. > Dim cat As New ADOX.Catalog > Dim tblADOX As New ADOX.table > Dim idxADOX As New ADOX.Index > Dim colADOX As New ADOX.Column > > Dim keyADOX As New ADOX.key > > cat.ActiveConnection = CurrentProject.AccessConnection > > For Each tblADOX In cat.Tables > If tblADOX.Name = tbl Then > If tblADOX.Indexes.Count <> 0 Then > For Each idxADOX In tblADOX.Indexes > With idxADOX > If .PrimaryKey Then > For Each colADOX In .Columns > Debug.Print colADOX.Name > Next > End If > End With > Next > Else > Debug.Print "No primary key" > End If > End If > Next > > End Function > > >> Here's a little snippet of code that you should be able to figure it >> out from >> >> For cntFlds = 0 To curTbl.Fields.count - 1 >> 'If Left(curFld.Name, 4) = "bCur" Then Stop >> Set curFld = curTbl.Fields(cntFlds) > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Oct 27 20:58:56 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Mon, 27 Oct 2008 20:58:56 -0500 Subject: [AccessD] Identifying Primary Key's In-Reply-To: <001701c93875$aeb90560$2f8601c7@SusanOne> Message-ID: Egads, I always found the opposite, that ADO was easier then DAO. But that's just me. I guess I think that way because ADO is not jet specific, so it's easier to get info on any DB system with ADO then with DAO. Just curious, saw this thread and didn't say anything, because I've been swamped lately, but have you looked into the Schema stuff with ADO, it's pretty simple to use (just a little SQL). I know you can use the Schema to get the tables in a DB, and I was pretty sure you can get the fields of a table (including most of their properties) using the Schema stuff, if you haven't gotten tips on how to do that, remind me tomorrow and I'll whip something up for you... (had a few beers tonight, not going to be checking email till tomorrow) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, October 27, 2008 3:51 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Identifying Primary Key's I did change it a bit by adding a routine at the bottom that knew when to return "No primary key" -- I just couldn't fit into the If block logic. The original only returned "No primary key when there was an index, but no primary key -- couldn't figure out how to fit in tables that had no index and thus no primary key -- tried and tried but it just never worked right. And yes, I agree, I've always found ADO required more work than I liked. :) Susan H. > Susan, > > ADO always seems a little more complex than it ought to be! > > Charlotte Foust > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Wednesday, October 22, 2008 5:21 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Identifying Primary Key's > > Here's what I ended up with, but seems little more complex than it ought > to. > > Function ListPK(tbl As String) > 'List primary keys for passed table. > 'Must reference ADOX library: > 'Microsoft ADO Ext. 2.8 for DDL and Security. > Dim cat As New ADOX.Catalog > Dim tblADOX As New ADOX.table > Dim idxADOX As New ADOX.Index > Dim colADOX As New ADOX.Column > > Dim keyADOX As New ADOX.key > > cat.ActiveConnection = CurrentProject.AccessConnection > > For Each tblADOX In cat.Tables > If tblADOX.Name = tbl Then > If tblADOX.Indexes.Count <> 0 Then > For Each idxADOX In tblADOX.Indexes > With idxADOX > If .PrimaryKey Then > For Each colADOX In .Columns > Debug.Print colADOX.Name > Next > End If > End With > Next > Else > Debug.Print "No primary key" > End If > End If > Next > > End Function > > >> Here's a little snippet of code that you should be able to figure it >> out from >> >> For cntFlds = 0 To curTbl.Fields.count - 1 >> 'If Left(curFld.Name, 4) = "bCur" Then Stop >> Set curFld = curTbl.Fields(cntFlds) > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From thewaddles at sbcglobal.net Mon Oct 27 21:59:31 2008 From: thewaddles at sbcglobal.net (Kevin Waddle) Date: Mon, 27 Oct 2008 19:59:31 -0700 Subject: [AccessD] Many to One to Many to Many form design problem In-Reply-To: References: <001701c93875$aeb90560$2f8601c7@SusanOne> Message-ID: <9309518F4C0D4E9DAEF96C93E0361062@TheWaddles> Hello, I am hitting the wall on a form design. The database is supposed to track medications dispensed by a doctor's office. There are four tables: tblPatient - PatientID - PK - PatientName - Etc tblDrug - DrugID - PK - Drug Name - Strength - Type (Capsule, Liquid, etc) tblDrugLot - DrugLotID - PK - DrugID - FK related to tblDrug - Lot Number - Manufacturer - Expiration Date tblTransaction - TransactionID - PK - PatientID - FK related to tblPatient - DrugID - FK related to tblDrug - Transaction Date - Units Ordered - Units Received - Units Shrink - Units Dispensed A transaction can be medication coming in from the supplier or going out to a patient. I am trying to build a transaction form that will allow me to identify not only what drug, but what lot, came in or went out. TIA, Kevin From ssharkins at gmail.com Tue Oct 28 08:42:00 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Tue, 28 Oct 2008 09:42:00 -0400 Subject: [AccessD] Identifying Primary Key's References: Message-ID: <02e001c93903$68145d60$2f8601c7@SusanOne> > > Just curious, saw this thread and didn't say anything, because I've been > swamped lately, but have you looked into the Schema stuff with ADO, it's > pretty simple to use (just a little SQL). I know you can use the Schema > to get the tables in a DB, and I was pretty sure you can get the fields > of a table (including most of their properties) using the Schema stuff, > if you haven't gotten tips on how to do that, remind me tomorrow and > I'll whip something up for you... (had a few beers tonight, not going to > be checking email till tomorrow) =====I took a look at Schema, but I don't recall what I found, or didn't find. It might be much easier. Susan H. From DWUTKA at Marlow.com Tue Oct 28 09:29:38 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Tue, 28 Oct 2008 09:29:38 -0500 Subject: [AccessD] Identifying Primary Key's In-Reply-To: <02e001c93903$68145d60$2f8601c7@SusanOne> Message-ID: Ok, well here ya go: Function PrimaryKeys() Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Set cnn = New ADODB.Connection cnn.Provider = "Microsoft.Jet.OLEDB.4.0" cnn.Open "C:\SomeDatabase.mdb" Set rs = cnn.OpenSchema(adSchemaPrimaryKeys) If rs.EOF = False Then rs.MoveFirst Do Until rs.EOF = True Debug.Print rs.Fields("TABLE_NAME") & " - " & _ rs.Fields("COLUMN_NAME") & " - " & _ rs.Fields("PK_NAME") rs.MoveNext Loop rs.Close Set rs = Nothing cnn.Close Set cnn = Nothing End Function Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 8:42 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Identifying Primary Key's > > Just curious, saw this thread and didn't say anything, because I've been > swamped lately, but have you looked into the Schema stuff with ADO, it's > pretty simple to use (just a little SQL). I know you can use the Schema > to get the tables in a DB, and I was pretty sure you can get the fields > of a table (including most of their properties) using the Schema stuff, > if you haven't gotten tips on how to do that, remind me tomorrow and > I'll whip something up for you... (had a few beers tonight, not going to > be checking email till tomorrow) =====I took a look at Schema, but I don't recall what I found, or didn't find. It might be much easier. Susan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From ssharkins at gmail.com Tue Oct 28 09:47:32 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Tue, 28 Oct 2008 10:47:32 -0400 Subject: [AccessD] Identifying Primary Key's References: Message-ID: <046101c9390c$1d11daf0$2f8601c7@SusanOne> Thanks Drew -- when the article's published, I'll post that piece. Susan H. > Ok, well here ya go: > > Function PrimaryKeys() > Dim cnn As ADODB.Connection > Dim rs As ADODB.Recordset > Set cnn = New ADODB.Connection > cnn.Provider = "Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\SomeDatabase.mdb" > Set rs = cnn.OpenSchema(adSchemaPrimaryKeys) > If rs.EOF = False Then rs.MoveFirst > Do Until rs.EOF = True > Debug.Print rs.Fields("TABLE_NAME") & " - " & _ > rs.Fields("COLUMN_NAME") & " - " & _ > rs.Fields("PK_NAME") > rs.MoveNext > Loop > rs.Close > Set rs = Nothing > cnn.Close > Set cnn = Nothing > End Function > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Tuesday, October 28, 2008 8:42 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Identifying Primary Key's > > > >> >> Just curious, saw this thread and didn't say anything, because I've > been >> swamped lately, but have you looked into the Schema stuff with ADO, > it's >> pretty simple to use (just a little SQL). I know you can use the > Schema >> to get the tables in a DB, and I was pretty sure you can get the > fields >> of a table (including most of their properties) using the Schema > stuff, >> if you haven't gotten tips on how to do that, remind me tomorrow and >> I'll whip something up for you... (had a few beers tonight, not going > to >> be checking email till tomorrow) > > =====I took a look at Schema, but I don't recall what I found, or didn't > > find. It might be much easier. > > Susan H. > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > The information contained in this transmission is intended only for the > person or entity to which it is addressed and may contain II-VI > Proprietary and/or II-VI Business Sensitive material. If you are not the > intended recipient, please contact the sender immediately and destroy the > material in its entirety, whether electronic or hard copy. You are > notified that any review, retransmission, copying, disclosure, > dissemination, or other use of, or taking of any action in reliance upon > this information by persons or entities other than the intended recipient > is prohibited. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at Marlow.com Tue Oct 28 10:22:39 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Tue, 28 Oct 2008 10:22:39 -0500 Subject: [AccessD] Identifying Primary Key's In-Reply-To: <046101c9390c$1d11daf0$2f8601c7@SusanOne> Message-ID: No problem, glad to help. (And, just an FYI, I tried that against both an access .mdb and a SQL Server database, worked fine for both) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 9:48 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Identifying Primary Key's Thanks Drew -- when the article's published, I'll post that piece. Susan H. > Ok, well here ya go: > > Function PrimaryKeys() > Dim cnn As ADODB.Connection > Dim rs As ADODB.Recordset > Set cnn = New ADODB.Connection > cnn.Provider = "Microsoft.Jet.OLEDB.4.0" > cnn.Open "C:\SomeDatabase.mdb" > Set rs = cnn.OpenSchema(adSchemaPrimaryKeys) > If rs.EOF = False Then rs.MoveFirst > Do Until rs.EOF = True > Debug.Print rs.Fields("TABLE_NAME") & " - " & _ > rs.Fields("COLUMN_NAME") & " - " & _ > rs.Fields("PK_NAME") > rs.MoveNext > Loop > rs.Close > Set rs = Nothing > cnn.Close > Set cnn = Nothing > End Function > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Tuesday, October 28, 2008 8:42 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Identifying Primary Key's > > > >> >> Just curious, saw this thread and didn't say anything, because I've > been >> swamped lately, but have you looked into the Schema stuff with ADO, > it's >> pretty simple to use (just a little SQL). I know you can use the > Schema >> to get the tables in a DB, and I was pretty sure you can get the > fields >> of a table (including most of their properties) using the Schema > stuff, >> if you haven't gotten tips on how to do that, remind me tomorrow and >> I'll whip something up for you... (had a few beers tonight, not going > to >> be checking email till tomorrow) > > =====I took a look at Schema, but I don't recall what I found, or didn't > > find. It might be much easier. > > Susan H. > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > The information contained in this transmission is intended only for the > person or entity to which it is addressed and may contain II-VI > Proprietary and/or II-VI Business Sensitive material. If you are not the > intended recipient, please contact the sender immediately and destroy the > material in its entirety, whether electronic or hard copy. You are > notified that any review, retransmission, copying, disclosure, > dissemination, or other use of, or taking of any action in reliance upon > this information by persons or entities other than the intended recipient > 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 The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From ssharkins at gmail.com Tue Oct 28 10:26:23 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Tue, 28 Oct 2008 11:26:23 -0400 Subject: [AccessD] Identifying Primary Key's References: Message-ID: <052f01c93911$8a257e30$2f8601c7@SusanOne> If you want, I'll let you post it. Susan H. > No problem, glad to help. (And, just an FYI, I tried that against both > an access .mdb and a SQL Server database, worked fine for both) > > > Thanks Drew -- when the article's published, I'll post that piece. From DWUTKA at Marlow.com Tue Oct 28 10:34:49 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Tue, 28 Oct 2008 10:34:49 -0500 Subject: [AccessD] Identifying Primary Key's In-Reply-To: <052f01c93911$8a257e30$2f8601c7@SusanOne> Message-ID: No thanks, all yours.... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 10:26 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Identifying Primary Key's If you want, I'll let you post it. Susan H. > No problem, glad to help. (And, just an FYI, I tried that against both > an access .mdb and a SQL Server database, worked fine for both) > > > Thanks Drew -- when the article's published, I'll post that piece. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From ssharkins at gmail.com Tue Oct 28 10:41:11 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Tue, 28 Oct 2008 11:41:11 -0400 Subject: [AccessD] Access Developers in San Francisco area Message-ID: <056701c93913$9bb98b80$2f8601c7@SusanOne> If you freelance in the San Francisco area and would like to be considered for an ongoing project, please send me your resume privately. They want someone local enough to meet with them as necessary. The database already exists, but they are thinking about enhancements. Susan H. From drawbridgej at sympatico.ca Tue Oct 28 15:50:59 2008 From: drawbridgej at sympatico.ca (Jack and Pat) Date: Tue, 28 Oct 2008 16:50:59 -0400 Subject: [AccessD] Many to One to Many to Many form design problem In-Reply-To: <9309518F4C0D4E9DAEF96C93E0361062@TheWaddles> References: <001701c93875$aeb90560$2f8601c7@SusanOne> <9309518F4C0D4E9DAEF96C93E0361062@TheWaddles> Message-ID: Kevin, Just some initial observations that may help in your database and application design. You mention "medications" but you only define "Drug". You mention "Supplier" but reference "Manufacturer" You mention Patient, but I see no reference to "Prescription" Perhaps there's more than 1 type of transaction. I can see possible transactions for -- drugOrdered, drugReceived, drugDispensed I am not familiar with Drug Shrink jack -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kevin Waddle Sent: Monday, October 27, 2008 11:00 PM To: AccessD at databaseadvisors.com; ACCESS-L at PEACH.EASE.LSOFT.COM Subject: [AccessD] Many to One to Many to Many form design problem Hello, I am hitting the wall on a form design. The database is supposed to track medications dispensed by a doctor's office. There are four tables: tblPatient - PatientID - PK - PatientName - Etc tblDrug - DrugID - PK - Drug Name - Strength - Type (Capsule, Liquid, etc) tblDrugLot - DrugLotID - PK - DrugID - FK related to tblDrug - Lot Number - Manufacturer - Expiration Date tblTransaction - TransactionID - PK - PatientID - FK related to tblPatient - DrugID - FK related to tblDrug - Transaction Date - Units Ordered - Units Received - Units Shrink - Units Dispensed A transaction can be medication coming in from the supplier or going out to a patient. I am trying to build a transaction form that will allow me to identify not only what drug, but what lot, came in or went out. TIA, Kevin -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Tue Oct 28 19:34:42 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Tue, 28 Oct 2008 17:34:42 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From stuart at lexacorp.com.pg Tue Oct 28 20:12:56 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 29 Oct 2008 11:12:56 +1000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> Message-ID: <4907B898.5386.4DB181ED@stuart.lexacorp.com.pg> I prefer the simplicity of db.Execute - you can do it in a *single* line of code. I suspect that it would be faster in this case, but that's only a "gut feeling". Do you need to do each of the 10-20 detail records separately or can you just put a single "Update..Where" in the Invoice Header or Footer. If you can then it would definitely be quicker since you are only doing a single bulk update rather than opening and closing the table for every detail record. On 28 Oct 2008 at 17:34, Rocky Smolin at Beach Access Software wrote: > Dear List: > > In the detail event of a report, I want to set one of the fields in the > underlying recordset to true. It's an invoicing report and I want to set > the detail record's 'Billed' field to true. The Billed field is not on the > report - just a convenient time to set the flag. > > Would it be faster to use db.Execute "Update...Where " or use DAO > rs.FindFirst. The Where part of the db.Execute and the FindFirst both use > TimeSheetID for the search - a primary key. The table is a linked table - so > no Seek. The number of detail records per invoice is pretty low - average > 10-20. So, not like it's updating a large number of records. So response > time is not an issue. > > I wrote it with DAO - just a few lines of code - because I favor DAO. So > more curiosity for future apps. > > MTIA, > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From thewaddles at sbcglobal.net Tue Oct 28 22:22:17 2008 From: thewaddles at sbcglobal.net (Kevin Waddle) Date: Tue, 28 Oct 2008 20:22:17 -0700 Subject: [AccessD] Many to One to Many to Many form design problem In-Reply-To: References: <001701c93875$aeb90560$2f8601c7@SusanOne><9309518F4C0D4E9DAEF96C93E0361062@TheWaddles> Message-ID: <9E01124B091E49A5946DC87BED6AF9F2@TheWaddles> Jack, Just poor communication while writing past my bedtime. The field names are Drug, manufacturer. The prescription number is a sequential number from the transactions table. Shrink = I have 100 pills and while filling an order I drop 10 of them into my soup. Thanks, Kevin I'm no stranger, just a friend you haven't met... -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jack and Pat Sent: Tuesday, October 28, 2008 1:51 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Many to One to Many to Many form design problem Kevin, Just some initial observations that may help in your database and application design. You mention "medications" but you only define "Drug". You mention "Supplier" but reference "Manufacturer" You mention Patient, but I see no reference to "Prescription" Perhaps there's more than 1 type of transaction. I can see possible transactions for -- drugOrdered, drugReceived, drugDispensed I am not familiar with Drug Shrink jack -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kevin Waddle Sent: Monday, October 27, 2008 11:00 PM To: AccessD at databaseadvisors.com; ACCESS-L at PEACH.EASE.LSOFT.COM Subject: [AccessD] Many to One to Many to Many form design problem Hello, I am hitting the wall on a form design. The database is supposed to track medications dispensed by a doctor's office. There are four tables: tblPatient - PatientID - PK - PatientName - Etc tblDrug - DrugID - PK - Drug Name - Strength - Type (Capsule, Liquid, etc) tblDrugLot - DrugLotID - PK - DrugID - FK related to tblDrug - Lot Number - Manufacturer - Expiration Date tblTransaction - TransactionID - PK - PatientID - FK related to tblPatient - DrugID - FK related to tblDrug - Transaction Date - Units Ordered - Units Received - Units Shrink - Units Dispensed A transaction can be medication coming in from the supplier or going out to a patient. I am trying to build a transaction form that will allow me to identify not only what drug, but what lot, came in or went out. TIA, Kevin -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Tue Oct 28 22:36:50 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Tue, 28 Oct 2008 20:36:50 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <4907B898.5386.4DB181ED@stuart.lexacorp.com.pg> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> <4907B898.5386.4DB181ED@stuart.lexacorp.com.pg> Message-ID: <29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005> Stuart: Gotta do each one separately since the user may select certain lines from a timesheet to bill and leave others for later. Thanks. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Tuesday, October 28, 2008 6:13 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I prefer the simplicity of db.Execute - you can do it in a *single* line of code. I suspect that it would be faster in this case, but that's only a "gut feeling". Do you need to do each of the 10-20 detail records separately or can you just put a single "Update..Where" in the Invoice Header or Footer. If you can then it would definitely be quicker since you are only doing a single bulk update rather than opening and closing the table for every detail record. On 28 Oct 2008 at 17:34, Rocky Smolin at Beach Access Software wrote: > Dear List: > > In the detail event of a report, I want to set one of the fields in > the underlying recordset to true. It's an invoicing report and I want > to set the detail record's 'Billed' field to true. The Billed field > is not on the report - just a convenient time to set the flag. > > Would it be faster to use db.Execute "Update...Where " or use DAO > rs.FindFirst. The Where part of the db.Execute and the FindFirst both > use TimeSheetID for the search - a primary key. The table is a linked > table - so no Seek. The number of detail records per invoice is > pretty low - average 10-20. So, not like it's updating a large number > of records. So response time is not an issue. > > I wrote it with DAO - just a few lines of code - because I favor DAO. > So more curiosity for future apps. > > MTIA, > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 gmail.com Tue Oct 28 22:46:12 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Tue, 28 Oct 2008 23:46:12 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg> <29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005> Message-ID: <02f301c93978$ea5b98e0$2f8601c7@SusanOne> I'm not sure exactly what you're asking -- are you asking which is faster, ADO or SQL? Susan H. > Stuart: > > Gotta do each one separately since the user may select certain lines from > a > timesheet to bill and leave others for later. From rockysmolin at bchacc.com Tue Oct 28 23:23:01 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Tue, 28 Oct 2008 21:23:01 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <02f301c93978$ea5b98e0$2f8601c7@SusanOne> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005> <02f301c93978$ea5b98e0$2f8601c7@SusanOne> Message-ID: <199DBDEAD460420FA844A9CE39FC3929@HAL9005> Db.Execute "Update..." vs. DAO. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 8:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I'm not sure exactly what you're asking -- are you asking which is faster, ADO or SQL? Susan H. > Stuart: > > Gotta do each one separately since the user may select certain lines > from a timesheet to bill and leave others for later. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at verizon.net Wed Oct 29 08:22:01 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 29 Oct 2008 09:22:01 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <02f301c93978$ea5b98e0$2f8601c7@SusanOne> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg> <29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005> <02f301c93978$ea5b98e0$2f8601c7@SusanOne> Message-ID: Susan, Both are DAO, but what he is asking is if db.Execute with a SQL statement is faster then opening up a record set, finding the record, and then doing an .Edit/.Update. I think the only way you'd know for sure to time each, but I'm sure a .Seek on the index would beat either. Especially if you do more then one. And if more then one was being done at a time, I believe the record set method would be faster even with using a FindFirst, although I could be wrong on that. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 11:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I'm not sure exactly what you're asking -- are you asking which is faster, ADO or SQL? Susan H. > Stuart: > > Gotta do each one separately since the user may select certain lines from > a > timesheet to bill and leave others for later. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Wed Oct 29 09:00:23 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 29 Oct 2008 10:00:23 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne> Message-ID: <03f901c939ce$b2995810$2f8601c7@SusanOne> > > Both are DAO, but what he is asking is if db.Execute with a SQL statement > is faster then opening up a record set, finding the record, and then doing > an .Edit/.Update. ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim is that SQL is faster -- it speaks directly to the engine -- it has to be faster. SUsan H. From mwp.reid at qub.ac.uk Wed Oct 29 09:08:37 2008 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 29 Oct 2008 14:08:37 +0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <03f901c939ce$b2995810$2f8601c7@SusanOne> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne> <03f901c939ce$b2995810$2f8601c7@SusanOne> Message-ID: Susan You might find this useful http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesdaovba/2005-03/1330.html Martin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: 29 October 2008 14:00 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Both are DAO, but what he is asking is if db.Execute with a SQL statement > is faster then opening up a record set, finding the record, and then doing > an .Edit/.Update. ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim is that SQL is faster -- it speaks directly to the engine -- it has to be faster. SUsan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Wed Oct 29 09:24:11 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 29 Oct 2008 10:24:11 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne><03f901c939ce$b2995810$2f8601c7@SusanOne> Message-ID: <045301c939d2$0525f9a0$2f8601c7@SusanOne> A lot going on there without a consensus. I thought the original question was comparing the library edits to a SQL statement -- I might have goofed there. Did you read the statements at the end -- very interesting. I think DAO and ADO solutions are definitely more versatile than straight SQL -- you upsize with ADO/DAO, you don't have much work -- most of your code's going to work with Jet or SS, whereas your straight SQL's going to need some work. Susan H. > Susan > > You might find this useful > > http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesdaovba/2005-03/1330.html > > Martin From DWUTKA at Marlow.com Wed Oct 29 09:32:30 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 29 Oct 2008 09:32:30 -0500 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> Message-ID: I believe that db.execute is going to be faster, and the reason it should be faster is that the recordset object is going to internally use SQL commands to the DB engine anyways, so it is another layer on top of the DB engine.... But that's just a well educated guess, not 100% positive about that. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 7:35 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Which Is Faster - DAO or db.Execute? Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From max.wanadoo at gmail.com Wed Oct 29 09:35:37 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Wed, 29 Oct 2008 14:35:37 -0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> Message-ID: <490874c1.0ac0100a.769c.3465@mx.google.com> I *think* also that, unlike the recordset.edit/.update, the db.execute(sql) statement does NOT throw an error if it meets an anomalous condition whilst executing the sql. It just continues on. Am I correct there? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: 29 October 2008 14:33 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I believe that db.execute is going to be faster, and the reason it should be faster is that the recordset object is going to internally use SQL commands to the DB engine anyways, so it is another layer on top of the DB engine.... But that's just a well educated guess, not 100% positive about that. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 7:35 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Which Is Faster - DAO or db.Execute? Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Wed Oct 29 09:40:53 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 29 Oct 2008 07:40:53 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne><03f901c939ce$b2995810$2f8601c7@SusanOne> Message-ID: So it would seem that DAO with the OpenRecordset outside the loop is the fastest? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, October 29, 2008 7:09 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Susan You might find this useful http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesda ovba/2005-03/1330.html Martin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: 29 October 2008 14:00 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Both are DAO, but what he is asking is if db.Execute with a SQL > statement is faster then opening up a record set, finding the record, > and then doing an .Edit/.Update. ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim is that SQL is faster -- it speaks directly to the engine -- it has to be faster. 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 DWUTKA at Marlow.com Wed Oct 29 09:42:33 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 29 Oct 2008 09:42:33 -0500 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <490874c1.0ac0100a.769c.3465@mx.google.com> Message-ID: Hmmmm, I don't think so. If you put in an invalid SQL statement, it will return an error. However, if you, say, try to update a record that doesn't exist, it should just go through, since it would be a 'now updating 0 records'.... Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Wednesday, October 29, 2008 9:36 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I *think* also that, unlike the recordset.edit/.update, the db.execute(sql) statement does NOT throw an error if it meets an anomalous condition whilst executing the sql. It just continues on. Am I correct there? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: 29 October 2008 14:33 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I believe that db.execute is going to be faster, and the reason it should be faster is that the recordset object is going to internally use SQL commands to the DB engine anyways, so it is another layer on top of the DB engine.... But that's just a well educated guess, not 100% positive about that. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 7:35 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Which Is Faster - DAO or db.Execute? Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient 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 The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From ssharkins at gmail.com Wed Oct 29 09:46:32 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 29 Oct 2008 10:46:32 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne><03f901c939ce$b2995810$2f8601c7@SusanOne> Message-ID: <04e001c939d5$44b771e0$2f8601c7@SusanOne> Only if you're working with multiple, but separate records -- that's what I read, I think. I'm not sure why that is though. Susan H. > So it would seem that DAO with the OpenRecordset outside the loop is the > fastest? > > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.e-z-mrp.com > www.bchacc.com > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid > Sent: Wednesday, October 29, 2008 7:09 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Susan > > You might find this useful > > http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesda > ovba/2005-03/1330.html > > Martin > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: 29 October 2008 14:00 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > >> >> Both are DAO, but what he is asking is if db.Execute with a SQL >> statement is faster then opening up a record set, finding the record, >> and then doing an .Edit/.Update. > > ======Yes, I realize they're both DAO, I just thought I'd clarify. My > claim > is that SQL is faster -- it speaks directly to the engine -- it has to be > faster. > > 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 jimdettman at verizon.net Wed Oct 29 09:47:41 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 29 Oct 2008 10:47:41 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <490874c1.0ac0100a.769c.3465@mx.google.com> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> <490874c1.0ac0100a.769c.3465@mx.google.com> Message-ID: <3FE4F71FC6B440EBAA2D9E7B9E17A660@XPS> Max, You need to include the dbFailOnError option, otherwise it does ignore errors and just keeps going. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Wednesday, October 29, 2008 10:36 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I *think* also that, unlike the recordset.edit/.update, the db.execute(sql) statement does NOT throw an error if it meets an anomalous condition whilst executing the sql. It just continues on. Am I correct there? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: 29 October 2008 14:33 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I believe that db.execute is going to be faster, and the reason it should be faster is that the recordset object is going to internally use SQL commands to the DB engine anyways, so it is another layer on top of the DB engine.... But that's just a well educated guess, not 100% positive about that. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 7:35 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Which Is Faster - DAO or db.Execute? Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient 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 jimdettman at verizon.net Wed Oct 29 09:54:19 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 29 Oct 2008 10:54:19 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <03f901c939ce$b2995810$2f8601c7@SusanOne> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005><4907B898.5386.4DB181ED@stuart.lexacorp.com.pg><29495CDBA8104F7FB1A66BED1D6C0FDF@HAL9005><02f301c93978$ea5b98e0$2f8601c7@SusanOne> <03f901c939ce$b2995810$2f8601c7@SusanOne> Message-ID: <301CAED64AFC4C72854750469F20B40E@XPS> Susan, << My claim is that SQL is faster -- it speaks directly to the engine>> So does DAO. In fact unlike SQL, it doesn't need to be parsed and have a costing plan generated. <<-- it has to be faster.>> I think you'd need to test to be sure. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, October 29, 2008 10:00 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Both are DAO, but what he is asking is if db.Execute with a SQL statement > is faster then opening up a record set, finding the record, and then doing > an .Edit/.Update. ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim is that SQL is faster -- it speaks directly to the engine -- it has to be faster. SUsan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From edzedz at comcast.net Wed Oct 29 09:38:22 2008 From: edzedz at comcast.net (Edward S Zuris) Date: Wed, 29 Oct 2008 07:38:22 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: Message-ID: <000601c939d3$feac09a0$65dea8c0@dudley1> Here is something to try. You can put various operations inside a for-next loop and collect times just before the start and after. Then calculate which is the faster with your VBA coding style implementations. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Dettman Sent: Wednesday, October 29, 2008 6:22 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Susan, Both are DAO, but what he is asking is if db.Execute with a SQL statement is faster then opening up a record set, finding the record, and then doing an .Edit/.Update. I think the only way you'd know for sure to time each, but I'm sure a .Seek on the index would beat either. Especially if you do more then one. And if more then one was being done at a time, I believe the record set method would be faster even with using a FindFirst, although I could be wrong on that. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 11:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I'm not sure exactly what you're asking -- are you asking which is faster, ADO or SQL? Susan H. > Stuart: > > Gotta do each one separately since the user may select certain lines from > a > timesheet to bill and leave others for later. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From edzedz at comcast.net Wed Oct 29 09:18:56 2008 From: edzedz at comcast.net (Edward S Zuris) Date: Wed, 29 Oct 2008 07:18:56 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <199DBDEAD460420FA844A9CE39FC3929@HAL9005> Message-ID: <002501c939d1$553737c0$65dea8c0@dudley1> You can put various operations inside a for-next loop and collect times just before the start and after. Then calculate which is the faster with your VBA coding style implementations. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 9:23 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Db.Execute "Update..." vs. DAO. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Tuesday, October 28, 2008 8:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I'm not sure exactly what you're asking -- are you asking which is faster, ADO or SQL? Susan H. > Stuart: > > Gotta do each one separately since the user may select certain lines > from a timesheet to bill and leave others for later. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Oct 29 10:40:12 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Wed, 29 Oct 2008 16:40:12 +0100 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: Hi Rocky http://databaseadvisors.com/pipermail/accessd/2008-October/063676.html So, open your recordset, run the loop with the updates, close the recordset. You may even wrap this in an transaction to further increase speed and to update all or - in case of an error - none. Also, use ADO or DAO as you like. It will make no big difference - the point is to avoid the repeated SQL executes. /gustav >>> rockysmolin at bchacc.com 29-10-2008 01:34:42 >>> Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From Chester_Kaup at kindermorgan.com Wed Oct 29 11:02:07 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Wed, 29 Oct 2008 11:02:07 -0500 Subject: [AccessD] Blank Lines in report Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C107540A0@houex1.kindermorgan.com> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From max.wanadoo at gmail.com Wed Oct 29 11:05:40 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Wed, 29 Oct 2008 16:05:40 -0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <3FE4F71FC6B440EBAA2D9E7B9E17A660@XPS> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005> <490874c1.0ac0100a.769c.3465@mx.google.com> <3FE4F71FC6B440EBAA2D9E7B9E17A660@XPS> Message-ID: <490889df.0ec5100a.358d.1e9b@mx.google.com> Aha! Thanks Jim. Max Ps. Thanks also to Drew's posting -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: 29 October 2008 14:48 To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Max, You need to include the dbFailOnError option, otherwise it does ignore errors and just keeps going. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo Sent: Wednesday, October 29, 2008 10:36 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I *think* also that, unlike the recordset.edit/.update, the db.execute(sql) statement does NOT throw an error if it meets an anomalous condition whilst executing the sql. It just continues on. Am I correct there? Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: 29 October 2008 14:33 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? I believe that db.execute is going to be faster, and the reason it should be faster is that the recordset object is going to internally use SQL commands to the DB engine anyways, so it is another layer on top of the DB engine.... But that's just a well educated guess, not 100% positive about that. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Tuesday, October 28, 2008 7:35 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Which Is Faster - DAO or db.Execute? Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient 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 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Gustav at cactus.dk Wed Oct 29 11:14:40 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Wed, 29 Oct 2008 17:14:40 +0100 Subject: [AccessD] Blank Lines in report Message-ID: Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 From jim at therareshop.com Wed Oct 29 11:19:22 2008 From: jim at therareshop.com (jim at therareshop.com) Date: Wed, 29 Oct 2008 12:19:22 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: <22084114.406581225297162066.JavaMail.servlet@perfora> Rocky, Using the function below allows you to perform a seek on a linked table. This is a nifty function from the microsoft website that I've been using for years without a problem. Set db = WhichDB(strTable) Function WhichDB(strTableName As String) As Database Dim dbpath$, SourceTable$, dbTest As Database On Error GoTo whichDB_ERR Set dbTest = DBEngine(0)(0) dbpath = Mid(dbTest(strTableName).Connect, InStr(1, dbTest(strTableName).Connect, "=") + 1) If dbpath = "" Then Set dbTest = CurrentDb() Else Set dbTest = DBEngine(0).OpenDatabase(dbpath) End If Set WhichDB = dbTest whichDB_EXIT: Exit Function whichDB_ERR: MsgBox Err.Description Resume whichDB_EXIT End Function From rockysmolin at bchacc.com Wed Oct 29 11:47:12 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 29 Oct 2008 09:47:12 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: Message-ID: <9E8A6FC0939C41699BF9C89C127AEEF5@HAL9005> What luck! I picked the right method (law of averages). Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 8:40 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Hi Rocky http://databaseadvisors.com/pipermail/accessd/2008-October/063676.html So, open your recordset, run the loop with the updates, close the recordset. You may even wrap this in an transaction to further increase speed and to update all or - in case of an error - none. Also, use ADO or DAO as you like. It will make no big difference - the point is to avoid the repeated SQL executes. /gustav >>> rockysmolin at bchacc.com 29-10-2008 01:34:42 >>> Dear List: In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. I wrote it with DAO - just a few lines of code - because I favor DAO. So more curiosity for future apps. MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Wed Oct 29 11:49:38 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 29 Oct 2008 09:49:38 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <22084114.406581225297162066.JavaMail.servlet@perfora> References: <22084114.406581225297162066.JavaMail.servlet@perfora> Message-ID: So you pas the name of any table in the target db and then use the standard db.OpenRecordset on the table you want to 'Seek'? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jim at therareshop.com Sent: Wednesday, October 29, 2008 9:19 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Rocky, Using the function below allows you to perform a seek on a linked table. This is a nifty function from the microsoft website that I've been using for years without a problem. Set db = WhichDB(strTable) Function WhichDB(strTableName As String) As Database Dim dbpath$, SourceTable$, dbTest As Database On Error GoTo whichDB_ERR Set dbTest = DBEngine(0)(0) dbpath = Mid(dbTest(strTableName).Connect, InStr(1, dbTest(strTableName).Connect, "=") + 1) If dbpath = "" Then Set dbTest = CurrentDb() Else Set dbTest = DBEngine(0).OpenDatabase(dbpath) End If Set WhichDB = dbTest whichDB_EXIT: Exit Function whichDB_ERR: MsgBox Err.Description Resume whichDB_EXIT End Function -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jim at therareshop.com Wed Oct 29 12:13:28 2008 From: jim at therareshop.com (jim at therareshop.com) Date: Wed, 29 Oct 2008 13:13:28 -0400 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: <14476563.420861225300408175.JavaMail.servlet@perfora> yup, like this- Function FindPeriod() Dim dbs As Database Dim rstbase As Recordset Dim strTable As String strTable = "tblPeriods" Set dbs = WhichDB(strTable) Set rstbase = dbs.OpenRecordset(strTable, dbOpenTable) 'find record with current period rstbase.Index = "fldStatus" rstbase.Seek "=", "B" intPeriodNo = rstbase.Fields("fldPeriodno") intMonth = rstbase.Fields("fldMonth") intyear = rstbase.Fields("fld year") rstbase.Close Set rstbase = Nothing End Function So you pas the name of any table in the target db and then use the standard db.OpenRecordset on the table you want to 'Seek'? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jim at therareshop.com Sent: Wednesday, October 29, 2008 9:19 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Rocky, Using the function below allows you to perform a seek on a linked table. This is a nifty function from the microsoft website that I've been using for years without a problem. Set db = WhichDB(strTable) Function WhichDB(strTableName As String) As Database Dim dbpath$, SourceTable$, dbTest As Database On Error GoTo whichDB_ERR Set dbTest = DBEngine(0)(0) dbpath = Mid(dbTest(strTableName).Connect, InStr(1, dbTest(strTableName).Connect, "=") + 1) If dbpath = "" Then Set dbTest = CurrentDb() Else Set dbTest = DBEngine(0).OpenDatabase(dbpath) End If Set WhichDB = dbTest whichDB_EXIT: Exit Function whichDB_ERR: MsgBox Err.Description Resume whichDB_EXIT End Function From rockysmolin at bchacc.com Wed Oct 29 12:22:11 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 29 Oct 2008 10:22:11 -0700 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <14476563.420861225300408175.JavaMail.servlet@perfora> References: <14476563.420861225300408175.JavaMail.servlet@perfora> Message-ID: <43C8BA4EB2354B0982E632A2516B7558@HAL9005> Wow. Who knew? Thanks. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jim at therareshop.com Sent: Wednesday, October 29, 2008 10:13 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? yup, like this- Function FindPeriod() Dim dbs As Database Dim rstbase As Recordset Dim strTable As String strTable = "tblPeriods" Set dbs = WhichDB(strTable) Set rstbase = dbs.OpenRecordset(strTable, dbOpenTable) 'find record with current period rstbase.Index = "fldStatus" rstbase.Seek "=", "B" intPeriodNo = rstbase.Fields("fldPeriodno") intMonth = rstbase.Fields("fldMonth") intyear = rstbase.Fields("fld year") rstbase.Close Set rstbase = Nothing End Function So you pas the name of any table in the target db and then use the standard db.OpenRecordset on the table you want to 'Seek'? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jim at therareshop.com Sent: Wednesday, October 29, 2008 9:19 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Rocky, Using the function below allows you to perform a seek on a linked table. This is a nifty function from the microsoft website that I've been using for years without a problem. Set db = WhichDB(strTable) Function WhichDB(strTableName As String) As Database Dim dbpath$, SourceTable$, dbTest As Database On Error GoTo whichDB_ERR Set dbTest = DBEngine(0)(0) dbpath = Mid(dbTest(strTableName).Connect, InStr(1, dbTest(strTableName).Connect, "=") + 1) If dbpath = "" Then Set dbTest = CurrentDb() Else Set dbTest = DBEngine(0).OpenDatabase(dbpath) End If Set WhichDB = dbTest whichDB_EXIT: Exit Function whichDB_ERR: MsgBox Err.Description Resume whichDB_EXIT End Function -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Gustav at cactus.dk Wed Oct 29 12:30:23 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Wed, 29 Oct 2008 18:30:23 +0100 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: Hi Rocky and Jim Yes, but don't forget to put the loop of Rocky's updates _inside_ that function. /gustav >>> jim at therareshop.com 29-10-2008 18:13:28 >>> yup, like this- Function FindPeriod() Dim dbs As Database Dim rstbase As Recordset Dim strTable As String strTable = "tblPeriods" Set dbs = WhichDB(strTable) Set rstbase = dbs.OpenRecordset(strTable, dbOpenTable) 'find record with current period rstbase.Index = "fldStatus" rstbase.Seek "=", "B" intPeriodNo = rstbase.Fields("fldPeriodno") intMonth = rstbase.Fields("fldMonth") intyear = rstbase.Fields("fld year") rstbase.Close Set rstbase = Nothing End Function So you pas the name of any table in the target db and then use the standard db.OpenRecordset on the table you want to 'Seek'? From mwp.reid at qub.ac.uk Wed Oct 29 12:45:01 2008 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 29 Oct 2008 17:45:01 +0000 Subject: [AccessD] Reports Message-ID: When printing a report and say the Printer breaks I want to be able to continue printing where I left of. Is there any way to keep track of what has been printed so far and then continue printing from that point? Martin Martin WP Reid Information Services Queen's University Riddel Hall 185 Stranmillis Road Belfast BT9 5EE Tel : 02890974465 Email : mwp.reid at qub.ac.uk From cfoust at infostatsystems.com Wed Oct 29 12:59:11 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 29 Oct 2008 10:59:11 -0700 Subject: [AccessD] Reports In-Reply-To: References: Message-ID: I don't know of any way because the report has usually already been sent to the printer before the break. Unless you can find out from the printer which page it broke on and equate that to a report page, I don't think it's possible. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, October 29, 2008 10:45 AM To: Access Developers discussion and problem solving Subject: [AccessD] Reports When printing a report and say the Printer breaks I want to be able to continue printing where I left of. Is there any way to keep track of what has been printed so far and then continue printing from that point? Martin Martin WP Reid Information Services Queen's University Riddel Hall 185 Stranmillis Road Belfast BT9 5EE Tel : 02890974465 Email : mwp.reid at qub.ac.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at Marlow.com Wed Oct 29 13:35:40 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 29 Oct 2008 13:35:40 -0500 Subject: [AccessD] My first use of the Listview Control Message-ID: A few weeks ago we had a thread about creating a generic HTML table based on a recordset. I posted something that I typically add to my more involved web systems. It's a pretty generic asp page that let's me put in an SQL Statement and then execute it (and either display the results, or just run the SQL (if it is something like an Update, Insert or Delete process)). It's a handy page to put into a system, because when initially developing a web based system, I usually have the database and webpages local on my laptop. But I eventually get to a point where I move the system to the designated server. If I still need to develop the 'live' system, while opening and modifying .asp pages is simple (even on a remote connection), sometimes opening an .mdb can be a slow process (over a VPN, or even slower having to download it over an FTP connection). Plus, since Access 2000, sometimes the slightest change will lock the database to web users. So with that generic 'sql' page, I can put in a little SQL, and view or modify the data right in the 'live' database, the query is run on the web server itself, so I only get the data back (so it's fast), and since it is connecting to the .mdb, it doesn't lock anyone else out of the database. Pretty handy! Now lately, I've been spending most of my free time adding A LOT of bells and whistles to one of my most complex VB 6 projects, the ISFE (Information Services Front End). The ISFE started out as a Help Desk system, but eventually ended up with all sorts of other features. A few months ago, I moved the ISFE back end database from an Access .mdb, to SQL Server. (I love .mdb's, but when you are not using a web interface, and you have to connect to them remotely, you might as well go out to lunch while it works....). And about a month ago, we began using a new (corporate wide) help desk system called Unicenter HelpDesk from Computer Associates. So all the bells and whistles I have been tacking into the ISFE have been for the 'extra' features, some pretty cool ones. Anyhow, one quirk I have, is that my desktop at work won't install the Enterprise Manager for SQL Server. (My laptop installed it just fine). However, over a VPN, the ISFE actually runs faster then Enterprise Manager when it comes to getting data from the SQL Server. So over the past few days, as I've been tinkering with the ISFE program, I thought to myself 'my, wouldn't it be nice to throw in an SQL Window that I can talk to the database without Enterprise Manager'. Not only would it fix the sluggishness over a VPN, and the fact I can't hit it from desktop, but it would allow me to use it on any machine the ISFE is installed on (which is every computer in our company). Problem: In the ASP version, it builds an HTML table based on the number of fields, and number of records returned. Very simple to do. But, in VB, I only knew of the Flexgrid to get similar results. Plus, I don't have the flexgrid 'packaged' with the ISFE, so if I used it, it would might require the clients to need that flexgrid .ocx installed. However, the listview is the same .ocx (I believe) as the treeview, and I use treeviews a lot. And wouldn't you know it, the treeview makes a great 'datasheet' view. Here's some screen shots of this VB form I built (in about 20 minutes): http://www.marlow.com/ListView1.jpg http://www.marlow.com/ListView2.jpg http://www.marlow.com/ListView3.jpg Since this post is a little longer then I intended (sorry, just very pleased with how easy this form was and how well it works), if anyone thinks I should post the code behind this form, let me know. (In the middle of writing this, I added another feature to this form, which dumps the resulting data set to Excel) Drew The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From pharold at proftesting.com Wed Oct 29 13:54:36 2008 From: pharold at proftesting.com (Perry L Harold) Date: Wed, 29 Oct 2008 14:54:36 -0400 Subject: [AccessD] Reports References: Message-ID: Print to pdf. Then you have the ability to manually find the last printed page and print the rest of the file. Perry Harold Professional Testing Inc -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, October 29, 2008 1:45 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reports When printing a report and say the Printer breaks I want to be able to continue printing where I left of. Is there any way to keep track of what has been printed so far and then continue printing from that point? Martin Martin WP Reid Information Services Queen's University Riddel Hall 185 Stranmillis Road Belfast BT9 5EE Tel : 02890974465 Email : mwp.reid at qub.ac.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From max.wanadoo at gmail.com Wed Oct 29 14:01:06 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Wed, 29 Oct 2008 19:01:06 -0000 Subject: [AccessD] Reports In-Reply-To: References: Message-ID: <4908b2f3.0b9e100a.1845.ffff8a13@mx.google.com> Great lateral thinking - well done! Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry L Harold Sent: 29 October 2008 18:55 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Reports Print to pdf. Then you have the ability to manually find the last printed page and print the rest of the file. Perry Harold Professional Testing Inc -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, October 29, 2008 1:45 PM To: Access Developers discussion and problem solving Subject: [AccessD] Reports When printing a report and say the Printer breaks I want to be able to continue printing where I left of. Is there any way to keep track of what has been printed so far and then continue printing from that point? Martin Martin WP Reid Information Services Queen's University Riddel Hall 185 Stranmillis Road Belfast BT9 5EE Tel : 02890974465 Email : mwp.reid at qub.ac.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Chester_Kaup at kindermorgan.com Wed Oct 29 14:07:36 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Wed, 29 Oct 2008 14:07:36 -0500 Subject: [AccessD] Blank Lines in report In-Reply-To: References: Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C1075410F@houex1.kindermorgan.com> Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Oct 29 14:27:40 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 29 Oct 2008 12:27:40 -0700 Subject: [AccessD] Blank Lines in report In-Reply-To: <0B2BF8524B73A248A2F1B81BA751ED3C1075410F@houex1.kindermorgan.com> References: <0B2BF8524B73A248A2F1B81BA751ED3C1075410F@houex1.kindermorgan.com> Message-ID: I'm not sure what you are trying to do with the Ors in the second If statement. The first statement excludes even numbered lines so clines = 6 or 12 or 16 won't ever happen. You're missing an End If in the code but I assumed the conditions were nested. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Wednesday, October 29, 2008 12:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Blank Lines in report Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Chester_Kaup at kindermorgan.com Wed Oct 29 14:37:48 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Wed, 29 Oct 2008 14:37:48 -0500 Subject: [AccessD] Blank Lines in report In-Reply-To: References: <0B2BF8524B73A248A2F1B81BA751ED3C1075410F@houex1.kindermorgan.com> Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C10754129@houex1.kindermorgan.com> I am running either the first if statement or the second if statement NOT both at the same time. The first one works as intended. The second does nothing. The second one is the one I need to have work. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Wednesday, October 29, 2008 2:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Blank Lines in report I'm not sure what you are trying to do with the Ors in the second If statement. The first statement excludes even numbered lines so clines = 6 or 12 or 16 won't ever happen. You're missing an End If in the code but I assumed the conditions were nested. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester Sent: Wednesday, October 29, 2008 12:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Blank Lines in report Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 FAX (432) 688-3799 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martinreid at gmail.com Wed Oct 29 15:00:30 2008 From: martinreid at gmail.com (Martin) Date: Wed, 29 Oct 2008 20:00:30 +0000 Subject: [AccessD] Reports In-Reply-To: <4908b2f3.0b9e100a.1845.ffff8a13@mx.google.com> References: <4908b2f3.0b9e100a.1845.ffff8a13@mx.google.com> Message-ID: <7d60f23a0810291300k6a650bdbnc4ddb5348a691686@mail.gmail.com> PDF it is thanks. Martin On Wed, Oct 29, 2008 at 7:01 PM, Max Wanadoo wrote: > Great lateral thinking - well done! > Max > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry L Harold > Sent: 29 October 2008 18:55 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Reports > > Print to pdf. Then you have the ability to manually find the last > printed page and print the rest of the file. > > > Perry Harold > Professional Testing Inc > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid > Sent: Wednesday, October 29, 2008 1:45 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Reports > > When printing a report and say the Printer breaks I want to be able to > continue printing where I left of. Is there any way to keep track of > what has been printed so far and then continue printing from that point? > > Martin > > > Martin WP Reid > Information Services > Queen's University > Riddel Hall > 185 Stranmillis Road > Belfast > BT9 5EE > Tel : 02890974465 > Email : mwp.reid at qub.ac.uk > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- Martin Reid From bhjohnson at verizon.net Wed Oct 29 15:13:21 2008 From: bhjohnson at verizon.net (Bruce H. Johnson) Date: Wed, 29 Oct 2008 13:13:21 -0700 Subject: [AccessD] Reports In-Reply-To: <7d60f23a0810291300k6a650bdbnc4ddb5348a691686@mail.gmail.com> References: <4908b2f3.0b9e100a.1845.ffff8a13@mx.google.com> <7d60f23a0810291300k6a650bdbnc4ddb5348a691686@mail.gmail.com> Message-ID: Plus, you always have a copy of the report. "Hmm, what was that stock value on 10/24? Hah! I got the report I made then." -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Sent: Wednesday, October 29, 2008 1:01 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Reports PDF it is thanks. Martin On Wed, Oct 29, 2008 at 7:01 PM, Max Wanadoo wrote: > Great lateral thinking - well done! > Max > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry L > Harold > Sent: 29 October 2008 18:55 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Reports > > Print to pdf. Then you have the ability to manually find the last > printed page and print the rest of the file. > > > Perry Harold > Professional Testing Inc > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid > Sent: Wednesday, October 29, 2008 1:45 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Reports > > When printing a report and say the Printer breaks I want to be able to > continue printing where I left of. Is there any way to keep track of > what has been printed so far and then continue printing from that point? > > Martin > > > Martin WP Reid > Information Services > Queen's University > Riddel Hall > 185 Stranmillis Road > Belfast > BT9 5EE > Tel : 02890974465 > Email : mwp.reid at qub.ac.uk > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- Martin Reid -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From fahooper at trapo.com Wed Oct 29 15:23:44 2008 From: fahooper at trapo.com (Fred Hooper) Date: Wed, 29 Oct 2008 16:23:44 -0400 Subject: [AccessD] My first use of the Listview Control In-Reply-To: Message-ID: Very neat! I, for one, would like to see the code behind it. Thanks, Fred -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: Wednesday, October 29, 2008 2:36 PM To: Access Developers discussion and problem solving Subject: [AccessD] My first use of the Listview Control A few weeks ago we had a thread about creating a generic HTML table based on a recordset. I posted something that I typically add to my more involved web systems. It's a pretty generic asp page that let's me put in an SQL Statement and then execute it (and either display the results, or just run the SQL (if it is something like an Update, Insert or Delete process)). It's a handy page to put into a system, because when initially developing a web based system, I usually have the database and webpages local on my laptop. But I eventually get to a point where I move the system to the designated server. If I still need to develop the 'live' system, while opening and modifying .asp pages is simple (even on a remote connection), sometimes opening an .mdb can be a slow process (over a VPN, or even slower having to download it over an FTP connection). Plus, since Access 2000, sometimes the slightest change will lock the database to web users. So with that generic 'sql' page, I can put in a little SQL, and view or modify the data right in the 'live' database, the query is run on the web server itself, so I only get the data back (so it's fast), and since it is connecting to the .mdb, it doesn't lock anyone else out of the database. Pretty handy! Now lately, I've been spending most of my free time adding A LOT of bells and whistles to one of my most complex VB 6 projects, the ISFE (Information Services Front End). The ISFE started out as a Help Desk system, but eventually ended up with all sorts of other features. A few months ago, I moved the ISFE back end database from an Access .mdb, to SQL Server. (I love .mdb's, but when you are not using a web interface, and you have to connect to them remotely, you might as well go out to lunch while it works....). And about a month ago, we began using a new (corporate wide) help desk system called Unicenter HelpDesk from Computer Associates. So all the bells and whistles I have been tacking into the ISFE have been for the 'extra' features, some pretty cool ones. Anyhow, one quirk I have, is that my desktop at work won't install the Enterprise Manager for SQL Server. (My laptop installed it just fine). However, over a VPN, the ISFE actually runs faster then Enterprise Manager when it comes to getting data from the SQL Server. So over the past few days, as I've been tinkering with the ISFE program, I thought to myself 'my, wouldn't it be nice to throw in an SQL Window that I can talk to the database without Enterprise Manager'. Not only would it fix the sluggishness over a VPN, and the fact I can't hit it from desktop, but it would allow me to use it on any machine the ISFE is installed on (which is every computer in our company). Problem: In the ASP version, it builds an HTML table based on the number of fields, and number of records returned. Very simple to do. But, in VB, I only knew of the Flexgrid to get similar results. Plus, I don't have the flexgrid 'packaged' with the ISFE, so if I used it, it would might require the clients to need that flexgrid .ocx installed. However, the listview is the same .ocx (I believe) as the treeview, and I use treeviews a lot. And wouldn't you know it, the treeview makes a great 'datasheet' view. Here's some screen shots of this VB form I built (in about 20 minutes): http://www.marlow.com/ListView1.jpg http://www.marlow.com/ListView2.jpg http://www.marlow.com/ListView3.jpg Since this post is a little longer then I intended (sorry, just very pleased with how easy this form was and how well it works), if anyone thinks I should post the code behind this form, let me know. (In the middle of writing this, I added another feature to this form, which dumps the resulting data set to Excel) Drew The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Wed Oct 29 15:45:49 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 29 Oct 2008 16:45:49 -0400 Subject: [AccessD] Lost error handling Message-ID: <009001c93a07$5547a2f0$2f8601c7@SusanOne> My error handling routines have just stopped working. I first noticed it in Outlook and now Access is doing it -- VBA simply ignores my On Error statements and of course, the internal error handling takes over. Anybody ever seen this? I have trouble ever since I installed 2007 on the same system with 2003 -- it's been one problem after another. Outlook still doesn't work properly. I uninstalled 2003, installed 2007, same issues -- can't create new mail or tasks. Oddest thing I've ever seen and I have no clue what's going on. I completely uninstalled 2003 and started over, didn't make any difference, same problem. Susan H. From jimdettman at verizon.net Wed Oct 29 15:56:10 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 29 Oct 2008 16:56:10 -0400 Subject: [AccessD] Lost error handling In-Reply-To: <009001c93a07$5547a2f0$2f8601c7@SusanOne> References: <009001c93a07$5547a2f0$2f8601c7@SusanOne> Message-ID: <690271F12C4D4D84B4E5375FCC8BDA60@XPS> Susan, Make sure the VBA project is set to "break on unhandled errors" and not "Break on all errors". It's under tools/options in the VBA editor. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, October 29, 2008 4:46 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Lost error handling My error handling routines have just stopped working. I first noticed it in Outlook and now Access is doing it -- VBA simply ignores my On Error statements and of course, the internal error handling takes over. Anybody ever seen this? I have trouble ever since I installed 2007 on the same system with 2003 -- it's been one problem after another. Outlook still doesn't work properly. I uninstalled 2003, installed 2007, same issues -- can't create new mail or tasks. Oddest thing I've ever seen and I have no clue what's going on. I completely uninstalled 2003 and started over, didn't make any difference, same problem. Susan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at verizon.net Wed Oct 29 15:56:10 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Wed, 29 Oct 2008 16:56:10 -0400 Subject: [AccessD] My first use of the Listview Control In-Reply-To: References: Message-ID: <> Not only handy, but a pretty cool idea! Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: Wednesday, October 29, 2008 2:36 PM To: Access Developers discussion and problem solving Subject: [AccessD] My first use of the Listview Control A few weeks ago we had a thread about creating a generic HTML table based on a recordset. I posted something that I typically add to my more involved web systems. It's a pretty generic asp page that let's me put in an SQL Statement and then execute it (and either display the results, or just run the SQL (if it is something like an Update, Insert or Delete process)). It's a handy page to put into a system, because when initially developing a web based system, I usually have the database and webpages local on my laptop. But I eventually get to a point where I move the system to the designated server. If I still need to develop the 'live' system, while opening and modifying .asp pages is simple (even on a remote connection), sometimes opening an .mdb can be a slow process (over a VPN, or even slower having to download it over an FTP connection). Plus, since Access 2000, sometimes the slightest change will lock the database to web users. So with that generic 'sql' page, I can put in a little SQL, and view or modify the data right in the 'live' database, the query is run on the web server itself, so I only get the data back (so it's fast), and since it is connecting to the .mdb, it doesn't lock anyone else out of the database. Pretty handy! Now lately, I've been spending most of my free time adding A LOT of bells and whistles to one of my most complex VB 6 projects, the ISFE (Information Services Front End). The ISFE started out as a Help Desk system, but eventually ended up with all sorts of other features. A few months ago, I moved the ISFE back end database from an Access .mdb, to SQL Server. (I love .mdb's, but when you are not using a web interface, and you have to connect to them remotely, you might as well go out to lunch while it works....). And about a month ago, we began using a new (corporate wide) help desk system called Unicenter HelpDesk from Computer Associates. So all the bells and whistles I have been tacking into the ISFE have been for the 'extra' features, some pretty cool ones. Anyhow, one quirk I have, is that my desktop at work won't install the Enterprise Manager for SQL Server. (My laptop installed it just fine). However, over a VPN, the ISFE actually runs faster then Enterprise Manager when it comes to getting data from the SQL Server. So over the past few days, as I've been tinkering with the ISFE program, I thought to myself 'my, wouldn't it be nice to throw in an SQL Window that I can talk to the database without Enterprise Manager'. Not only would it fix the sluggishness over a VPN, and the fact I can't hit it from desktop, but it would allow me to use it on any machine the ISFE is installed on (which is every computer in our company). Problem: In the ASP version, it builds an HTML table based on the number of fields, and number of records returned. Very simple to do. But, in VB, I only knew of the Flexgrid to get similar results. Plus, I don't have the flexgrid 'packaged' with the ISFE, so if I used it, it would might require the clients to need that flexgrid .ocx installed. However, the listview is the same .ocx (I believe) as the treeview, and I use treeviews a lot. And wouldn't you know it, the treeview makes a great 'datasheet' view. Here's some screen shots of this VB form I built (in about 20 minutes): http://www.marlow.com/ListView1.jpg http://www.marlow.com/ListView2.jpg http://www.marlow.com/ListView3.jpg Since this post is a little longer then I intended (sorry, just very pleased with how easy this form was and how well it works), if anyone thinks I should post the code behind this form, let me know. (In the middle of writing this, I added another feature to this form, which dumps the resulting data set to Excel) Drew The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Wed Oct 29 16:02:14 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Wed, 29 Oct 2008 14:02:14 -0700 Subject: [AccessD] Reports In-Reply-To: References: Message-ID: Martin - can you put the last page printed into a field temp table using the Print event? Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, October 29, 2008 10:45 AM To: Access Developers discussion and problem solving Subject: [AccessD] Reports When printing a report and say the Printer breaks I want to be able to continue printing where I left of. Is there any way to keep track of what has been printed so far and then continue printing from that point? Martin Martin WP Reid Information Services Queen's University Riddel Hall 185 Stranmillis Road Belfast BT9 5EE Tel : 02890974465 Email : mwp.reid at qub.ac.uk -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Wed Oct 29 16:07:59 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Wed, 29 Oct 2008 17:07:59 -0400 Subject: [AccessD] Lost error handling References: <009001c93a07$5547a2f0$2f8601c7@SusanOne> <690271F12C4D4D84B4E5375FCC8BDA60@XPS> Message-ID: <00b601c93a0a$6d258830$2f8601c7@SusanOne> Amazing Jim -- that was it. Now how did it get changed in the first place????? How odd. I was poking around, but just hadn't found it yet. Thank you so much! Susan H. > Susan, > > Make sure the VBA project is set to "break on unhandled errors" and not > "Break on all errors". It's under tools/options in the VBA editor. > > Jim. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Wednesday, October 29, 2008 4:46 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Lost error handling > > My error handling routines have just stopped working. I first noticed it > in > Outlook and now Access is doing it -- VBA simply ignores my On Error > statements and of course, the internal error handling takes over. > > Anybody ever seen this? > > I have trouble ever since I installed 2007 on the same system with 2003 -- > it's been one problem after another. Outlook still doesn't work properly. > I > uninstalled 2003, installed 2007, same issues -- can't create new mail or > tasks. Oddest thing I've ever seen and I have no clue what's going on. I > completely uninstalled 2003 and started over, didn't make any difference, > same problem. > > 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 stuart at lexacorp.com.pg Wed Oct 29 16:08:13 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 30 Oct 2008 07:08:13 +1000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005>, , Message-ID: <49095D5D.27865.39F9E04@stuart.lexacorp.com.pg> If you are looping and updating multiple records one at a time, this is not in the least surprising - I'd be amazed if any of the others where anywhere near as fast. Opening and closing a recordset takes time. On 29 Oct 2008 at 7:40, Rocky Smolin at Beach Access wrote: > So it would seem that DAO with the OpenRecordset outside the loop is the > fastest? > > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.e-z-mrp.com > www.bchacc.com > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid > Sent: Wednesday, October 29, 2008 7:09 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Susan > > You might find this useful > > http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesda > ovba/2005-03/1330.html > > Martin > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: 29 October 2008 14:00 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > > > > Both are DAO, but what he is asking is if db.Execute with a SQL > > statement is faster then opening up a record set, finding the record, > > and then doing an .Edit/.Update. > > ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim > is that SQL is faster -- it speaks directly to the engine -- it has to be > faster. > > 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 stuart at lexacorp.com.pg Wed Oct 29 16:10:38 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 30 Oct 2008 07:10:38 +1000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: <490874c1.0ac0100a.769c.3465@mx.google.com>, Message-ID: <49095DEE.3848.3A1D258@stuart.lexacorp.com.pg> If it's a valid statement that has problems because of constraints such as Nulls not allowed, or trying to duplicate Unique index, Max is correct - it doen't throw a warning. On 29 Oct 2008 at 9:42, Drew Wutka wrote: > Hmmmm, I don't think so. If you put in an invalid SQL statement, it will > return an error. However, if you, say, try to update a record that > doesn't exist, it should just go through, since it would be a 'now > updating 0 records'.... > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Max Wanadoo > Sent: Wednesday, October 29, 2008 9:36 AM > To: 'Access Developers discussion and problem solving' > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > I *think* also that, unlike the recordset.edit/.update, the > db.execute(sql) > statement does NOT throw an error if it meets an anomalous condition > whilst > executing the sql. It just continues on. > Am I correct there? > Max > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka > Sent: 29 October 2008 14:33 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > I believe that db.execute is going to be faster, and the reason it > should be faster is that the recordset object is going to internally use > SQL commands to the DB engine anyways, so it is another layer on top of > the DB engine.... > > But that's just a well educated guess, not 100% positive about that. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin > at Beach Access Software > Sent: Tuesday, October 28, 2008 7:35 PM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] Which Is Faster - DAO or db.Execute? > > Dear List: > > In the detail event of a report, I want to set one of the fields in the > underlying recordset to true. It's an invoicing report and I want to > set > the detail record's 'Billed' field to true. The Billed field is not on > the > report - just a convenient time to set the flag. > > Would it be faster to use db.Execute "Update...Where " or use DAO > rs.FindFirst. The Where part of the db.Execute and the FindFirst both > use > TimeSheetID for the search - a primary key. The table is a linked table > - so > no Seek. The number of detail records per invoice is pretty low - > average > 10-20. So, not like it's updating a large number of records. So > response > time is not an issue. > > I wrote it with DAO - just a few lines of code - because I favor DAO. > So > more curiosity for future apps. > > MTIA, > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > The information contained in this transmission is intended only for the > person or entity to which it is addressed and may contain II-VI > Proprietary > and/or II-VI Business Sensitive material. If you are not the intended > recipient, please contact the sender immediately and destroy the > material in > its entirety, whether electronic or hard copy. You are notified that any > review, retransmission, copying, disclosure, dissemination, or other use > of, > or taking of any action in reliance upon this information by persons or > entities other than the intended recipient 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 > The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at Marlow.com Wed Oct 29 16:26:23 2008 From: DWUTKA at Marlow.com (Drew Wutka) Date: Wed, 29 Oct 2008 16:26:23 -0500 Subject: [AccessD] My first use of the Listview Control In-Reply-To: Message-ID: Here ya go Fred. Mind you, there is custom error handling in this, which is part of the rest of the system, and the isfeDatabase is a global object that handles the database connection, so that just needs to be replaced with a standard ADO Connection initializing. Drew (And the resize event is what makes that form look that way color wise). Private Sub RunSQL() On Error GoTo ErrorHandler Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Dim strSQL As String Dim i As Long Dim itmX As ListItem strSQL = Me.txtSQL isfeDatabase.ISFEDBConnect cnn Me.lstResults.ListItems.Clear If UCase(Left(strSQL, 6)) = "SELECT" Then Set rs = New ADODB.Recordset rs.Open strSQL, cnn, adOpenForwardOnly, adLockReadOnly Me.lstResults.ColumnHeaders.Clear For i = 1 To rs.Fields.Count Me.lstResults.ColumnHeaders.Add i, rs.Fields(i - 1).Name, rs.Fields(i - 1).Name, rs.Fields(i - 1).ActualSize * 20 Next i If rs.EOF = False Then rs.MoveFirst Do Until rs.EOF = True Set itmX = Me.lstResults.ListItems.Add(, , rs.Fields(0).Value) For i = 1 To rs.Fields.Count - 1 If Not IsNull(rs.Fields(i).Value) Then itmX.SubItems(i) = rs.Fields(i).Value Next i rs.MoveNext Loop rs.Close Set rs = Nothing Else cnn.Execute strSQL, i Me.lstResults.ColumnHeaders.Clear Me.lstResults.ColumnHeaders.Add , , "Number of affected Records: " & i, 300 End If isfeDatabase.ReleaseISFEDBConnection Set cnn = Nothing Exit Sub ErrorHandler: MsgBox Err.Number & " - " & Err.Description Err.Clear End Sub Private Sub cmdExecute_Click() RunSQL End Sub Private Sub Form_Load() On Error GoTo ErrorHandler BuildTableList Exit Sub ErrorHandler: isfeErrorHandler.Module = "frmSQLWindow" isfeErrorHandler.Procedure = "Form_Load" isfeErrorHandler.ErrorDescription = Err.Description isfeErrorHandler.ErrorNumber = Err.Number isfeErrorHandler.RaiseError Err.Clear End Sub Private Sub Form_Resize() On Error GoTo ErrorHandler Dim y As Long AutoRedraw = True ScaleMode = vbPixels For y = 0 To ScaleHeight Line (-1, y - 1)-(ScaleWidth, y + 1), RGB(isfeFormGradientRed, isfeFormGradientGreen, isfeFormGradientBlue - (y * isfeFormGradientBlue) \ ScaleHeight), B Next y Exit Sub ErrorHandler: isfeErrorHandler.Module = "frmSQLWindow" isfeErrorHandler.Procedure = "Form_Resize" isfeErrorHandler.ErrorDescription = Err.Description isfeErrorHandler.ErrorNumber = Err.Number isfeErrorHandler.RaiseError Err.Clear End Sub Private Function BuildTableList() On Error GoTo ErrorHandler Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Me.lstTables.Clear isfeDatabase.ISFEDBConnect cnn Set rs = cnn.OpenSchema(adSchemaTables) If rs.EOF = False Then rs.MoveFirst Do Until rs.EOF = True If rs.Fields("TABLE_TYPE").Value = "TABLE" Then Me.lstTables.AddItem rs.Fields("TABLE_NAME").Value End If rs.MoveNext Loop rs.Close Set rs = Nothing isfeDatabase.ReleaseISFEDBConnection Set cnn = Nothing Exit Function ErrorHandler: isfeErrorHandler.Module = "frmSQLWindow" isfeErrorHandler.Procedure = "BuildTableList" isfeErrorHandler.ErrorDescription = Err.Description isfeErrorHandler.ErrorNumber = Err.Number isfeErrorHandler.RaiseError Err.Clear End Function Private Sub lstTables_Click() On Error GoTo ErrorHandler Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Dim i As Long isfeDatabase.ISFEDBConnect cnn Set rs = New ADODB.Recordset rs.Open Me.lstTables.List(Me.lstTables.ListIndex), cnn, adOpenForwardOnly, adLockReadOnly, adCmdTableDirect Me.lstFields.Clear For i = 0 To rs.Fields.Count - 1 Me.lstFields.AddItem rs.Fields(i).Name Next i rs.Close Set rs = Nothing isfeDatabase.ReleaseISFEDBConnection Set cnn = Nothing If Me.chkTableSQL Then Me.txtSQL = "SELECT * FROM " & Me.lstTables.List(Me.lstTables.ListIndex) Exit Sub ErrorHandler: isfeErrorHandler.Module = "frmSQLWindow" isfeErrorHandler.Procedure = "lstTables_Click" isfeErrorHandler.ErrorDescription = Err.Description isfeErrorHandler.ErrorNumber = Err.Number isfeErrorHandler.RaiseError Err.Clear End Sub Private Function ExcelColumn(intColumn As Long) As String Dim intTemp As Long Dim intPart As Long If intColumn <= 26 Then ExcelColumn = Chr(64 + intColumn) Else intTemp = Fix(intColumn / 26) intPart = intColumn - (intTemp * 26) ExcelColumn = Chr(64 + intTemp) & Chr(65 + intPart) End If End Function Private Sub mnuDumpToExcel_Click() On Error GoTo ErrorHandler Dim ExlApp As Excel.Application Dim ExlWrkSht As Excel.Worksheet Dim i As Long Dim j As Long Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset If UCase(Left(Me.txtSQL, 6)) <> "SELECT" Then Exit Sub isfeDatabase.ISFEDBConnect cnn Set rs = New ADODB.Recordset rs.Open CStr(Me.txtSQL), cnn, adOpenForwardOnly, adLockReadOnly If rs.EOF = False Then rs.MoveFirst Set ExlApp = CreateObject("Excel.Application") Screen.MousePointer = vbHourglass ExlApp.Workbooks.Add ExlApp.Visible = True For i = 0 To ExlApp.Sheets.Count - 1 If i = 1 Then Set ExlWrkSht = ExlApp.Sheets(i) ExlWrkSht.Name = "ISFE SQL Dump" Else ExlApp.Sheets(2).Delete End If Next i For i = 1 To rs.Fields.Count ExlWrkSht.Columns(ExcelColumn(i) & ":" & ExcelColumn(i)).ColumnWidth = 20 'rs.Fields(i - 1).ActualSize ExlApp.Range(ExcelColumn(i) & 1).Font.Bold = True ExlApp.Range(ExcelColumn(i) & 1).Font.Size = 14 ExlApp.Range(ExcelColumn(i) & 1) = rs.Fields(i - 1).Name Next i j = 2 Do Until rs.EOF = True For i = 1 To rs.Fields.Count If Not IsNull(rs.Fields(i - 1).Value) Then ExlApp.Range(ExcelColumn(i) & j) = rs.Fields(i - 1).Value Next i j = j + 1 rs.MoveNext Loop rs.Close Set rs = Nothing isfeDatabase.ReleaseISFEDBConnection Set cnn = Nothing Screen.MousePointer = vbNormal Set ExlWrkSht = Nothing Set ExlApp = Nothing Exit Sub ErrorHandler: isfeErrorHandler.Module = "frmSQLWindow" isfeErrorHandler.Procedure = "mnuDumpToExcel_Click" isfeErrorHandler.ErrorDescription = Err.Description isfeErrorHandler.ErrorNumber = Err.Number isfeErrorHandler.RaiseError Err.Clear End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Fred Hooper Sent: Wednesday, October 29, 2008 3:24 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] My first use of the Listview Control Very neat! I, for one, would like to see the code behind it. Thanks, Fred The information contained in this transmission is intended only for the person or entity to which it is addressed and may contain II-VI Proprietary and/or II-VI Business Sensitive material. If you are not the intended recipient, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. You are notified that any review, retransmission, copying, disclosure, dissemination, or other use of, or taking of any action in reliance upon this information by persons or entities other than the intended recipient is prohibited. From fahooper at trapo.com Wed Oct 29 16:36:19 2008 From: fahooper at trapo.com (Fred Hooper) Date: Wed, 29 Oct 2008 17:36:19 -0400 Subject: [AccessD] My first use of the Listview Control In-Reply-To: Message-ID: <2B633E7D35DB47D78D6DCB6B05439DF3@FRED6998B25045> Thanks Drew, I'm looking forward to working through it tomorrow. Fred -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka Sent: Wednesday, October 29, 2008 5:26 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] My first use of the Listview Control Here ya go Fred. Mind you, there is custom error handling in this, which is part of the rest of the system, and the isfeDatabase is a global object that handles the database connection, so that just needs to be replaced with a standard ADO Connection initializing. Drew (And the resize event is what makes that form look that way color wise). From gustav at cactus.dk Wed Oct 29 17:18:12 2008 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 29 Oct 2008 23:18:12 +0100 Subject: [AccessD] Blank Lines in report Message-ID: Hi Chester Did you try my code line? You could also insert a debug line to view what is going on: End If Debug.Print "cLines:" & Str(cLines) cLines = cLines + 1 End Sub /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 20:07 >>> Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 From Darryl.Collins at coles.com.au Wed Oct 29 18:01:22 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Thu, 30 Oct 2008 10:01:22 +1100 Subject: [AccessD] End Statement in VBA In-Reply-To: Message-ID: <57E6E6CA42105A48B977303A2CDC2720077449CCD9@WPEXCH22.retail.ad.cmltd.net.au> Hi Folks, One of the guys on the Excel-L list asked the following and no-one has gotten back to him (yet). I found it a good question and wondered if anyone here knows the answer. ''--- Copied email follows--- Does the End statement (by itself -- which I think kills VBA runtime completely) dump variables from memory effectively? ''--- End copy --- Cheers Darryl. This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From max.wanadoo at gmail.com Wed Oct 29 18:30:47 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Wed, 29 Oct 2008 23:30:47 -0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: <49095D5D.27865.39F9E04@stuart.lexacorp.com.pg> References: <9C273A26EA7B4C2C9D54CC3CA9C8B84E@HAL9005>, , <49095D5D.27865.39F9E04@stuart.lexacorp.com.pg> Message-ID: <4908f24e.096c100a.4979.057e@mx.google.com> Ah yes, but what about... A. rst=currentbd(sql statement) if not rst.eof then rst.movefirst do while not rst.eof if rst!myfield = 1 then rst.edit rst!myfield = 2 rst.update endif rts.movenext loop endif B. Sql = "Update myTable set Myfield = 2 where Myfield = 1 Currentdb.execute(sql) I think B is going to be a lot faster...am I right? AND If myfield doesn't exist then you will never know.... Max Ps ignore typos. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: 29 October 2008 21:08 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? If you are looping and updating multiple records one at a time, this is not in the least surprising - I'd be amazed if any of the others where anywhere near as fast. Opening and closing a recordset takes time. On 29 Oct 2008 at 7:40, Rocky Smolin at Beach Access wrote: > So it would seem that DAO with the OpenRecordset outside the loop is the > fastest? > > > Rocky Smolin > Beach Access Software > 858-259-4334 > www.e-z-mrp.com > www.bchacc.com > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid > Sent: Wednesday, October 29, 2008 7:09 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > Susan > > You might find this useful > > http://www.tech-archive.net/Archive/Access/microsoft.public.access.modulesda > ovba/2005-03/1330.html > > Martin > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: 29 October 2008 14:00 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? > > > > > Both are DAO, but what he is asking is if db.Execute with a SQL > > statement is faster then opening up a record set, finding the record, > > and then doing an .Edit/.Update. > > ======Yes, I realize they're both DAO, I just thought I'd clarify. My claim > is that SQL is faster -- it speaks directly to the engine -- it has to be > faster. > > 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 -- 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 Oct 29 18:30:06 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 30 Oct 2008 09:30:06 +1000 Subject: [AccessD] End Statement in VBA In-Reply-To: <57E6E6CA42105A48B977303A2CDC2720077449CCD9@WPEXCH22.retail.ad.cmltd.net.au> References: , <57E6E6CA42105A48B977303A2CDC2720077449CCD9@WPEXCH22.retail.ad.cmltd.net.au> Message-ID: <49097E9E.3448.50A1E8@stuart.lexacorp.com.pg> According to Access VBA Help file: When executed, the End statement resets all module-level variables and all static local variables in all modules. To preserve the value of these variables, use the Stop statement instead. You can then resume execution while preserving the value of those variables. Note The End statement stops code execution abruptly, without invoking the Unload, QueryUnload, or Terminate event, or any other Visual Basic code. Code you have placed in the Unload, QueryUnload, and Terminate events of forms and class modules is not executed. Objects created from class modules are destroyed, files opened using the Open statement are closed, and memory used by your program is freed. Object references held by other programs are invalidated. Note the second to last sentence. So it looks as though the answer is Yes. -- Stuart On 30 Oct 2008 at 10:01, Darryl Collins wrote: > Hi Folks, > > One of the guys on the Excel-L list asked the following and no-one has > gotten back to him (yet). I found it a good question and wondered if > anyone here knows the answer. > > ''--- Copied email follows--- > > Does the End statement (by itself -- which I think kills VBA runtime > completely) dump variables from memory effectively? > > ''--- End copy --- > > Cheers > Darryl. > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Darryl.Collins at coles.com.au Wed Oct 29 20:16:29 2008 From: Darryl.Collins at coles.com.au (Darryl Collins) Date: Thu, 30 Oct 2008 12:16:29 +1100 Subject: [AccessD] End Statement in VBA In-Reply-To: <49097E9E.3448.50A1E8@stuart.lexacorp.com.pg> Message-ID: <57E6E6CA42105A48B977303A2CDC2720077449CCE6@WPEXCH22.retail.ad.cmltd.net.au> Stuart, Thanks mate, that is perfect - sigh, I guess I should have checked 'help' first, Am guilty of not even thinking of that in this instance. Cheers Darryl. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stuart McLachlan Sent: Thursday, 30 October 2008 10:30 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] End Statement in VBA According to Access VBA Help file: When executed, the End statement resets all module-level variables and all static local variables in all modules. To preserve the value of these variables, use the Stop statement instead. You can then resume execution while preserving the value of those variables. Note The End statement stops code execution abruptly, without invoking the Unload, QueryUnload, or Terminate event, or any other Visual Basic code. Code you have placed in the Unload, QueryUnload, and Terminate events of forms and class modules is not executed. Objects created from class modules are destroyed, files opened using the Open statement are closed, and memory used by your program is freed. Object references held by other programs are invalidated. Note the second to last sentence. So it looks as though the answer is Yes. -- Stuart On 30 Oct 2008 at 10:01, Darryl Collins wrote: > Hi Folks, > > One of the guys on the Excel-L list asked the following and no-one has > gotten back to him (yet). I found it a good question and wondered if > anyone here knows the answer. > > ''--- Copied email follows--- > > Does the End statement (by itself -- which I think kills VBA runtime > completely) dump variables from memory effectively? > > ''--- End copy --- > > Cheers > Darryl. > > This email and any attachments may contain privileged and confidential information > and are intended for the named addressee only. If you have received this e-mail in > error, please notify the sender and delete this e-mail immediately. Any > confidentiality, privilege or copyright is not waived or lost because this e-mail > has been sent to you in error. It is your responsibility to check this e-mail and > any attachments for viruses. No warranty is made that this material is free from > computer virus or any other defect or error. Any loss/damage incurred by using this > material is not the sender's responsibility. The sender's entire liability will be > limited to resupplying the material. > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This email and any attachments may contain privileged and confidential information and are intended for the named addressee only. If you have received this e-mail in error, please notify the sender and delete this e-mail immediately. Any confidentiality, privilege or copyright is not waived or lost because this e-mail has been sent to you in error. It is your responsibility to check this e-mail and any attachments for viruses. No warranty is made that this material is free from computer virus or any other defect or error. Any loss/damage incurred by using this material is not the sender's responsibility. The sender's entire liability will be limited to resupplying the material. From joeget at vgernet.net Wed Oct 29 22:49:05 2008 From: joeget at vgernet.net (John Eget) Date: Wed, 29 Oct 2008 23:49:05 -0400 Subject: [AccessD] Transfer info from subform to parent form Message-ID: <61199778BA2040C6A2FF29AAB99C72E4@gateway8529fab> Hi On the form named frmPAInput, I click on a command button to open a subform named subfrmCharPA After entering several records that contain values on the subform named subfrmCharPA, I display a total value by depressing a command button labeled Refresh Total. That enables the values of CharQty that have been entered on the subform to be totalled and displayed in a text box named TotalCharQty on the subform I then can manually enter that value on the form frmPAInput, in a field named Observations. Is it possible to have the value be automatically entered from the subform to the main form? And also if there were no subform entries, would I still be able to enter an observation value manually? I have tried the wizard to generate the code but have been unable to get this correct. Thanks John From stuart at lexacorp.com.pg Wed Oct 29 23:11:48 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 30 Oct 2008 14:11:48 +1000 Subject: [AccessD] Transfer info from subform to parent form In-Reply-To: <61199778BA2040C6A2FF29AAB99C72E4@gateway8529fab> References: <61199778BA2040C6A2FF29AAB99C72E4@gateway8529fab> Message-ID: <4909C0A4.14298.1528825@stuart.lexacorp.com.pg> You don't need the Refresh button. Set the value of TotalCharQty to "=Sum(CharQty)". That way, the total will keep itself updated. If you want to have Observations automatically filled in, but also want to ability to enter it manually, one way is to fill in the value when you enter the field, you can then accept the entry or enter something else. To do this, use an On Enter event procedure like this: Private Sub Observations_Enter() If IsNull(Observations) or Observations = "" Then 'only update if it's empty Observations = subfrmCharPA.Form.TotalCharQty End if End Sub On 29 Oct 2008 at 23:49, John Eget wrote: > Hi > > On the form named frmPAInput, I click on a command button to open a > subform named subfrmCharPA > > After entering several records that contain values on the subform > named subfrmCharPA, I display a total value by depressing a command > button labeled Refresh Total. That enables the values of CharQty that > have been entered on the subform to be totalled and displayed in a > text box named TotalCharQty on the subform > > I then can manually enter that value on the form frmPAInput, in a field named Observations. > > Is it possible to have the value be automatically entered from the > subform to the main form? And also if there were no subform entries, > would I still be able to enter an observation value manually? > > I have tried the wizard to generate the code but have been unable to get this correct. > > Thanks > > John > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Gustav at cactus.dk Thu Oct 30 01:58:19 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Thu, 30 Oct 2008 07:58:19 +0100 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: Hi Max No, but that was not the task of Rocky. /gustav >>> max.wanadoo at gmail.com 30-10-2008 00:30 >>> Ah yes, but what about... From max.wanadoo at gmail.com Thu Oct 30 02:53:48 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Thu, 30 Oct 2008 07:53:48 -0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: Message-ID: <4909680c.05a4100a.6f38.04a9@mx.google.com> Hi Gustav, I was responding to the title of these messages, ie: "Which Is Faster - DAO or db.Execute?" Thanks Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 30 October 2008 06:58 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Hi Max No, but that was not the task of Rocky. /gustav >>> max.wanadoo at gmail.com 30-10-2008 00:30 >>> Ah yes, but what about... -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Gustav at cactus.dk Thu Oct 30 03:20:45 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Thu, 30 Oct 2008 09:20:45 +0100 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: Hi Max I know, but the title was created by Rocky and referred to his task which was quite different from the task you describe, thus some confusion could easily arise. /gustav >>> max.wanadoo at gmail.com 30-10-2008 08:53 >>> Hi Gustav, I was responding to the title of these messages, ie: "Which Is Faster - DAO or db.Execute?" Thanks Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 30 October 2008 06:58 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Hi Max No, but that was not the task of Rocky. /gustav >>> max.wanadoo at gmail.com 30-10-2008 00:30 >>> Ah yes, but what about... From jimdettman at verizon.net Thu Oct 30 05:47:14 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Thu, 30 Oct 2008 06:47:14 -0400 Subject: [AccessD] Lost error handling In-Reply-To: <00b601c93a0a$6d258830$2f8601c7@SusanOne> References: <009001c93a07$5547a2f0$2f8601c7@SusanOne> <690271F12C4D4D84B4E5375FCC8BDA60@XPS> <00b601c93a0a$6d258830$2f8601c7@SusanOne> Message-ID: <0E0A77A3968141D1B30CA44DFEC2C622@XPS> Susan, Not sure how it got that way; maybe a new piece of software or something that an old add-in, etc. did. You can enable/suspend breaks via code: ACC2000: How to Turn Off "Break on All Errors" Option in Code http://support.microsoft.com/kb/209884 Another one of those great mysteries I guess, but at least it's sorted out. You'd think by now that development would be getting easier, but it just seems like there are more and more hurdles in the path. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, October 29, 2008 5:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Lost error handling Amazing Jim -- that was it. Now how did it get changed in the first place????? How odd. I was poking around, but just hadn't found it yet. Thank you so much! Susan H. > Susan, > > Make sure the VBA project is set to "break on unhandled errors" and not > "Break on all errors". It's under tools/options in the VBA editor. > > Jim. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Wednesday, October 29, 2008 4:46 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Lost error handling > > My error handling routines have just stopped working. I first noticed it > in > Outlook and now Access is doing it -- VBA simply ignores my On Error > statements and of course, the internal error handling takes over. > > Anybody ever seen this? > > I have trouble ever since I installed 2007 on the same system with 2003 -- > it's been one problem after another. Outlook still doesn't work properly. > I > uninstalled 2003, installed 2007, same issues -- can't create new mail or > tasks. Oddest thing I've ever seen and I have no clue what's going on. I > completely uninstalled 2003 and started over, didn't make any difference, > same problem. > > 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 max.wanadoo at gmail.com Thu Oct 30 07:31:58 2008 From: max.wanadoo at gmail.com (Max Wanadoo) Date: Thu, 30 Oct 2008 12:31:58 -0000 Subject: [AccessD] Which Is Faster - DAO or db.Execute? In-Reply-To: References: Message-ID: <4909a941.0ac0100a.02a6.5e95@mx.google.com> So, how does what I posted differ from these two postings below? I think my posting was entirely within the bounds of the questions being put back and forth between different people. Sorry if I got that wrong. I will drop out of the conversation Thanks Max > > Both are DAO, but what he is asking is if db.Execute with a SQL > statement is faster then opening up a record set, finding the record, > and then doing an .Edit/.Update. >======Yes, I realize they're both DAO, I just thought I'd clarify. My claim is that SQL is faster -- it speaks directly to the engine -- it has to be >faster. >SUsan H. > -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 30 October 2008 08:21 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Hi Max I know, but the title was created by Rocky and referred to his task which was quite different from the task you describe, thus some confusion could easily arise. /gustav >>> max.wanadoo at gmail.com 30-10-2008 08:53 >>> Hi Gustav, I was responding to the title of these messages, ie: "Which Is Faster - DAO or db.Execute?" Thanks Max -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 30 October 2008 06:58 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Which Is Faster - DAO or db.Execute? Hi Max No, but that was not the task of Rocky. /gustav >>> max.wanadoo at gmail.com 30-10-2008 00:30 >>> Ah yes, but what about... -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Chester_Kaup at kindermorgan.com Thu Oct 30 07:47:15 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Thu, 30 Oct 2008 07:47:15 -0500 Subject: [AccessD] Blank Lines in report In-Reply-To: References: Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C107541BB@houex1.kindermorgan.com> If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with a blank line every third line. Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with no blank lines Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub cLines increments just fine in both cases. I am puzzled. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 5:18 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Did you try my code line? You could also insert a debug line to view what is going on: End If Debug.Print "cLines:" & Str(cLines) cLines = cLines + 1 End Sub /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 20:07 >>> Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup Engineering Technician Kinder Morgan CO2 Company, LLP Office (432) 688-3797 -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Thu Oct 30 12:11:14 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Thu, 30 Oct 2008 13:11:14 -0400 Subject: [AccessD] New version of Environ("computername")? Message-ID: <06bc01c93ab2$86c4bd80$2f8601c7@SusanOne> Environ("username") and Application.UserName are equivalent, but I can't find anything similar for Environ("computername") -- is there an Application equivalent? Is there a preference? Susan H. From Gustav at cactus.dk Thu Oct 30 12:31:16 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Thu, 30 Oct 2008 18:31:16 +0100 Subject: [AccessD] Which Is Faster - DAO or db.Execute? Message-ID: Hi Max Reading again: --- In the detail event of a report, I want to set one of the fields in the underlying recordset to true. It's an invoicing report and I want to set the detail record's 'Billed' field to true. The Billed field is not on the report - just a convenient time to set the flag. Would it be faster to use db.Execute "Update...Where " or use DAO rs.FindFirst. The Where part of the db.Execute and the FindFirst both use TimeSheetID for the search - a primary key. The table is a linked table - so no Seek. The number of detail records per invoice is pretty low - average 10-20. So, not like it's updating a large number of records. So response time is not an issue. --- So you may be right. I recalled it as series of runs of the report where you would need to look up the id of each invoice. However, it seems to be the invoice lines that should be updated in which case you, of course, only need to look up one invoice id. Now, what to have in mind here is, that the update will follow the run of a report. Compared to the time this will consume, the time for running the update will be of zero importance, thus I think - in this case - the question of ADO/DAO or SQL is moot. /gustav >>> max.wanadoo at gmail.com 30-10-2008 13:31 >>> So, how does what I posted differ from these two postings below? I think my posting was entirely within the bounds of the questions being put back and forth between different people. Sorry if I got that wrong. I will drop out of the conversation Thanks Max From Gustav at cactus.dk Thu Oct 30 12:34:01 2008 From: Gustav at cactus.dk (Gustav Brock) Date: Thu, 30 Oct 2008 18:34:01 +0100 Subject: [AccessD] Blank Lines in report Message-ID: Hi Chester - and if you adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If then what do you see? /gustav >>> Chester_Kaup at kindermorgan.com 30-10-2008 13:47 >>> If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with a blank line every third line. Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with no blank lines Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub cLines increments just fine in both cases. I am puzzled. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 5:18 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Did you try my code line? You could also insert a debug line to view what is going on: End If Debug.Print "cLines:" & Str(cLines) cLines = cLines + 1 End Sub /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 20:07 >>> Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup From rockysmolin at bchacc.com Thu Oct 30 12:37:10 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 30 Oct 2008 10:37:10 -0700 Subject: [AccessD] Heading in sub-report Message-ID: Dear List: I have a subreport which is columnar in format and so has column heading in the subreport's report head. So they show up but if the sub-report is long enough to need a second page, the headings don't show on page 2. I originally had the headings in the Page Header section of the report but they didn't on page 2. Is there a way to get the sub-report headings to show on each page of the main report of the sub report goes over more than one page? MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From dwaters at usinternet.com Thu Oct 30 12:39:11 2008 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 30 Oct 2008 12:39:11 -0500 Subject: [AccessD] New version of Environ("computername")? In-Reply-To: <06bc01c93ab2$86c4bd80$2f8601c7@SusanOne> References: <06bc01c93ab2$86c4bd80$2f8601c7@SusanOne> Message-ID: I do use VBA.Environ("ComputerName"). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, October 30, 2008 12:11 PM To: AccessD at databaseadvisors.com Subject: [AccessD] New version of Environ("computername")? Environ("username") and Application.UserName are equivalent, but I can't find anything similar for Environ("computername") -- is there an Application equivalent? Is there a preference? Susan H. -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Chester_Kaup at kindermorgan.com Thu Oct 30 13:04:44 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Thu, 30 Oct 2008 13:04:44 -0500 Subject: [AccessD] Blank Lines in report In-Reply-To: References: Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C1075426D@houex1.kindermorgan.com> I get a blank line after line 1, 4, 7, 12, 15, 18 and 21. I also get 2 blank lines after line 9. What I need is a blank line after lines 3, 6, 9, 12, 15 and 16. Thanks for your ideas. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, October 30, 2008 12:34 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester - and if you adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If then what do you see? /gustav >>> Chester_Kaup at kindermorgan.com 30-10-2008 13:47 >>> If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with a blank line every third line. Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub If I set up the code like this and walk through it all the statements in the if then end if block are executed when the if condition is met (3, 6, 9 etc). The report displays with no blank lines Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub cLines increments just fine in both cases. I am puzzled. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 5:18 PM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Did you try my code line? You could also insert a debug line to view what is going on: End If Debug.Print "cLines:" & Str(cLines) cLines = cLines + 1 End Sub /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 20:07 >>> Thanks for the idea but turns out I need to do something a little different. The first If cLines statement in the sub detail section works as intended inserting a blank line every third row. The second If cLines statement inserts no blank lines. I have run each separately and have walked through the code. What am I missing? Option Compare Database Option Explicit ' This code declares the cLines variable as an integer, and the ' cMaxLine constant as five. You can set the cMaxLine constant ' to insert a blank line after as many lines as you want. For ' example, to add a blank line after every eight lines in the ' report, set cMaxLine=8. Dim cLines As Integer Const cMaxLine = 3 Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) ' This code adds a blank line by setting the NextRecord and ' PrintSection properties. If cLines Mod (cMaxLine + 1) = 0 Then If cLines = 3 Or cLines = 6 Or cLines = 9 Or cLines = 12 Or cLines = 15 Or cLines = 16 Then Me.NextRecord = False Me.PrintSection = False End If cLines = cLines + 1 End Sub Private Sub Report_Open(Cancel As Integer) 'This code initializes the cLines variable to zero. cLines = 0 End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, October 29, 2008 11:15 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Blank Lines in report Hi Chester Couldn't you introduce a second constant: Const cMaxLine16 = 16 and adjust the code like this: If (cLines Mod (cMaxLine + 1) = 0) Or (cLines Mod (cMaxLine16 + 1) = 0) Then Me.NextRecord = False Me.PrintSection = False End If /gustav >>> Chester_Kaup at kindermorgan.com 29-10-2008 17:02:07 >>> I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwelz at hotmail.com Thu Oct 30 13:05:44 2008 From: jwelz at hotmail.com (Jurgen Welz) Date: Thu, 30 Oct 2008 12:05:44 -0600 Subject: [AccessD] New version of Environ("computername")? In-Reply-To: <06bc01c93ab2$86c4bd80$2f8601c7@SusanOne> References: <06bc01c93ab2$86c4bd80$2f8601c7@SusanOne> Message-ID: I remember Seth Galitzer posting something about how unreliable or flakey environment variables are. At one point he had a demo of use of them at his university web page. He backed off on these. Private Declare Function GetComputerNameA Lib "kernel32" (ByVal lpBuffer As String, lngSize As Long) As Long Public Function fnComputerName() As String On Error Resume Next Dim strRet As String * 256 Static strComputer As String If Len(strComputer) Then fnComputerName = strComputer Else If GetComputerNameA(strRet, Len(strRet)) <> 0 Then strComputer = Left$(strRet, InStr(1, strRet, vbNullChar) - 1) fnComputerName = strComputer End If End If End FunctionCiaoJ?rgen WelzEdmonton, Albertajwelz at hotmail.com> From: ssharkins at gmail.com> To: AccessD at databaseadvisors.com> Date: Thu, 30 Oct 2008 13:11:14 -0400> Subject: [AccessD] New version of Environ("computername")?> > Environ("username") and Application.UserName are equivalent, but I can't > find anything similar for Environ("computername") -- is there an Application > equivalent?> > Is there a preference?> > 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 Thu Oct 30 13:11:06 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 30 Oct 2008 11:11:06 -0700 Subject: [AccessD] Heading in sub-report In-Reply-To: References: Message-ID: Put them in a group heading instead and set the header's RepeatSection property to True. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Thursday, October 30, 2008 10:37 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Heading in sub-report Dear List: I have a subreport which is columnar in format and so has column heading in the subreport's report head. So they show up but if the sub-report is long enough to need a second page, the headings don't show on page 2. I originally had the headings in the Page Header section of the report but they didn't on page 2. Is there a way to get the sub-report headings to show on each page of the main report of the sub report goes over more than one page? MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Thu Oct 30 13:22:36 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Thu, 30 Oct 2008 11:22:36 -0700 Subject: [AccessD] Heading in sub-report In-Reply-To: References: Message-ID: <306496317767431F95B21A07D0F61282@HAL9005> Charlotte: Thanks. Worked perfectly. Had to make up a bogus group so that it wouldn't print the heading on every detail line, but it works! Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, October 30, 2008 11:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Heading in sub-report Put them in a group heading instead and set the header's RepeatSection property to True. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Thursday, October 30, 2008 10:37 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Heading in sub-report Dear List: I have a subreport which is columnar in format and so has column heading in the subreport's report head. So they show up but if the sub-report is long enough to need a second page, the headings don't show on page 2. I originally had the headings in the Page Header section of the report but they didn't on page 2. Is there a way to get the sub-report headings to show on each page of the main report of the sub report goes over more than one page? MTIA, Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 airtelmail.in Thu Oct 30 14:08:25 2008 From: adtp at airtelmail.in (A.D.Tejpal) Date: Fri, 31 Oct 2008 00:38:25 +0530 Subject: [AccessD] Blank Lines in report References: <0B2BF8524B73A248A2F1B81BA751ED3C107540A0@houex1.kindermorgan.com> Message-ID: <010401c93ac3$0642bac0$845ea27a@personald6374f> Kaup, Apparently, you wish to insert a blank line after every three records upto 15th record and then another blank line after the sixteenth record. Thereafter, similar cycle to be repeated from record 17 to 32 and so on. Sample code in report's module as given below, should get you the desired results. It would be noted that for incrementing row count variable, detail section's print event has been used instead of the format event. The latter would have led to unwanted increments in case of extra cycle of formatting caused by a calculated text box having [Pages] as part of its expression. Check against WillContinue property of detail section is found necessary so as to avoid phantom increment to row count variable at the end of a page. The suggested solution has been tested at my end on Access 2003 desktop. You might like to try it out and confirm the outcome. Imp: Please make sure that the setting [Event Procedure] appears on Event tab of properties sheet against report's open event and detail section's print event. Best wishes, A.D. Tejpal ------------ ' Code in report's module '============================== ' Declarations section Private RowCount As Long Private Const RowGrpMinor As Long = 3 Private Const RowGrpMajor As Long = 16 '--------------------------------------------- Private Sub Detail_Print(Cancel As Integer, _ PrintCount As Integer) If Me.Detail.WillContinue = False Then RowCount = RowCount + 1 End If RowCount = IIf(RowCount <= (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1), _ RowCount, 1) If RowCount Mod (RowGrpMinor + 1) = 0 _ Or RowCount = (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1) Then Me.NextRecord = False Me.PrintSection = False Else Me.NextRecord = True Me.PrintSection = True End If End Sub '--------------------------------------------- Private Sub Report_Open(Cancel As Integer) RowCount = 0 End Sub '=============================== ----- Original Message ----- From: Kaup, Chester To: Access Developers discussion and problem solving Sent: Wednesday, October 29, 2008 21:32 Subject: [AccessD] Blank Lines in report I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup From Chester_Kaup at kindermorgan.com Thu Oct 30 14:31:49 2008 From: Chester_Kaup at kindermorgan.com (Kaup, Chester) Date: Thu, 30 Oct 2008 14:31:49 -0500 Subject: [AccessD] Blank Lines in report In-Reply-To: <010401c93ac3$0642bac0$845ea27a@personald6374f> References: <0B2BF8524B73A248A2F1B81BA751ED3C107540A0@houex1.kindermorgan.com> <010401c93ac3$0642bac0$845ea27a@personald6374f> Message-ID: <0B2BF8524B73A248A2F1B81BA751ED3C107542A3@houex1.kindermorgan.com> Thanks for the code however I guess I did not explain the line breaks as well as I could have. This part is correct. Apparently, you wish to insert a blank line after every three records up to 15th record and then another blank line after the sixteenth record. Here is the change. Thereafter there are to be no more blank lines. Thanks for your assistance. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of A.D.Tejpal Sent: Thursday, October 30, 2008 2:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Blank Lines in report Kaup, Apparently, you wish to insert a blank line after every three records upto 15th record and then another blank line after the sixteenth record. Thereafter, similar cycle to be repeated from record 17 to 32 and so on. Sample code in report's module as given below, should get you the desired results. It would be noted that for incrementing row count variable, detail section's print event has been used instead of the format event. The latter would have led to unwanted increments in case of extra cycle of formatting caused by a calculated text box having [Pages] as part of its expression. Check against WillContinue property of detail section is found necessary so as to avoid phantom increment to row count variable at the end of a page. The suggested solution has been tested at my end on Access 2003 desktop. You might like to try it out and confirm the outcome. Imp: Please make sure that the setting [Event Procedure] appears on Event tab of properties sheet against report's open event and detail section's print event. Best wishes, A.D. Tejpal ------------ ' Code in report's module '============================== ' Declarations section Private RowCount As Long Private Const RowGrpMinor As Long = 3 Private Const RowGrpMajor As Long = 16 '--------------------------------------------- Private Sub Detail_Print(Cancel As Integer, _ PrintCount As Integer) If Me.Detail.WillContinue = False Then RowCount = RowCount + 1 End If RowCount = IIf(RowCount <= (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1), _ RowCount, 1) If RowCount Mod (RowGrpMinor + 1) = 0 _ Or RowCount = (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1) Then Me.NextRecord = False Me.PrintSection = False Else Me.NextRecord = True Me.PrintSection = True End If End Sub '--------------------------------------------- Private Sub Report_Open(Cancel As Integer) RowCount = 0 End Sub '=============================== ----- Original Message ----- From: Kaup, Chester To: Access Developers discussion and problem solving Sent: Wednesday, October 29, 2008 21:32 Subject: [AccessD] Blank Lines in report I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Thu Oct 30 16:51:12 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Thu, 30 Oct 2008 17:51:12 -0400 Subject: [AccessD] Type mismatch in Array Message-ID: <084201c93ad9$a167f9f0$2f8601c7@SusanOne> It's been a while since I've used an array -- can someone give me a clue why the Set statement is returning a Type Mismatch error? How can Variant be a mismatch to anything? Susan H. Public Sub LogError(errdte As Date, comname As String, _ usernme As String, errno As Long, errdes As String, errmod As String) Dim varErrors As Variant Set varErrors = Array(errdte, comname, usernme, errno, errdes, errmod) From cfoust at infostatsystems.com Thu Oct 30 17:02:58 2008 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 30 Oct 2008 15:02:58 -0700 Subject: [AccessD] Type mismatch in Array In-Reply-To: <084201c93ad9$a167f9f0$2f8601c7@SusanOne> References: <084201c93ad9$a167f9f0$2f8601c7@SusanOne> Message-ID: I don't understand what you're doing here, Susan. What are you planning to use varErrors for? I can't recall trying to take a bunch of other datatypes and stuff them in a variant array and pass that into a variant variable. Charlotte Foust -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, October 30, 2008 2:51 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Type mismatch in Array It's been a while since I've used an array -- can someone give me a clue why the Set statement is returning a Type Mismatch error? How can Variant be a mismatch to anything? Susan H. Public Sub LogError(errdte As Date, comname As String, _ usernme As String, errno As Long, errdes As String, errmod As String) Dim varErrors As Variant Set varErrors = Array(errdte, comname, usernme, errno, errdes, errmod) -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at gmail.com Thu Oct 30 17:12:08 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Thu, 30 Oct 2008 18:12:08 -0400 Subject: [AccessD] NEVERMINDFw: Type mismatch in Array Message-ID: <085501c93adc$8e2ba190$2f8601c7@SusanOne> I'm an idiot. Susan H. > It's been a while since I've used an array -- can someone give me a clue > why the Set statement is returning a Type Mismatch error? How can Variant > be a mismatch to anything? > > Susan H. > > > Public Sub LogError(errdte As Date, comname As String, _ > usernme As String, errno As Long, errdes As String, errmod As String) > > Dim varErrors As Variant > > Set varErrors = Array(errdte, comname, usernme, errno, errdes, errmod) From ssharkins at gmail.com Thu Oct 30 17:16:58 2008 From: ssharkins at gmail.com (Susan Harkins) Date: Thu, 30 Oct 2008 18:16:58 -0400 Subject: [AccessD] Type mismatch in Array References: <084201c93ad9$a167f9f0$2f8601c7@SusanOne> Message-ID: <085a01c93add$453674f0$2f8601c7@SusanOne> I was using Set -- just a really stupid mistake Charlotte. Susan H. >I don't understand what you're doing here, Susan. What are you planning > to use varErrors for? I can't recall trying to take a bunch of other > datatypes and stuff them in a variant array and pass that into a variant > variable. > > Charlotte Foust > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Thursday, October 30, 2008 2:51 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Type mismatch in Array > > It's been a while since I've used an array -- can someone give me a clue > why the Set statement is returning a Type Mismatch error? How can > Variant be a mismatch to anything? > > Susan H. > > > Public Sub LogError(errdte As Date, comname As String, _ usernme As > String, errno As Long, errdes As String, errmod As String) > > Dim varErrors As Variant > > Set varErrors = Array(errdte, comname, usernme, errno, errdes, errmod) > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Oct 30 17:55:46 2008 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 31 Oct 2008 08:55:46 +1000 Subject: [AccessD] Transfer info from subform to parent form In-Reply-To: References: , Message-ID: <490AC812.10754.31AD3B@stuart.lexacorp.com.pg> Total CharQty will be updated as soon as the record is saved. If you want it updated when you enter a value in CharQty, you will have to put an explicit "Docmd acCmdSaveRecord" in CharQty's After_Update event procedure. Is your subform a true subform (ie embedded in your form) or is it actually a completely different form which you open and then close? One way to transfer the information would be to put the following in the On_CLose event of your "subform'. Forms!frmPAInput.Form.Observations = TotalCharQty -- Stuart On 30 Oct 2008 at 10:55, Eget, John wrote: > Thank you for the response. > > I already have set the value of TotalCharQty to > "=Sum(CharQty)". But > I must either enter a new record or click on a refresh command button to > update. I was looking for the ability to update the TotalCharQty after > the value of CharQty is entered or updated. > > Unfortunately the subform is closed after data entry so the transfer of > information to the main form must occur when either the subform closes > out or while the subform is still open. > > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, October 30, 2008 12:11 AM > Subject: Re: [AccessD] Transfer info from subform to parent form > > > > You don't need the Refresh button. Set the value of TotalCharQty to > > "=Sum(CharQty)". That way, the total will keep itself updated. > > > > If you want to have Observations automatically filled in, but also > want to > > ability to enter it > > manually, > > one way is to fill in the value when you enter the field, you can then > > > accept the entry or enter > > something else. > > To do this, use an On Enter event procedure like this: > > > > Private Sub Observations_Enter() > > If IsNull(Observations) or Observations = "" Then 'only update if it's > > > empty > > Observations = subfrmCharPA.Form.TotalCharQty > > End if > > End Sub > > > > > > > > On 29 Oct 2008 at 23:49, John Eget wrote: > > > >> Hi > >> > >> On the form named frmPAInput, I click on a command button to open a > >> subform named subfrmCharPA > >> > >> After entering several records that contain values on the subform > >> named subfrmCharPA, I display a total value by depressing a command > >> button labeled Refresh Total. That enables the values of CharQty > that > >> have been entered on the subform to be totalled and displayed in a > >> text box named TotalCharQty on the subform > >> > >> I then can manually enter that value on the form frmPAInput, in a > field > >> named Observations. > >> > >> Is it possible to have the value be automatically entered from the > >> subform to the main form? And also if there were no subform entries, > >> would I still be able to enter an observation value manually? > >> > >> I have tried the wizard to generate the code but have been unable to > get > >> this correct. > >> > >> Thanks > >> > >> John > >> -- > >> AccessD mailing list > >> AccessD at databaseadvisors.com > >> http://databaseadvisors.com/mailman/listinfo/accessd > >> 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 airtelmail.in Fri Oct 31 00:04:43 2008 From: adtp at airtelmail.in (A.D.Tejpal) Date: Fri, 31 Oct 2008 10:34:43 +0530 Subject: [AccessD] Blank Lines in report References: <0B2BF8524B73A248A2F1B81BA751ED3C107540A0@houex1.kindermorgan.com><010401c93ac3$0642bac0$845ea27a@personald6374f> <0B2BF8524B73A248A2F1B81BA751ED3C107542A3@houex1.kindermorgan.com> Message-ID: <000f01c93b16$8d3b41c0$c185a37a@personald6374f> Kaup, If you wish to revert to normal printing (no blank rows) subsequent to insertion of blank row after 16th record, revised code in report's module, as given below, should get you the desired results. You might like to try it out and confirm the outcome. Best wishes, A.D. Tejpal ------------ ' Code in report's module '=============================== ' Declarations section Private RowCount As Long Private Const RowGrpMinor As Long = 3 Private Const RowGrpMajor As Long = 16 '----------------------------------------------- Private Sub Detail_Print(Cancel As Integer, _ PrintCount As Integer) ' Perform line increment only if the record is ' actually going to be printed on this very page If Me.Detail.WillContinue = False Then RowCount = RowCount + 1 End If ' Discontinue insertion of blank rows if ' record RowGrpMajor has been crossed If RowCount > (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1) Then Me.NextRecord = True Me.PrintSection = True Exit Sub End If If RowCount Mod (RowGrpMinor + 1) = 0 _ Or RowCount = (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1) Then Me.NextRecord = False Me.PrintSection = False Else Me.NextRecord = True Me.PrintSection = True End If End Sub '----------------------------------------------- Private Sub Report_Open(Cancel As Integer) RowCount = 0 End Sub '=============================== ----- Original Message ----- From: Kaup, Chester To: Access Developers discussion and problem solving Sent: Friday, October 31, 2008 01:01 Subject: Re: [AccessD] Blank Lines in report Thanks for the code however I guess I did not explain the line breaks as well as I could have. This part is correct. Apparently, you wish to insert a blank line after every three records up to 15th record and then another blank line after the sixteenth record. Here is the change. Thereafter there are to be no more blank lines. Thanks for your assistance. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of A.D.Tejpal Sent: Thursday, October 30, 2008 2:08 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Blank Lines in report Kaup, Apparently, you wish to insert a blank line after every three records upto 15th record and then another blank line after the sixteenth record. Thereafter, similar cycle to be repeated from record 17 to 32 and so on. Sample code in report's module as given below, should get you the desired results. It would be noted that for incrementing row count variable, detail section's print event has been used instead of the format event. The latter would have led to unwanted increments in case of extra cycle of formatting caused by a calculated text box having [Pages] as part of its expression. Check against WillContinue property of detail section is found necessary so as to avoid phantom increment to row count variable at the end of a page. The suggested solution has been tested at my end on Access 2003 desktop. You might like to try it out and confirm the outcome. Imp: Please make sure that the setting [Event Procedure] appears on Event tab of properties sheet against report's open event and detail section's print event. Best wishes, A.D. Tejpal ------------ ' Code in report's module '============================== ' Declarations section Private RowCount As Long Private Const RowGrpMinor As Long = 3 Private Const RowGrpMajor As Long = 16 '--------------------------------------------- Private Sub Detail_Print(Cancel As Integer, _ PrintCount As Integer) If Me.Detail.WillContinue = False Then RowCount = RowCount + 1 End If RowCount = IIf(RowCount <= (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1), _ RowCount, 1) If RowCount Mod (RowGrpMinor + 1) = 0 _ Or RowCount = (RowGrpMajor + _ (RowCount \ (RowGrpMinor + 1)) + 1) Then Me.NextRecord = False Me.PrintSection = False Else Me.NextRecord = True Me.PrintSection = True End If End Sub '--------------------------------------------- Private Sub Report_Open(Cancel As Integer) RowCount = 0 End Sub '=============================== ----- Original Message ----- From: Kaup, Chester To: Access Developers discussion and problem solving Sent: Wednesday, October 29, 2008 21:32 Subject: [AccessD] Blank Lines in report I have some data in a table I need to display in a report. The problem is I need a blank line in the report after the 3rd, 6th, 9th, 12th, 15th and 16th record. I found some code in MS article 208696 but that is only for every nth record. The stumbling block is the last interval. Maybe I could put some blank records in the source data? Chester Kaup From rockysmolin at bchacc.com Fri Oct 31 14:04:57 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Fri, 31 Oct 2008 12:04:57 -0700 Subject: [AccessD] Print one envelope from Access Message-ID: Dear List I have a client who wants to print one envelope from access. Two ways I can think of are automating Word from Access and using the Word envelope printing feature and writing a little custom report to print the name and address sideways on the printer. For solution #2 I would think I'd need the printer on hand to play with until I got it right. Any easier solutions? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com From markamatte at hotmail.com Fri Oct 31 14:14:18 2008 From: markamatte at hotmail.com (Mark A Matte) Date: Fri, 31 Oct 2008 19:14:18 +0000 Subject: [AccessD] Print one envelope from Access In-Reply-To: References: Message-ID: Rocky, Simplest way I have used is to create a report...goto page setup...and pick the envelope size you want. Hope it helps... Mark > From: rockysmolin at bchacc.com > To: accessd at databaseadvisors.com > Date: Fri, 31 Oct 2008 12:04:57 -0700 > Subject: [AccessD] Print one envelope from Access > > Dear List > > I have a client who wants to print one envelope from access. Two ways I can > think of are automating Word from Access and using the Word envelope > printing feature and writing a little custom report to print the name and > address sideways on the printer. For solution #2 I would think I'd need the > printer on hand to play with until I got it right. > > Any easier solutions? > > MTIA > > > > > Rocky Smolin > > Beach Access Software > > 858-259-4334 > > www.e-z-mrp.com > > www.bchacc.com > > > > > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com _________________________________________________________________ Want to read Hotmail messages in Outlook? The Wordsmiths show you how. http://windowslive.com/connect/post/wedowindowslive.spaces.live.com-Blog-cns!20EE04FBC541789!167.entry?ocid=TXT_TAGLM_WL_hotmail_092008 From dwaters at usinternet.com Fri Oct 31 14:16:59 2008 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 31 Oct 2008 14:16:59 -0500 Subject: [AccessD] Print one envelope from Access In-Reply-To: References: Message-ID: <9F258D31B5104B798E06280068431214@danwaters> I've gotten a printer driver for a label printer and worked out an Access report from that. Worked fine. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Friday, October 31, 2008 2:05 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Print one envelope from Access Dear List I have a client who wants to print one envelope from access. Two ways I can think of are automating Word from Access and using the Word envelope printing feature and writing a little custom report to print the name and address sideways on the printer. For solution #2 I would think I'd need the printer on hand to play with until I got it right. Any easier solutions? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at verizon.net Fri Oct 31 15:12:55 2008 From: jimdettman at verizon.net (Jim Dettman) Date: Fri, 31 Oct 2008 16:12:55 -0400 Subject: [AccessD] Print one envelope from Access In-Reply-To: References: Message-ID: <4272E9BF65314BBBADA728C2D3FCEBDF@XPS> I just did a report based on a query with parameters for the name, address, etc fields. When I open the report, I get prompted for each piece of info, and then the envelope prints. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Friday, October 31, 2008 3:05 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Print one envelope from Access Dear List I have a client who wants to print one envelope from access. Two ways I can think of are automating Word from Access and using the Word envelope printing feature and writing a little custom report to print the name and address sideways on the printer. For solution #2 I would think I'd need the printer on hand to play with until I got it right. Any easier solutions? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rockysmolin at bchacc.com Fri Oct 31 15:22:45 2008 From: rockysmolin at bchacc.com (Rocky Smolin at Beach Access Software) Date: Fri, 31 Oct 2008 13:22:45 -0700 Subject: [AccessD] Print one envelope from Access In-Reply-To: <4272E9BF65314BBBADA728C2D3FCEBDF@XPS> References: <4272E9BF65314BBBADA728C2D3FCEBDF@XPS> Message-ID: <954E7BE94CBC4D6D9A95B2D36D31DD05@HAL9005> Consensus seems to be for an Access report. That's easy. Thanks to all. Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Friday, October 31, 2008 1:13 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Print one envelope from Access I just did a report based on a query with parameters for the name, address, etc fields. When I open the report, I get prompted for each piece of info, and then the envelope prints. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin at Beach Access Software Sent: Friday, October 31, 2008 3:05 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Print one envelope from Access Dear List I have a client who wants to print one envelope from access. Two ways I can think of are automating Word from Access and using the Word envelope printing feature and writing a little custom report to print the name and address sideways on the printer. For solution #2 I would think I'd need the printer on hand to play with until I got it right. Any easier solutions? MTIA Rocky Smolin Beach Access Software 858-259-4334 www.e-z-mrp.com www.bchacc.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com