From adtp at touchtelindia.net Thu Jul 1 00:23:05 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 1 Jul 2004 10:53:05 +0530 Subject: [AccessD] text box array References: <009f01c45e3d$20c45410$0501a8c0@colbyws> <2009.24.187.38.171.1088558239.squirrel@heck.xuppa.com> Message-ID: <01a601c45f2b$9c263a80$eb1865cb@winxp> Oleg, The code given below should create an array of four text boxes named Txt_1 to Txt_4 on form named F_TestNewControlsArray. Regards, A.D.Tejpal --------------- =============================== Sub CreateNewControlsArray() Dim intLeft As Integer, intTop As Integer Dim Fnm As String, ctl(4) As Control, Cnt As Integer Fnm = "F_TestNewControlsArray" DoCmd.OpenForm Fnm, acDesign intLeft = 100 For Cnt = 1 To 4 If Cnt > 1 Then intTop = ctl(Cnt - 1).Top + ctl(Cnt - 1).Height + 100 Else intTop = 100 End If ' Cnt > 1 Set ctl(Cnt) = CreateControl(Fnm, acTextBox, , "", "", _ intLeft, intTop) ctl(Cnt).Name = "Txt_" & Cnt Next ' Cnt DoCmd.Close acForm, Fnm, acSaveYes DoCmd.OpenForm Fnm, acNormal DoCmd.Maximize Forms(Fnm).SetFocus For Cnt = 1 To 4 Set ctl(Cnt) = Nothing Next ' Cnt End Sub =============================== ----- Original Message ----- From: Oleg_123 at xuppa.com To: accessd at databaseadvisors.com Sent: Wednesday, June 30, 2004 06:47 Subject: [AccessD] text box array Hey I have to create text box array, and i don't qite remember how to go about it right now i am just trying to create textbox via code, and can't find anthing on it... Private Sub Command6_Click() Dim x As Control Dim y As TextBox Set y = New TextBox y.Width = 1 y.Height = 0.5 y.Left = 1 y.Top = 0.6 y.Visible = True End Sub From stuart at lexacorp.com.pg Thu Jul 1 00:30:30 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 15:30:30 +1000 Subject: [AccessD] SQL ANDs In-Reply-To: <012f01c45f23$d87c37d0$0100000a@mitmaster> Message-ID: <40E42E16.31870.6E02A8A@localhost> On 1 Jul 2004 at 14:28, Martin Caro wrote: > The first AND > will always have data (ie the date range and the TargetPestPlantID) but if > one (or more) of the remaining components are left vacant I do not want the > whole construct not to work. > > SELECT....................etc > FROM dbo_ViewPWLocations > > WHERE (((dbo_ViewPWLocations.ActivationDate) Between > [Forms]![frmReports]![RptStartDate] And [Forms]![frmReports]![rptEndDate]) > AND > ((dbo_ViewPWLocations.TargetPestPlantID)=[Forms]![frmReports]![TempPestID]) > AND ((dbo_ViewPWLocations.PremiseTypeID)=[Forms]![frmReports]![rptPremise]) Try AND iif(isnull([Forms]![frmReports]![rptPremise]),True,((dbo_ViewPWLocations.Premise TypeID)=[Forms]![frmReports]![rptPremise]) etc That way, if PremisesType is selected, you will only get one type, if none is selected, you will get all types. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 03:19:36 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 10:19:36 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <26619420.1088669976408.JavaMail.www@wwinf3005> To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From R.Griffiths at bury.gov.uk Thu Jul 1 03:37:12 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 1 Jul 2004 09:37:12 +0100 Subject: [AccessD] Help with subform/query Message-ID: Paul Try using the txtSearch_onchange event to place this code (Me.frmFindPersonnel_Sub.Requery). Richard -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: 01 July 2004 09:20 To: accessd Subject: [AccessD] Help with subform/query To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ 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 Jul 1 03:42:38 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 18:42:38 +1000 Subject: [AccessD] Help with subform/query In-Reply-To: <26619420.1088669976408.JavaMail.www@wwinf3005> Message-ID: <40E45B1E.19557.7901360@localhost> On 1 Jul 2004 at 10:19, paul.hartland at fsmail.net wrote: > To all, I have a form which contains just a single text box and a > subform (Continuous) which contains personnel details. > The subform has the following query: .... on the text box of the main > form (keypress event) I have: >Private Sub txtSearch_KeyPress(KeyAscii > As Integer) ' **** Filter personnel data based on criteria data **** You are updating your query before the textbox value has changed. The sequence of events is KeyDown>>Keypress>>Change>>Keyup So you selection won't appear Move the select to either the Change or Keyup events. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 03:42:56 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 10:42:56 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <6282478.1088671376442.JavaMail.www@wwinf3005> magic send button done the trick........I needed to add .[Text] to [Forms]![frmFindPersonnel]![txtSearch] Thanks anyway sir. Paul Message date : Jul 01 2004, 09:39 AM >From : "Griffiths, Richard" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Help with subform/query Paul Try using the txtSearch_onchange event to place this code (Me.frmFindPersonnel_Sub.Requery). Richard -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: 01 July 2004 09:20 To: accessd Subject: [AccessD] Help with subform/query To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Thu Jul 1 03:56:56 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 18:56:56 +1000 Subject: [AccessD] Help with subform/query In-Reply-To: <6282478.1088671376442.JavaMail.www@wwinf3005> Message-ID: <40E45E78.21326.79D2C19@localhost> On 1 Jul 2004 at 10:42, paul.hartland at fsmail.net wrote: > magic send button done the trick........I needed to add .[Text] to > [Forms]![frmFindPersonnel]![txtSearch] > > Thanks anyway sir. > Paul > It still won't give you what you want unless you move it to the Change or Keyup. It will always disregard the last character you are entering in txtSearch. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 04:02:16 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 11:02:16 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <21679566.1088672536064.JavaMail.www@wwinf3005> Yes, sorry forgot to mention I had moved to the change event. Thanks again Paul Message date : Jul 01 2004, 10:00 AM >From : "Stuart McLachlan" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: RE: [AccessD] Help with subform/query On 1 Jul 2004 at 10:42, paul.hartland at fsmail.net wrote: > magic send button done the trick........I needed to add .[Text] to > [Forms]![frmFindPersonnel]![txtSearch] > > Thanks anyway sir. > Paul > It still won't give you what you want unless you move it to the Change or Keyup. It will always disregard the last character you are entering in txtSearch. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bheid at appdevgrp.com Thu Jul 1 06:08:22 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Thu, 1 Jul 2004 07:08:22 -0400 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA308E3920@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> Thanks for the reply. I deleted the indexes because I thought that they might be slowing it down with so many records being updated. There are usually between 5000 and 50000 payroll records. But even on the other larger databases, it did not take very long. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, June 30, 2004 4:57 PM To: 'Access Developers discussion and problem solving' Subject: RE: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE Plus, I neglected to mention that "MyTempQuery" is the name of an already existing query in the database. Lambert > -----Original Message----- > From: Heenan, Lambert [SMTP:Lambert.Heenan at aig.com] > Sent: Wednesday, June 30, 2004 4:44 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: Updated subject: Query failing to execute WAS: RE: > [AccessD] Combobox question UPDATE > > My 2 cents worth. > > 1/ Removing the indexes is a sure fire way to slow things down. 2/ If > this is running on a JET database then executing the SQL string > directly does not give the JET engine a chance to optimize the query. > Better to plug the SQL into a querydef and the run the query, as you > discovered. How to do that in code?... > > Dim Qd as QueryDef > Dim sSQL as String > > sSQL = "UPDATE Contract INNER JOIN [Payroll Line Items] ON > Contract.[Contract ID] = [Payroll Line Items].Contract ID] SET > [Payroll Line Items].PolicyID = [EnforceWCID] WHERE [Payroll Line > Items].CostType='WC' AND > Contract.EnforceWCID<>0;" > > Set Qd = CurrentDb.QueryDefs("MyTempQuery") > Qd.SQL = sSQL > Set Qd = Nothing > Docmd.OpenQuery "MyTempQuery" > > 3/ How many records were involved with the other databases? > > Lambert > > > -----Original Message----- > > From: Bobby Heid [SMTP:bheid at appdevgrp.com] > > Sent: Wednesday, June 30, 2004 3:31 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: Updated subject: Query failing to execute WAS: RE: > > [AccessD] Combobox question UPDATE > > > > I let it run during lunch and it finally did get through the query. > > It updated about 48000 records. > > > > I still do not know why it is taking so long. I even took off > > almost > all > > of > > the indexes of the payroll table and it still took a very long time. > > > > Any ideas? > > > > Thanks, > > Bobby > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby > > Heid > > Sent: Wednesday, June 30, 2004 11:41 AM > > To: 'Access Developers discussion and problem solving' > > Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] > > Combobox question > > > > > > Sorry about that. I forgot to change the subject. > > > > Bobby > > > > > > -----Original Message----- > > From: Bobby Heid [mailto:bheid at appdevgrp.com] > > Sent: Wednesday, June 30, 2004 11:40 AM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] Combo box question > > > > > > Hi all, > > > > I have a query that is run during a conversion of a database that > appears > > to > > be hanging on this one particular database. > > > > Here's the query: > > UPDATE Contract > > INNER JOIN [Payroll Line Items] > > ON Contract.[Contract ID] = [Payroll Line Items].[Contract ID] > > SET [Payroll Line Items].PolicyID = [EnforceWCID] > > WHERE [Payroll Line Items].CostType='WC' > > AND Contract.EnforceWCID<>0; > > > > This query is placed into a string and executed with: db.execute > > strSQL,dbfailonerror > > > > There are ~192,000 payroll records and ~3500 contract records. > > > > If I copy the SQL into the query designer and run it, it only takes > about > > 5 > > seconds or so to execute. I have let the version in the code run > > for > over > > 1/2 hour and have to end up killing access. > > > > Anyone have any ideas as to what may be happening? I am running AXP > sp2. > > The tables are linked. This code has ran fine on over 100 other > > conversions. > > > > Thanks, > > Bobby > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 1 06:18:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 1 Jul 2004 13:18:25 +0200 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> References: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> Message-ID: <19416942522.20040701131825@cactus.dk> Hi Bobby Dropping/recreating indices is mainly used when _appending_ large amount of data to large tables. Perhaps that is what you had in mind? /gustav > Thanks for the reply. > I deleted the indexes because I thought that they might be slowing it down > with so many records being updated. > There are usually between 5000 and 50000 payroll records. But even on the > other larger databases, it did not take very long. > Thanks, > Bobby >> -----Original Message----- >> From: Heenan, Lambert [SMTP:Lambert.Heenan at aig.com] >> Sent: Wednesday, June 30, 2004 4:44 PM >> To: 'Access Developers discussion and problem solving' >> Subject: RE: Updated subject: Query failing to execute WAS: RE: >> [AccessD] Combobox question UPDATE >> >> My 2 cents worth. >> >> 1/ Removing the indexes is a sure fire way to slow things down. From rl_stewart at highstream.net Thu Jul 1 06:42:42 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 06:42:42 -0500 Subject: [AccessD] RE: design/development question on representing mtm relationships In-Reply-To: <20040630214603.XMIH1701.imf20aec.mail.bellsouth.net@SUSANO NE> References: <5.1.0.14.2.20040630131140.017cb8e0@pop3.highstream.net> Message-ID: <5.1.0.14.2.20040701063426.01697730@pop3.highstream.net> Susan, Ok, I see what you mean. And here is how I handle such things. There are two methods. All of the "lookup" type data, in your example, the publisher, would be a drop down list in a combobox. So, you would either use the not in list event to be able to add it, or a button to the right of the combobox labeled "Add" that would open a data entry form to do the add. I have done it both ways. And, there are pros and cons for doing it both ways. The biggest con for the not in list event is that it makes it too easy for people to enter things with an incorrect spelling. Oh, and a third way is to not make any of your forms modal. That way your users can navigate through your menu system and add records into the lookup tables without a hassle. I use a form that allows them to select the lookup table they want to edit rather than individual menu items for each lookup table maintenance form. And, in all of my currently developed systems, this last method is the one I use. But, in the past, I have used all three. Robert At 05:46 PM 30/06/2004 -0400, Susan Harkins wrote: >If you are going to maintain the relationship, you ALWAYS enter the one side >before the many side. I do not understand what you mean by unnatural when >you said that entering the one before the many felt unnatural. Can I have >line items for an order without the order itself? Can I have a home address >for a person before I have the person? > >==========Back to the simple books database -- you're entering book >information -- certainly, entering the title, ISBN, etc. is something you >want to enter first -- but then Ack! The publisher for the book you're >entering isn't in the publishers table yet -- that sort of issue. It's >clearly a thinking order -- meaning, "books" are the item you're tracking, >not publishers -- publisher is just supportive information. For instance, on >a paper form, publisher might be way down the list -- certainly the book >title would be the first line -- see what I mean? So yes, often to enter the >one value -- and often there are many one values supporting a many record -- >seems unnatural. > >Susan H. From stuart at lexacorp.com.pg Thu Jul 1 07:09:54 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 22:09:54 +1000 Subject: [AccessD] RE: design/development question on representing mtm relationships In-Reply-To: <5.1.0.14.2.20040701063426.01697730@pop3.highstream.net> References: <20040630214603.XMIH1701.imf20aec.mail.bellsouth.net@SUSANO NE> Message-ID: <40E48BB2.25038.84DD5BE@localhost> On 1 Jul 2004 at 6:42, Robert L. Stewart wrote: > Susan, > > Ok, I see what you mean. And here is how I handle such things. There are > two methods. All of the "lookup" type data, in your example, the > publisher, would be a drop down list in a combobox. So, you would either > use the not in list event to be able to add it, or a button to the right of > the combobox labeled "Add" that would open a data entry form to do the > add. I have done it both ways. And, there are pros and cons for doing it > both ways. The biggest con for the not in list event is that it makes it > too easy for people to enter things with an incorrect spelling. I never use "autoadd" in the NotInList. The NotInList event triggers a msgbox to confirm whether they want to add a new record If they confirm, I open a modal Data Entry form with the entered data already filled in for the user to complete/confirm. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From ssharkins at bellsouth.net Thu Jul 1 07:13:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 1 Jul 2004 08:13:42 -0400 Subject: [AccessD] RE: design/development question on representing mtmrelationships In-Reply-To: <40E48BB2.25038.84DD5BE@localhost> Message-ID: <20040701121338.HKQB1701.imf20aec.mail.bellsouth.net@SUSANONE> I never use "autoadd" in the NotInList. The NotInList event triggers a msgbox to confirm whether they want to add a new record If they confirm, I open a modal Data Entry form with the entered data already filled in for the user to complete/confirm. =============This is a good idea and also solves the problem of required values, etc. that might also need to be entered. Susan H. From bheid at appdevgrp.com Thu Jul 1 07:39:45 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Thu, 1 Jul 2004 08:39:45 -0400 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD]Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA308E3A6B@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB657@ADGSERVER> Hi Gustav, It is. I was shooting in the dark. LOL. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 01, 2004 7:18 AM To: Access Developers discussion and problem solving Subject: Re: Updated subject: Query failing to execute WAS: RE: [AccessD]Combobox question UPDATE Hi Bobby Dropping/recreating indices is mainly used when _appending_ large amount of data to large tables. Perhaps that is what you had in mind? /gustav From artful at rogers.com Thu Jul 1 08:34:20 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 1 Jul 2004 09:34:20 -0400 Subject: [AccessD] SQL ANDs In-Reply-To: <00d601c45f10$220ed790$0100000a@mitmaster> Message-ID: <060f01c45f70$1d07e8d0$6601a8c0@rock> First of all, put some code in the open event that declares a few variables and assigns the form's controls' values to them, so that your query is testable and printable. Something like this: Dim x, y, z x = Forms!frm!txtBox1 y = Forms!frm!txtBox2 Etc. Then plug these vars into your query, so it looks something like: SELECT * FROM SomeTables WHERE (fld1 = x OR x IS NULL) AND (fld2 = y OR y IS NULL) AND ... etc Note that I'm removing the IsNull() tests out of the code and replacing them with SQL "IS NULL" tests. Now you can test the query on its own without worrying about the form at all. I think that the syntax above will give you what you want, but I wrote it in the Outlook compiler... :) HTH, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Wednesday, June 30, 2004 10:07 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SQL ANDs Thanks for the suggestion Stephen but I tried inserting that syntax as criteria for each field but with no luck, it looked promising. Even when I tried just IsNull(Forms!frm!txtBox1) I got zero records when txtBox1 was empty. Any other thoughts? Martin ----- Original Message ----- From: "Stephen Bond" To: "Access Developers discussion and problem solving" Sent: Thursday, July 01, 2004 11:27 AM Subject: RE: [AccessD] SQL ANDs > How about ... > > WHERE > (fld1 = Forms!frm!txtBox1 OR IsNull(Forms!frm!txtBox1)) > AND > (fld2 = Forms!frm!txtBox2 OR IsNull(Forms!frm!txtBox2)) > AND ... etc > > Stephen Bond > > > -----Original Message----- > > From: Martin Caro [mailto:mcaro at bigpond.net.au] > > Sent: Thursday, 1 July 2004 10:30 a.m. > > To: Access Developers discussion and problem solving > > Subject: [AccessD] SQL ANDs > > > > > > Hi Folks > > > > I have a report query that has a WHERE followered by one or a number > > of ANDs. The components of the ANDs reference text boxes on a form > > each of which may or may not be populated. How can I get it to > > negate one or a number of the ANDs if the target box is Null? At the > > moment if any one of the AND components is Null no records are > > returned. I've played around with IIF to test each box first but no > > luck so far.... > > > > Thanks > > > > Martin > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Thu Jul 1 09:29:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 16:29:21 +0200 (CEST) Subject: [AccessD] MSDE is now SQL Server Express Edition Message-ID: <24481732.1088692161511.JavaMail.www@wwinf3003> SQL Server 2005 Express Edition can be found at http://www.microsoft.com/sql/express/ Paul Hartland Message date : Jul 01 2004, 01:58 AM >From : "MartyConnelly" To : "Access Developers discussion and problem solving" Copy to : Subject : [AccessD] MSDE is now SQL Server Express Edition http://www.itworldcanada.com/Pages/Docbase/ViewArticle.aspx?ID=idgml-d69d0519-f389-41c0-a316-a8b92ed93714&Portal=Integrating%20IT If anyone knows where to download the beta's for Visual Basic 2005 Express Edition or Visual C# 2005 Express Edition due out next week I wouldn't mind knowing where to get them. -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Thu Jul 1 09:45:25 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 07:45:25 -0700 Subject: [AccessD] A2K vs AXP on record deletes References: Message-ID: <009001c45f7a$0ba26f20$6601a8c0@HAL9002> Mark: No memo fields. :( Any other ideas, anyone? TIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, June 30, 2004 12:27 PM Subject: RE: [AccessD] A2K vs AXP on record deletes > Rocky, > > You might check to see if this info pertains to your situation: > http://www.kbalertz.com/Feedback_302525.aspx > > Mark > > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, June 30, 2004 2:52 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] A2K vs AXP on record deletes > > > Dear List: > > Is there an incompatibility between A2K and AXP on record deletes? > > I developed my app in A2K and the following line of code: > > DoCmd.RunCommand acCmdDeleteRecord > > works at the client's site on A2K machines, but blows on AXP machines with > an error "3709: The search key was not found in any record" > > MTIA, > > Rocky Smolin > Beach Access Software > http://www.e-z-mrp.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jul 1 09:48:15 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 10:48:15 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: <24481732.1088692161511.JavaMail.www@wwinf3003> References: <24481732.1088692161511.JavaMail.www@wwinf3003> Message-ID: <64330.68.161.26.217.1088693295.squirrel@heck.xuppa.com> Is it possible to create control (textbox) in a form i am already in at runtime ? Everything i find on the web seems to be about creating new forms and new controls in them. ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From mcaro at bigpond.net.au Thu Jul 1 08:46:24 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Thu, 1 Jul 2004 23:46:24 +1000 Subject: [AccessD] SQL ANDs References: <060f01c45f70$1d07e8d0$6601a8c0@rock> Message-ID: <005201c45f71$cd276230$0100000a@mitmaster> Thanks Arthur.... I'll have a play and let you known how it goes. I'm currently looking at building the form's Filter on the fly depending on the txtbBoxes with data (a bit like Filter by Form) but without using that functionality.. will look at several options. Martin ----- Original Message ----- From: "Arthur Fuller" To: "'Access Developers discussion and problem solving'" Sent: Thursday, July 01, 2004 11:34 PM Subject: RE: [AccessD] SQL ANDs > First of all, put some code in the open event that declares a few > variables and assigns the form's controls' values to them, so that your > query is testable and printable. Something like this: > > Dim x, y, z > x = Forms!frm!txtBox1 > y = Forms!frm!txtBox2 > Etc. > > Then plug these vars into your query, so it looks something like: > > SELECT * FROM SomeTables > WHERE > (fld1 = x OR x IS NULL) > AND > (fld2 = y OR y IS NULL) > AND ... etc > > Note that I'm removing the IsNull() tests out of the code and replacing > them with SQL "IS NULL" tests. > > Now you can test the query on its own without worrying about the form at > all. I think that the syntax above will give you what you want, but I > wrote it in the Outlook compiler... :) > > HTH, > Arthur > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro > Sent: Wednesday, June 30, 2004 10:07 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] SQL ANDs > > > Thanks for the suggestion Stephen but I tried inserting that syntax as > criteria for each field but with no luck, it looked promising. Even > when I tried just IsNull(Forms!frm!txtBox1) I got zero records when > txtBox1 was empty. > > Any other thoughts? > > Martin > > ----- Original Message ----- > From: "Stephen Bond" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, July 01, 2004 11:27 AM > Subject: RE: [AccessD] SQL ANDs > > > > How about ... > > > > WHERE > > (fld1 = Forms!frm!txtBox1 OR IsNull(Forms!frm!txtBox1)) > > AND > > (fld2 = Forms!frm!txtBox2 OR IsNull(Forms!frm!txtBox2)) > > AND ... etc > > > > Stephen Bond > > > > > -----Original Message----- > > > From: Martin Caro [mailto:mcaro at bigpond.net.au] > > > Sent: Thursday, 1 July 2004 10:30 a.m. > > > To: Access Developers discussion and problem solving > > > Subject: [AccessD] SQL ANDs > > > > > > > > > Hi Folks > > > > > > I have a report query that has a WHERE followered by one or a number > > > > of ANDs. The components of the ANDs reference text boxes on a form > > > each of which may or may not be populated. How can I get it to > > > negate one or a number of the ANDs if the target box is Null? At the > > > > moment if any one of the AND components is Null no records are > > > returned. I've played around with IIF to test each box first but no > > > luck so far.... > > > > > > Thanks > > > > > > Martin > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 1 10:19:13 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 08:19:13 -0700 Subject: [AccessD] Create Control in Existing Form Message-ID: You can create a new control in design view. Why would you want to create one in an active form anyhow? It would make more sense to simply make an existing textbox visible. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Thursday, July 01, 2004 6:48 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Create Control in Existing Form Is it possible to create control (textbox) in a form i am already in at runtime ? Everything i find on the web seems to be about creating new forms and new controls in them. ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 1 11:57:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 01 Jul 2004 09:57:14 -0700 Subject: [AccessD] MSDE is now SQL Server Express Edition References: Message-ID: <40E4426A.8040204@shaw.ca> Thks for the url's to get me started Main MSDN page for Visual Studio 2005 Developer http://lab.msdn.microsoft.com/vs2005/Default.aspx Main .net framework page http://msdn.microsoft.com/netframework but 2 downloads are here for Net Framework version 2.0 .NET Framework 2.0 SDK Beta 1 x86 setup.exe .NET Framework Version 2.0 Redistributable Package Beta 1 (x86) dotnetfx.exe http://www.microsoft.com/downloads/details.aspx?FamilyID=916ec067-8bdc-4737-9430-6cec9667655c&DisplayLang=en You must install the .NET Framework Redistributable Package dotnetfx.exe version 2.0 Beta 1 prior to running setup.exe There is also this freebie of vb.net components The Visual Basic .NET Resource Kit http://msdn.microsoft.com/vbasic/vbrkit/default.aspx JMoss wrote: >Here is the link to the base site, but what I can't find is the link to >download .net framework beta 2 which is required by all of the express >edition products. If anyone has a link to that, please enlighten me. > >http://lab.msdn.microsoft.com/vs2005/Default.aspx?did=1&t=4dBvzSBXOD8yXm8YdE >RN57qfMSadd7Wh3L2dyXz1zFLmUU9wzjwao!LqUCUvB19S9zlQOZ1ViA9yEyVoNxAT*vCg$$&p=4 >CUK6OY1LG688ZHBKzZKBJQgc!8AtWmEhxZUzMCDnBzxhyjZ9wlQYXsAtmcMDQrwh4oNEJNxj2TUV >dSm9Jr3ngPbT2taRnU7PjvAuEw41QYVtODGvt7EcW3PfI4HYn7!q967CpYvrksF0$ > >JM > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly >Sent: Wednesday, June 30, 2004 7:48 PM >To: Access Developers discussion and problem solving >Subject: [AccessD] MSDE is now SQL Server Express Edition > > >http://www.itworldcanada.com/Pages/Docbase/ViewArticle.aspx?ID=idgml-d69d051 >9-f389-41c0-a316-a8b92ed93714&Portal=Integrating%20IT > >If anyone knows where to download the beta's for Visual Basic 2005 >Express Edition or Visual C# 2005 Express Edition due out next week >I wouldn't mind knowing where to get them. > >-- >Marty Connelly >Victoria, B.C. >Canada > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From davide at dalyn.co.nz Thu Jul 1 12:29:03 2004 From: davide at dalyn.co.nz (David Emerson) Date: Fri, 02 Jul 2004 05:29:03 +1200 Subject: [AccessD] Limitations of ADP/SQL Message-ID: <5.2.0.9.0.20040702052645.00b3e958@mail.dalyn.co.nz> I have written an app for a company with an Access XP ADP F/E with an SQL2000 BE. The company wants to know what the limitations are with this set up (how many records/how large can the data base get) and what would be the "next step up". Does anyone have any pointer for information? Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (04) 478-7456 Mobile 027-280-9348 From accessd at shaw.ca Thu Jul 1 12:57:25 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 01 Jul 2004 10:57:25 -0700 Subject: [AccessD] Limitations of ADP/SQL In-Reply-To: <5.2.0.9.0.20040702052645.00b3e958@mail.dalyn.co.nz> Message-ID: Hi David: When considering the SQL2000, the limits are only on purchased licenses. The actual data size, extending over multiple servers, for one copy of SQL2000, is about 5 tera-bytes. The rest is limited by your skill and imagination. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Thursday, July 01, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Limitations of ADP/SQL I have written an app for a company with an Access XP ADP F/E with an SQL2000 BE. The company wants to know what the limitations are with this set up (how many records/how large can the data base get) and what would be the "next step up". Does anyone have any pointer for information? Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (04) 478-7456 Mobile 027-280-9348 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Thu Jul 1 13:16:33 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:16:33 -0500 Subject: [AccessD] Re: design/development question on representing mtm relationships In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701131424.017d8430@pop3.highstream.net> I do not use "AutoAdd" either. Did not think I even mentioned it. I always open a form because of the other constraints against lookup tables. At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 01 Jul 2004 22:09:54 +1000 >From: "Stuart McLachlan" >Subject: Re: [AccessD] RE: design/development question on representing > mtm relationships >To: Access Developers discussion and problem solving > >Message-ID: <40E48BB2.25038.84DD5BE at localhost> >Content-Type: text/plain; charset=US-ASCII > >On 1 Jul 2004 at 6:42, Robert L. Stewart wrote: > > > Susan, > > > > Ok, I see what you mean. And here is how I handle such things. There are > > two methods. All of the "lookup" type data, in your example, the > > publisher, would be a drop down list in a combobox. So, you would either > > use the not in list event to be able to add it, or a button to the > right of > > the combobox labeled "Add" that would open a data entry form to do the > > add. I have done it both ways. And, there are pros and cons for doing it > > both ways. The biggest con for the not in list event is that it makes it > > too easy for people to enter things with an incorrect spelling. > >I never use "autoadd" in the NotInList. The NotInList event triggers a >msgbox >to confirm whether they want to add a new record If they confirm, I open a >modal Data Entry form with the entered data already filled in for the user to >complete/confirm. From bchacc at san.rr.com Thu Jul 1 13:17:35 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 11:17:35 -0700 Subject: [AccessD] Outlook Object Broken References: Message-ID: <01d001c45f97$af129eb0$6601a8c0@HAL9002> V, Steve, Jim, etc.: It appears that late binding is the solution. Thanks for that. Always wondered what that late binding thing was good for. :) Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "vchas" To: "'Access Developers discussion and problem solving'" Sent: Monday, June 28, 2004 3:07 PM Subject: RE: [AccessD] Outlook Object Broken > > > Dim objOutlook As Object > Set objOutlook = CreateObject("Outlook.Application") > Set objOutlookMsg = objOutlook.CreateItem(0) > With objOutlookMsg > .To = "you at companyname.com" > .Cc = "them at companyname.com" > .Subject = "Hello World (one more time)..." > .Body = "body of message" > .HTMLBody = "HTML version of message" > .Attachments.Add ("c:\FileToSend.txt") > .Send > End With > Set objOutlookMsg = Nothing > Set objOutlook = Nothing > > HTH > > V > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky > > Smolin - Beach Access Software > > Sent: 28 June 2004 22:21 > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Outlook Object Broken > > > > > > Doris: > > > > I declare the object variables like this: > > > > Dim objOutlook As Outlook.Application > > Dim objOutlookMsg As Outlook.MailItem > > Dim objOutlookRecip As Outlook.Recipient > > Dim objOutlookAttach As Outlook.Attachment > > > > Then it blows up on the very next line: > > > > ' Create the Outlook session. > > Set objOutlook = CreateObject("Outlook.Application") > > > > So I'm not referencing the specific Outlook 9.0 library. Is it > > possible that they changed the names of the properties or methods or > > whatever you call them in the Outlook 11 library - like changing > > .Application to .App or some other humorous trick to keep us fully > > employed? > > > > TIA > > > > is > > > > ----- Original Message ----- > > From: "Mike & Doris Manning" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Monday, June 28, 2004 1:11 PM > > Subject: RE: [AccessD] Outlook Object Broken > > > > > > > We ran into a similar problem because we have many > > different operating > > > systems in our organization. We got around it by not referencing a > > > particular Outlook object model. > > > > > > Doris Manning > > > Database Administrator > > > Hargrove Inc. > > > www.hargroveinc.com > > > > > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky > > > Smolin - Beach Access Software > > > Sent: Monday, June 28, 2004 1:16 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Outlook Object Broken > > > > > > > > > Dear List: > > > > > > I provide an app to a client which uses the Outlook object to send > > > emails. In my version the reference is to the Microsoft Outlook 9.0 > > > Object > > Library. > > > They recently upgraded to A2003 and their reference is now to the > > Microsoft > > > Outlook 11.0 Object Library. > > > > > > When my app hits the line of code:Set objOutlook = > > > CreateObject("Outlook.Application") it blows up saying it > > is unable > > > to create the object. > > > > > > Is there an easy fix or workaround to this problem? > > > > > > MTIA, > > > > > > Rocky Smolin > > > Beach Access Software > > > http://www.e-z-mrp.com > > > > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From rl_stewart at highstream.net Thu Jul 1 13:19:44 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:19:44 -0500 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701131851.0182cca0@pop3.highstream.net> Rocky try: Application.RunCommand 223 You have to have a record "selected" in order to do this. Robert At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 07:45:25 -0700 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] A2K vs AXP on record deletes >To: "Access Developers discussion and problem solving" > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Mark: > >No memo fields. :( Any other ideas, anyone? > >TIA > >Rocky Smolin >Beach Access Software >http://www.e-z-mrp.com > > > >----- Original Message ----- >From: "Mitsules, Mark S. (Newport News)" >To: "'Access Developers discussion and problem solving'" > >Sent: Wednesday, June 30, 2004 12:27 PM >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > Rocky, > > > > You might check to see if this info pertains to your situation: > > http://www.kbalertz.com/Feedback_302525.aspx > > > > Mark > > > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, June 30, 2004 2:52 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > Dear List: > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > I developed my app in A2K and the following line of code: > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > works at the client's site on A2K machines, but blows on AXP machines >with > > an error "3709: The search key was not found in any record" > > > > MTIA, > > > > Rocky Smolin From rl_stewart at highstream.net Thu Jul 1 13:38:02 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:38:02 -0500 Subject: [AccessD] Re: SQL ANDs In-Reply-To: <200407010843.i618hpQ29365@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701133334.0186fd78@pop3.highstream.net> Martin, Create 2 identical queries. Suffix one with a 0 (zero) and the other with a 1. The 0 query is your base query. Then use the following code: dim qdf as dao.querydef set qdf=currentdb.querydefs("Query_0") dim strSQL as string set strsql = mid(qdf.sql,1,len(qdf.sql)-3) ' removes the ; at the end and 3 is the right number dim strWhere as string strwhere = " WHERE " if not isnull(me!textbox1) then strwhere = "YourColumn = " & me!TextBox1 & " and " end if if not isnull(me!textbox2) then strwhere = "YourColumn = " & me!TextBox2 & " and " end if if not isnull(me!textbox3) then strwhere = "YourColumn = " & me!TextBox3 & " and " end if ' remove trailing and strwhere = mid(strwhere,1,len(strwhere)-5) & ";" set qdf=currentdb.querydefs("Query_1") qdf.sql = strsql & strwhere qdf.close docmd.openreport "YourReportName" Query_1 is always going to be the source for the report. This method can be used for all reporting. Robert At 03:43 AM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 08:30:12 +1000 >From: "Martin Caro" >Subject: [AccessD] SQL ANDs >To: "Access Developers discussion and problem solving" > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> >Content-Type: text/plain; charset="iso-8859-1" > >Hi Folks > >I have a report query that has a WHERE followered by one or a number of >ANDs. The components of the ANDs reference text boxes on a form each of >which may or may not be populated. How can I get it to negate one or a >number of the ANDs if the target box is Null? At the moment if any one of >the AND components is Null no records are returned. I've played around >with IIF to test each box first but no luck so far.... > >Thanks > >Martin From rl_stewart at highstream.net Thu Jul 1 13:48:00 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:48:00 -0500 Subject: [AccessD] Re: MSDE is now SQL Server Express Edition In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701134735.017f0928@pop3.highstream.net> You can try this for the framework: http://www.microsoft.com/downloads/details.aspx?familyid=f1232c37-0fee-4aa6-aa89-b6dcefc0873b&displaylang=en At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 16:29:21 +0200 (CEST) >From: paul.hartland at fsmail.net >Subject: Re: [AccessD] MSDE is now SQL Server Express Edition >To: Access Developers discussion and problem solving > >Message-ID: <24481732.1088692161511.JavaMail.www at wwinf3003> >Content-Type: text/plain; charset=iso-8859-1 > >SQL Server 2005 Express Edition can be found at >http://www.microsoft.com/sql/express/ >Paul Hartland From bchacc at san.rr.com Thu Jul 1 13:48:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 11:48:20 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes References: <5.1.0.14.2.20040701131851.0182cca0@pop3.highstream.net> Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0@HAL9002> Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Thu Jul 1 14:06:56 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Thu, 1 Jul 2004 13:06:56 -0600 Subject: [AccessD] Re: A2K vs AXP on record deletes Message-ID: ? acCmdDeleteRecord In the command window will get you the numeric version of any constant like that. -Chris Mackin -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, July 01, 2004 12:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Thu Jul 1 14:22:44 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Thu, 1 Jul 2004 15:22:44 -0400 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: Message-ID: <000001c45fa0$c92dbb00$cc0aa845@hargrove.internal> You can also use the Object Browser to get this information. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mackin, Christopher Sent: Thursday, July 01, 2004 3:07 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Re: A2K vs AXP on record deletes ? acCmdDeleteRecord In the command window will get you the numeric version of any constant like that. -Chris Mackin -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, July 01, 2004 12:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP > > > machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Thu Jul 1 18:57:11 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 16:57:11 -0700 Subject: [AccessD] Multi-graphs on report Message-ID: We have a report with multiple subreports, each with a matching graph. If a user previews the report and tries to print anything but the full report, the graphs don't show up, or rather, the graphics don't show up, although the labels and legends do. Can anyone suggest a way to goose this report to make the full graph show up when only a specific range of pages is printed? Charlotte Foust From Oleg_123 at xuppa.com Thu Jul 1 19:09:44 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 20:09:44 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: References: Message-ID: <1964.24.187.38.171.1088726984.squirrel@heck.xuppa.com> thank you Charlotte, how can I move it ? what would be a correct way to do something like this if i want to move record txtA1 ? -- Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Visible = True End Sub > You can create a new control in design view. Why would you want to > create one in an active form anyhow? It would make more sense to simply > make an existing textbox visible. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 6:48 AM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Create Control in Existing Form > > > Is it possible to create control (textbox) in a form i am already in at > runtime ? Everything i find on the web seems to be about creating new > forms and new controls in them. > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From cfoust at infostatsystems.com Thu Jul 1 19:21:09 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 17:21:09 -0700 Subject: [AccessD] Create Control in Existing Form Message-ID: That would be the way, although you might need to set the Left property as well to get it lined up as desired. We actually do this with some forms where we only show certain controls under specific circumstances. If you're going to do this, you may have to change the size of the form as well in the same code. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Thursday, July 01, 2004 4:10 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Create Control in Existing Form thank you Charlotte, how can I move it ? what would be a correct way to do something like this if i want to move record txtA1 ? -- Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Visible = True End Sub > You can create a new control in design view. Why would you want to > create one in an active form anyhow? It would make more sense to > simply make an existing textbox visible. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 6:48 AM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Create Control in Existing Form > > > Is it possible to create control (textbox) in a form i am already in > at runtime ? Everything i find on the web seems to be about creating > new forms and new controls in them. > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jul 1 19:52:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 20:52:33 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: References: Message-ID: <2199.24.187.38.171.1088729553.squirrel@heck.xuppa.com> hmm, doesn't seem to be working, it bring it to uper left corner Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Left = 0.1667 txtA1.Visible = True End Sub > That would be the way, although you might need to set the Left property > as well to get it lined up as desired. We actually do this with some > forms where we only show certain controls under specific circumstances. > If you're going to do this, you may have to change the size of the form > as well in the same code. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 4:10 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Create Control in Existing Form > > > thank you Charlotte, how can I move it ? > what would be a correct way to do something like this if i want to move > record txtA1 ? -- > > Private Sub Command9_Click() > txtA1.Top = 0.33 > txtA1.Visible = True > > End Sub > > >> You can create a new control in design view. Why would you want to >> create one in an active form anyhow? It would make more sense to >> simply make an existing textbox visible. >> >> Charlotte Foust >> >> -----Original Message----- >> From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] >> Sent: Thursday, July 01, 2004 6:48 AM >> To: accessd at databaseadvisors.com >> Subject: Re: [AccessD] Create Control in Existing Form >> >> >> Is it possible to create control (textbox) in a form i am already in >> at runtime ? Everything i find on the web seems to be about creating >> new forms and new controls in them. >> >> >> ----------------------------------------- >> Make Money and Find Love at Finally.com >> http://www.finally.com/?link=webmail >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From stuart at lexacorp.com.pg Thu Jul 1 20:26:05 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 11:26:05 +1000 Subject: [AccessD] Create Control in Existing Form In-Reply-To: <2199.24.187.38.171.1088729553.squirrel@heck.xuppa.com> References: Message-ID: <40E5464D.11754.B26B859@lexacorp.com.pg> On 1 Jul 2004 at 20:52, Oleg_123 at xuppa.com wrote: > hmm, doesn't seem to be working, it bring it to uper left corner > > Private Sub Command9_Click() > txtA1.Top = 0.33 > txtA1.Left = 0.1667 > txtA1.Visible = True > End Sub > That's because the Top and Left properties in are in Twips if you set them in code. Multipy by 567 to convert cms to twips or by 1440 to convert form inches. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Thu Jul 1 20:42:00 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Fri, 2 Jul 2004 11:42:00 +1000 Subject: [AccessD] SQL ANDs Message-ID: <006d01c45fd5$c4c31ad0$0100000a@mitmaster> Hi Folks After much time trying to build a multilevel AND construct in the query using references to form txtBoxes, I have decided to use code to build the Form's Filter on the fly depending if a txtBox(s) in the AND series is populated. So far have had more success this way plus it will give me a filter unique to the Form selections to then build my report. Thanks all for the suggestions Martin > >Date: Thu, 1 Jul 2004 08:30:12 +1000 > >From: "Martin Caro" > >Subject: [AccessD] SQL ANDs > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Hi Folks > > > >I have a report query that has a WHERE followered by one or a number of > >ANDs. The components of the ANDs reference text boxes on a form each of > >which may or may not be populated. How can I get it to negate one or a > >number of the ANDs if the target box is Null? At the moment if any one of > >the AND components is Null no records are returned. I've played around > >with IIF to test each box first but no luck so far.... > > > >Thanks > > From accessd at shaw.ca Thu Jul 1 22:34:25 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 01 Jul 2004 20:34:25 -0700 Subject: [AccessD] SQL ANDs In-Reply-To: <006d01c45fd5$c4c31ad0$0100000a@mitmaster> Message-ID: There is something to be said for simply getting down to it and coding a solution. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Caro Sent: Thursday, July 01, 2004 6:42 PM To: Access Developers discussion and problem solving Subject: [AccessD] SQL ANDs Hi Folks After much time trying to build a multilevel AND construct in the query using references to form txtBoxes, I have decided to use code to build the Form's Filter on the fly depending if a txtBox(s) in the AND series is populated. So far have had more success this way plus it will give me a filter unique to the Form selections to then build my report. Thanks all for the suggestions Martin > >Date: Thu, 1 Jul 2004 08:30:12 +1000 > >From: "Martin Caro" > >Subject: [AccessD] SQL ANDs > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Hi Folks > > > >I have a report query that has a WHERE followered by one or a number of > >ANDs. The components of the ANDs reference text boxes on a form each of > >which may or may not be populated. How can I get it to negate one or a > >number of the ANDs if the target box is Null? At the moment if any one of > >the AND components is Null no records are returned. I've played around > >with IIF to test each box first but no luck so far.... > > > >Thanks > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:11:51 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:11:51 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From stuart at lexacorp.com.pg Fri Jul 2 00:18:32 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 15:18:32 +1000 Subject: [AccessD] Quick Syntax Question In-Reply-To: Message-ID: <40E57CC8.9690.BFB871C@lexacorp.com.pg> On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:38:12 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:38:12 +1000 Subject: [AccessD] Syntax question Message-ID: Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 13:41:54 +0800 Subject: [AccessD] Quick Syntax Question Message-ID: Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From andrew.curtis at wapl.com.au Fri Jul 2 00:43:19 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 13:43:19 +0800 Subject: [AccessD] Syntax question Message-ID: In this case use count(*) instead of specify field name. andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:38 PM To: accessd at databaseadvisors.com Subject: [AccessD] Syntax question Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:46:09 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:46:09 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:54:02 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:54:02 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, I tried using count(*) but that did not work either. I am about to give up and go home I think ... except I know I will spend all weekend trying to figure it out In this case use count(*) instead of specify field name. andrew Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Fri Jul 2 01:11:37 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 14:11:37 +0800 Subject: [AccessD] Quick Syntax Question Message-ID: This is going to sound far out, Try it without the "; " on the end andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Andrew, I tried using count(*) but that did not work either. I am about to give up and go home I think ... except I know I will spend all weekend trying to figure it out In this case use count(*) instead of specify field name. andrew Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 01:15:18 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 16:15:18 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, Nope ... but geez I wish it had worked Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This is going to sound far out, Try it without the "; " on the end andrew This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andy at minstersystems.co.uk Fri Jul 2 01:51:26 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 2 Jul 2004 07:51:26 +0100 Subject: [AccessD] Syntax question In-Reply-To: Message-ID: <001001c46000$febcf780$b274d0d5@minster33c3r25> Connie When you are storing the return from the COUNT wrap an NZ( ,0) round it. Can't be more specific as you haven't shown the full code. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: 02 July 2004 06:38 > To: accessd at databaseadvisors.com > Subject: [AccessD] Syntax question > > > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch > because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > > at 15:11, connie.kamrowski at agric.nsw.go wrote: > > > > > Hi guys, > > > > Am trying to code an SQL statement behind a form as follows > > > > RenewID = Me.AuthorityRenewalID.Value > > Specific = "COUNT([SpecificCondition])FROM > [tblDAuthorityConditionSpecific] > > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & > RenewID & > > "; " > > > > The variables have been declared as integers but I am > getting a type > > mismatch error on the second sentence, The value for RenewID is > > working > but > > it won't let me past this > > > The only thing I can spot is a missing space before "FROM" > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software > Development,System Support. > > > > > > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify > sender. Views > expressed are those of the individual sender and are not > necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From stuart at lexacorp.com.pg Fri Jul 2 01:50:59 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 16:50:59 +1000 Subject: [AccessD] Syntax question In-Reply-To: Message-ID: <40E59273.25152.C502C6B@lexacorp.com.pg> On 2 Jul 2004 at 15:38, connie.kamrowski at agric.nsw.go wrote: > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > Force it to be an impossible number if it is Null. Try Where WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & NZ(RenewID,-1) & "; " -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 01:59:00 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 16:59:00 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Thanks Guys, No luck so far .. am leaving for home with Database on CD and the Access97 handbook under one arm ... wish me luck Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Connie When you are storing the return from the COUNT wrap an NZ( ,0) round it. Can't be more specific as you haven't shown the full code. -- Andy Lacey http://www.minstersystems.co.uk This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From paul.hartland at fsmail.net Fri Jul 2 03:56:39 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 10:56:39 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <3732317.1088758599155.JavaMail.www@wwinf3006> To all, Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a database on SQL Server 2005 Express Edition. Thanks in advance for any help on this. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Fri Jul 2 04:18:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 2 Jul 2004 11:18:53 +0200 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <3732317.1088758599155.JavaMail.www@wwinf3006> References: <3732317.1088758599155.JavaMail.www@wwinf3006> Message-ID: <5510525885.20040702111853@cactus.dk> Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland From paul.hartland at fsmail.net Fri Jul 2 04:24:27 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 11:24:27 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <27973902.1088760267820.JavaMail.www@wwinf3006> ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jimdettman at earthlink.net Fri Jul 2 07:29:41 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 2 Jul 2004 08:29:41 -0400 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <27973902.1088760267820.JavaMail.www@wwinf3006> Message-ID: Paul, <<.but there doesn't seem to be any management tools like Enterprise manager etc>> Right. That's one of the differences between the full SQL Server product and the Express versions (aka SQL Desktop, aka MSDE). You need to use SQL statements to create tables or something like Access which can act as a front end interface. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 5:24 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] SQL Server 2005 Express ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jul 2 07:34:22 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 14:34:22 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <1416153.1088771662719.JavaMail.www@wwinf3006> that's cool, no problem there. How would you create the database to put the tables in though ? Message date : Jul 02 2004, 01:31 PM >From : "Jim Dettman" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: Re: [AccessD] SQL Server 2005 Express Paul, <<.but there doesn't seem to be any management tools like Enterprise manager etc>> Right. That's one of the differences between the full SQL Server product and the Express versions (aka SQL Desktop, aka MSDE). You need to use SQL statements to create tables or something like Access which can act as a front end interface. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 5:24 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] SQL Server 2005 Express ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From michael.broesdorf at web.de Fri Jul 2 07:50:09 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 14:50:09 +0200 Subject: [AccessD] #Deleted#-Problem (Cross-posted) In-Reply-To: <1416153.1088771662719.JavaMail.www@wwinf3006> Message-ID: Dear group, I have a problem with my Access2000-App. The Backend is SQL Server 2000 A bound form is linked to Table A. Table A has an insert-trigger, that creates a record in table B. Both tables have an ID-Field (A_ID and B_ID). Whenever I save a new record in the bound form, it either immediately displays #Deleted# in every field, or displays an old record(!). However, the new record is created correctly. There's a knowledgebase article, describing that problem. It states, that Access tries to re-select the new record using the ID value. It looks like that it is using the ID-value of table B instead that of table A to do the re-select. If it finds a record with that ID it displays that in the new row on the bound form. If it does not find it, the form displays #Deleted#. Is there any way to tell the trigger on table A not to return the ID of the new record in table B? Michael From michael.broesdorf at web.de Fri Jul 2 08:21:42 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 15:21:42 +0200 Subject: Update: [AccessD] #Deleted#-Problem (Cross-posted) In-Reply-To: Message-ID: Using SQL Profile I found that Access indeed uses 'SELECT @@IDENTITY' to get the ID of the newly inserted record. Unfortunately this will return the new ID-value from table B. Using Scope_Identity could solve the problem. Is there a way to tell Access or the ODBC-Driver to use Scope_Identity instead of @@INSERTED? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Michael Br?sdorf Gesendet: Freitag, 2. Juli 2004 14:50 An: Access Developers discussion and problem solving Betreff: [AccessD] #Deleted#-Problem (Cross-posted) Dear group, I have a problem with my Access2000-App. The Backend is SQL Server 2000 A bound form is linked to Table A. Table A has an insert-trigger, that creates a record in table B. Both tables have an ID-Field (A_ID and B_ID). Whenever I save a new record in the bound form, it either immediately displays #Deleted# in every field, or displays an old record(!). However, the new record is created correctly. There's a knowledgebase article, describing that problem. It states, that Access tries to re-select the new record using the ID value. It looks like that it is using the ID-value of table B instead that of table A to do the re-select. If it finds a record with that ID it displays that in the new row on the bound form. If it does not find it, the form displays #Deleted#. Is there any way to tell the trigger on table A not to return the ID of the new record in table B? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jul 2 08:27:24 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 06:27:24 -0700 Subject: [AccessD] Quick Syntax Question In-Reply-To: Message-ID: Hi Connie: Could this work... RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " AND NOT ISNULL([SpecificCondition]);" HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Thursday, July 01, 2004 10:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 2 09:05:40 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jul 2004 09:05:40 -0500 Subject: [AccessD] SQL Server 2005 Express Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Paul, just checked out what http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the features of SQL Server 2005 Express Edition. It doesn't list a database creation tool, to I guess they just forgot to add that. Wouldn't be the first time Microsoft has forgotten to add a necessary feature, or have goofed an existing one. Hey, I agree, it's Friday! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 3:57 AM To: accessd Subject: [AccessD] SQL Server 2005 Express To all, Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I'm used to SQL Server 7.0 and can't for the life of me see how to create a database on SQL Server 2005 Express Edition. Thanks in advance for any help on this. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 2 09:10:24 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jul 2004 09:10:24 -0500 Subject: [AccessD] Syntax question Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0AB@main2.marlow.com> I don't think Count can return as Null (because a zero count is zero). However, just out of curiousity, is that the EXACT SQL you are using? If so, you need a space before FROM, and I would recommend using Count([SpecificCondition]) As CountOfSpecificCondition, thought I don't think that is absolutely necessary. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, July 02, 2004 12:38 AM To: accessd at databaseadvisors.com Subject: [AccessD] Syntax question Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jul 2 09:19:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 02 Jul 2004 09:19:36 -0500 Subject: [AccessD] Re: Limitations of ADP/SQL In-Reply-To: <200407020611.i626BRQ01303@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040702091627.017e44a8@pop3.highstream.net> David, If it is the full version of SQL Server, then it is the limits of SQL Server, which is pretty much disk space. I think clustered servers for the database would be the next step up. The ADP is simply the front end to it and is limited by the number of objects that it can contain, which I think is in the thousands. And, the tables, views, stored procs, etc are not included in the limit since they reside on the server. Robert At 01:11 AM 02/07/2004 -0500, you wrote: >Date: Fri, 02 Jul 2004 05:29:03 +1200 >From: David Emerson >Subject: [AccessD] Limitations of ADP/SQL >To: accessd at databaseadvisors.com >Message-ID: <5.2.0.9.0.20040702052645.00b3e958 at mail.dalyn.co.nz> >Content-Type: text/plain; format=flowed; charset=us-ascii > >I have written an app for a company with an Access XP ADP F/E with an >SQL2000 BE. The company wants to know what the limitations are with this >set up (how many records/how large can the data base get) and what would be >the "next step up". > >Does anyone have any pointer for information? > >Regards > >David Emerson From rl_stewart at highstream.net Fri Jul 2 09:23:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 02 Jul 2004 09:23:36 -0500 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <200407020611.i626BRQ01303@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040702092054.01824ea8@pop3.highstream.net> Rocky, The constant is: acCmdDeleteRecord I have had trouble using the constant the way I do, so I just use the value 223. Use the object browser to see and find the others. Robert At 01:11 AM 02/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 11:48:20 -0700 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes >To: "Access Developers discussion and problem solving" > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Robert: > >What's the 223? Is there a vb constant that goes with that? Or is there a >place I can find out what the different codes are for >Application.RunCommand? > >Regards, > >Rocky Smolin From michael.broesdorf at web.de Fri Jul 2 09:29:47 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 16:29:47 +0200 Subject: [AccessD] Unbound forms In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0AB@main2.marlow.com> Message-ID: Dear group, there was a lot of messages concerning bound forms vs. unbound forms every once in a while on the list - I don't want to get the discussion about pros and cons started again ;-)) My question is: is there any comprehensive resource on the web showing a proven design of unbound forms? (e.g. how to update records, how to identify/handle conflicts in multi user environments, error handling etc.) Michael From Stephen.Pickering at caremark.com Fri Jul 2 10:17:18 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Fri, 2 Jul 2004 10:17:18 -0500 Subject: [AccessD] SQL Server 2005 Express Message-ID: <35C4AC5A5AFD9642833200159C2581560A69B8@s98026.psd.caremark.int> Can you use it as a backend and create a database from an Access Data Project? Steve -----DWUTKA at marlow.com's Original Message----- Paul, just checked out what http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the features of SQL Server 2005 Express Edition. It doesn't list a database creation tool, to I guess they just forgot to add that. Wouldn't be the first time Microsoft has forgotten to add a necessary feature, or have goofed an existing one. Hey, I agree, it's Friday! Drew From djkr at msn.com Fri Jul 2 10:43:16 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Fri, 2 Jul 2004 16:43:16 +0100 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Message-ID: <000301c4604b$4aa88bb0$3500a8c0@dabsight> Maybe you're meant to use MSDE's database creation tool? John ;-) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > DWUTKA at marlow.com > Sent: 02 July 2004 15:06 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] SQL Server 2005 Express > > > Paul, just checked out what > http://lab.msdn.microsoft.com/express/sql/default.aspx which > has all of the features of SQL Server 2005 Express Edition. > It doesn't list a database creation tool, to I guess they > just forgot to add that. Wouldn't be the first time > Microsoft has forgotten to add a necessary feature, or have > goofed an existing one. Hey, I agree, it's Friday! > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > paul.hartland at fsmail.net > Sent: Friday, July 02, 2004 3:57 AM > To: accessd > Subject: [AccessD] SQL Server 2005 Express > > > To all, > > Has anyone downloaded the SQL Server 2005 Express Edition, if > so does anyone know how to create a database on it, I'm used > to SQL Server 7.0 and can't for the life of me see how to > create a database on SQL Server 2005 Express Edition. > > Thanks in advance for any help on this. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 2 11:04:51 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 2 Jul 2004 17:04:51 +0100 Subject: [AccessD] Syntax question Message-ID: <20040702160447.C2074255120@smtp.nildram.co.uk> Connie I'm sure someone could help but your actual code would make it easier, like the lines which use the SQL string in Specific, what you are trying to do with the result (and how), and what line is failing. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: RE: [AccessD] Syntax question Date: 02/07/04 14:13 > > I don't think Count can return as Null (because a zero count is zero). > However, just out of curiousity, is that the EXACT SQL you are using? If > so, you need a space before FROM, and I would recommend using > Count([SpecificCondition]) As CountOfSpecificCondition, thought I don't > think that is absolutely necessary. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: Friday, July 02, 2004 12:38 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] Syntax question > > > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > > at 15:11, connie.kamrowski at agric.nsw.go wrote: > > > > > Hi guys, > > > > Am trying to code an SQL statement behind a form as follows > > > > RenewID = Me.AuthorityRenewalID.Value > > Specific = "COUNT([SpecificCondition])FROM > [tblDAuthorityConditionSpecific] > > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > > > The variables have been declared as integers but I am getting a type > > mismatch error on the second sentence, The value for RenewID is working > but > > it won't let me past this > > > The only thing I can spot is a missing space before "FROM" > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > > > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From accessd at shaw.ca Fri Jul 2 12:26:44 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 10:26:44 -0700 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <000301c4604b$4aa88bb0$3500a8c0@dabsight> Message-ID: There is suppose to be a 'Express Manager' tool on it way from Microsoft but it is not ready for release yet. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DJK(John) Robinson Sent: Friday, July 02, 2004 8:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] SQL Server 2005 Express Maybe you're meant to use MSDE's database creation tool? John ;-) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > DWUTKA at marlow.com > Sent: 02 July 2004 15:06 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] SQL Server 2005 Express > > > Paul, just checked out what > http://lab.msdn.microsoft.com/express/sql/default.aspx which > has all of the features of SQL Server 2005 Express Edition. > It doesn't list a database creation tool, to I guess they > just forgot to add that. Wouldn't be the first time > Microsoft has forgotten to add a necessary feature, or have > goofed an existing one. Hey, I agree, it's Friday! > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > paul.hartland at fsmail.net > Sent: Friday, July 02, 2004 3:57 AM > To: accessd > Subject: [AccessD] SQL Server 2005 Express > > > To all, > > Has anyone downloaded the SQL Server 2005 Express Edition, if > so does anyone know how to create a database on it, I'm used > to SQL Server 7.0 and can't for the life of me see how to > create a database on SQL Server 2005 Express Edition. > > Thanks in advance for any help on this. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Fri Jul 2 13:21:36 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 11:21:36 -0700 Subject: [AccessD] Unbound forms In-Reply-To: Message-ID: Hi Michael: In most cases, it is not necessary to use unbound records with MDBs. Unbound forms work much better with larger sequel DBs that have their own internal data management systems. (transaction logging and roll-back.) If you are using unbound forms you will have to manage the locking through the recordset(s) that actually access the data. The basic methodology is: 1. The specific record called should use the dynamic-link method. 2. Set the 'lock-record' property. 3. Monitoring the resultant error codes when accessing and especially when attempting to delete or updating. Take the appropriate action...(inform user, pause and retry, abandon, overwrite, write code to handle differences between the fields of the updated and current record(s) etc.) Time-stamping a record can be important in managing data conflicts, backup/archiving copies on mission-critical systems is another process worthy of consideration and transaction logging. (These can be good reasons for rolling-your-on unbound application.) If you decide to go this route and have a specific question, I can help you out. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 02, 2004 7:30 AM To: Access Developers discussion and problem solving Subject: [AccessD] Unbound forms Dear group, there was a lot of messages concerning bound forms vs. unbound forms every once in a while on the list - I don't want to get the discussion about pros and cons started again ;-)) My question is: is there any comprehensive resource on the web showing a proven design of unbound forms? (e.g. how to update records, how to identify/handle conflicts in multi user environments, error handling etc.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 2 14:37:07 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 2 Jul 2004 15:37:07 -0400 Subject: [AccessD] Big Modules v. Small Modules Message-ID: <002a01c4606b$f62084f0$6601a8c0@rock> I have heard and/or read that Access is smart enough to load only what it needs from any given module. This suggests that for multi-app reusable library code, you should just stuff it all into one huge module. OTOH, it will Access time to read said module and decide which components it needs in order to execute some specific chunk of code. (Once a module is loaded, it remains loaded and Access won't have to search again, as I understand the operations.) So, what is the prevailing experience and wisdom here? In my current project I have a dozen modules, each dedicated to a specific group of functionalities (for example, all the PDF support stuff resides in one, all the OutLook stuff in another, the API functions in another, etc.) Aside from the organizational benefits, am I gaining or losing anything with this approach? TIA, Arthur From bchacc at san.rr.com Fri Jul 2 20:32:46 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 2 Jul 2004 18:32:46 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes References: <5.1.0.14.2.20040702092054.01824ea8@pop3.highstream.net> Message-ID: <025501c4609d$a4fc32e0$6601a8c0@HAL9002> Robert: Well, it didn't work. I'm stumped. There's ways around it. I could execute a delete query. Or use DAO. But it makes me shaky about other differences between the two versions. Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Cc: Sent: Friday, July 02, 2004 7:23 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky, > > The constant is: acCmdDeleteRecord > > I have had trouble using the constant the way I do, so I just use the value > 223. > > Use the object browser to see and find the others. > > Robert > > At 01:11 AM 02/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 11:48:20 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Robert: > > > >What's the 223? Is there a vb constant that goes with that? Or is there a > >place I can find out what the different codes are for > >Application.RunCommand? > > > >Regards, > > > >Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From accessd at shaw.ca Fri Jul 2 23:18:27 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 21:18:27 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <025501c4609d$a4fc32e0$6601a8c0@HAL9002> Message-ID: Hi Rocky: My recommendation is to use sequel commands (queries..) where ever possible. I have had applications that have been migrated from A95 through to A2005 with little re-coding issues and I believe it is because I have always tried to avoid cmd functions where at all possible. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, July 02, 2004 6:33 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: Well, it didn't work. I'm stumped. There's ways around it. I could execute a delete query. Or use DAO. But it makes me shaky about other differences between the two versions. Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Cc: Sent: Friday, July 02, 2004 7:23 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky, > > The constant is: acCmdDeleteRecord > > I have had trouble using the constant the way I do, so I just use the value > 223. > > Use the object browser to see and find the others. > > Robert > > At 01:11 AM 02/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 11:48:20 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Robert: > > > >What's the 223? Is there a vb constant that goes with that? Or is there a > >place I can find out what the different codes are for > >Application.RunCommand? > > > >Regards, > > > >Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 3 02:15:03 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jul 2004 00:15:03 -0700 Subject: [AccessD] SQL Server 2005 Express References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Message-ID: <40E65CF7.7070905@shaw.ca> Somewhere in the blurbs it says this feature is to be added in next few months. You might try this rather than messing around in OSQL can't guarantee it will work for everything http://www.asql.biz/DbaMgr.shtm DWUTKA at marlow.com wrote: >Paul, just checked out what >http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the >features of SQL Server 2005 Express Edition. It doesn't list a database >creation tool, to I guess they just forgot to add that. Wouldn't be the >first time Microsoft has forgotten to add a necessary feature, or have >goofed an existing one. Hey, I agree, it's Friday! > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >paul.hartland at fsmail.net >Sent: Friday, July 02, 2004 3:57 AM >To: accessd >Subject: [AccessD] SQL Server 2005 Express > > >To all, > >Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone >know how to create a database on it, I'm used to SQL Server 7.0 and can't >for the life of me see how to create a database on SQL Server 2005 Express >Edition. > >Thanks in advance for any help on this. > >Paul Hartland > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Sat Jul 3 02:51:02 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jul 2004 00:51:02 -0700 Subject: [AccessD] Unbound forms References: Message-ID: <40E66566.5040407@shaw.ca> You could try here under unbound sample mdb's http://www.rogersaccesslibrary.com/TableOfContents3.asp Michael Br?sdorf wrote: >Dear group, > >there was a lot of messages concerning bound forms vs. unbound forms every >once in a while on the list - I don't want to get the discussion about pros >and cons started again ;-)) > >My question is: is there any comprehensive resource on the web showing a >proven design of unbound forms? >(e.g. how to update records, how to identify/handle conflicts in multi user >environments, error handling etc.) > >Michael > > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sat Jul 3 05:26:14 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 12:26:14 +0200 Subject: [AccessD] Big Modules v. Small Modules In-Reply-To: <002a01c4606b$f62084f0$6601a8c0@rock> References: <002a01c4606b$f62084f0$6601a8c0@rock> Message-ID: <1131286910.20040703122614@cactus.dk> Hi Arthur This is not what I recall to have read, which is that by calling any function from a module the whole module is loaded. On the other hand, no module is read into memory until one of its functions is called. This should be one of the arguments for having multiple modules. Another is that a function can be declared Private within its module; that would be of no use, however, if a single mumbo module is used. A third argument is that by having multiple specialized modules you can easily reuse a module in another application. I - and I think most developers - do as you do. /gustav > I have heard and/or read that Access is smart enough to load only what > it needs from any given module. This suggests that for multi-app > reusable library code, you should just stuff it all into one huge > module. OTOH, it will Access time to read said module and decide which > components it needs in order to execute some specific chunk of code. > (Once a module is loaded, it remains loaded and Access won't have to > search again, as I understand the operations.) > So, what is the prevailing experience and wisdom here? In my current > project I have a dozen modules, each dedicated to a specific group of > functionalities (for example, all the PDF support stuff resides in one, > all the OutLook stuff in another, the API functions in another, etc.) > Aside from the organizational benefits, am I gaining or losing anything > with this approach? > TIA, > Arthur From andy at minstersystems.co.uk Sat Jul 3 06:44:56 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 3 Jul 2004 12:44:56 +0100 Subject: [AccessD] Big Modules v. Small Modules In-Reply-To: <1131286910.20040703122614@cactus.dk> Message-ID: <000201c460f3$29ca9c00$b274d0d5@minster33c3r25> I agree. Everything I've read says that Access loads all of a module once any sub or function within that module is required. So grouping functionally related code into a module has always seemed to me the way to go. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gustav Brock > Sent: 03 July 2004 11:26 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Big Modules v. Small Modules > > > Hi Arthur > > This is not what I recall to have read, which is that by > calling any function from a module the whole module is loaded. > > On the other hand, no module is read into memory until one of > its functions is called. This should be one of the arguments > for having multiple modules. Another is that a function can > be declared Private within its module; that would be of no > use, however, if a single mumbo module is used. A third > argument is that by having multiple specialized modules you > can easily reuse a module in another application. > > I - and I think most developers - do as you do. > > /gustav > > > > I have heard and/or read that Access is smart enough to > load only what > > it needs from any given module. This suggests that for multi-app > > reusable library code, you should just stuff it all into one huge > > module. OTOH, it will Access time to read said module and > decide which > > components it needs in order to execute some specific chunk > of code. > > (Once a module is loaded, it remains loaded and Access > won't have to > > search again, as I understand the operations.) > > > So, what is the prevailing experience and wisdom here? In > my current > > project I have a dozen modules, each dedicated to a > specific group of > > functionalities (for example, all the PDF support stuff resides in > > one, all the OutLook stuff in another, the API functions in > another, > > etc.) Aside from the organizational benefits, am I gaining > or losing > > anything with this approach? > > > TIA, > > Arthur > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sat Jul 3 07:19:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 14:19:36 +0200 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <40E65CF7.7070905@shaw.ca> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> Message-ID: <1618088971.20040703141936@cactus.dk> Hi Marty I checked with Andrea if he will update the DbaMgr for SQL Server 2005 Express - but he is waiting to see this tool MS plans to ship. /gustav > Somewhere in the blurbs it says this feature is to be added in next few > months. > You might try this rather than messing around in OSQL > can't guarantee it will work for everything > http://www.asql.biz/DbaMgr.shtm From Oleg_123 at xuppa.com Sat Jul 3 13:37:23 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Sat, 3 Jul 2004 14:37:23 -0400 (EDT) Subject: [AccessD] Frame question In-Reply-To: <1618088971.20040703141936@cactus.dk> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> Message-ID: <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> I have about 25 textboxes, which on a click on a button i want their context cleared, and half of them hidden is there a way to place them in 2 frames, and have all items inside 1 frame cleared, and 2nd frame hidden and cleared ? ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From gustav at cactus.dk Sat Jul 3 13:56:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 20:56:47 +0200 Subject: [AccessD] Frame question In-Reply-To: <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> Message-ID: <5331920459.20040703205647@cactus.dk> Hi Oleg > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden > is there a way to place them in 2 frames, and have all items inside 1 > frame cleared, and 2nd frame hidden and cleared ? Not that I know of, but you could let a rectangle cover the textboxes (bring it to front), then setting this rectangle's Visible property to True or False. /gustav From martyconnelly at shaw.ca Sun Jul 4 11:25:34 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 04 Jul 2004 09:25:34 -0700 Subject: [AccessD] SQL Server 2005 Express References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> Message-ID: <40E82F7E.8070600@shaw.ca> There is also this freebie from BMC. SmartDBA Cockpit (2.0.01) You have to register the product once a year, I suppose that is to avoid old versions running around in the wild. Or more likely to have an uptodate customer list. It is supposed to manage SQL Server, Oracle and DB2 all at the same time. It is a Web enabled version. http://shop.bmc.com/product_moreinfo.cfm?id=2479&cpg=US00-1889GA Gustav Brock wrote: >Hi Marty > >I checked with Andrea if he will update the DbaMgr for SQL Server 2005 >Express - but he is waiting to see this tool MS plans to ship. > >/gustav > > > > >>Somewhere in the blurbs it says this feature is to be added in next few >>months. >>You might try this rather than messing around in OSQL >>can't guarantee it will work for everything >>http://www.asql.biz/DbaMgr.shtm >> >> > > > -- Marty Connelly Victoria, B.C. Canada From serbach at new.rr.com Sun Jul 4 17:53:27 2004 From: serbach at new.rr.com (serbach at new.rr.com) Date: Mon, 5 Jul 2004 00:53:27 +0200 Subject: [AccessD] Re: Re: Message Message-ID: <200407042301.i64N18Q29000@databaseadvisors.com> Please have a look at the attached file. From mike at welshfam.org Sun Jul 4 19:45:30 2004 From: mike at welshfam.org (Michael Welsh) Date: Sun, 4 Jul 2004 20:45:30 -0400 Subject: [AccessD] Frame question In-Reply-To: <5331920459.20040703205647@cactus.dk> Message-ID: <200407050045.i650jeQ00494@databaseadvisors.com> Oleg, I use a function that cycles thru the form controls. If the .tag property matches, the control is set to null (you could do anything to the control like set it to zero, as well). Call it NullTag("TagData") Public Sub NullTag( ByVal strTagData As String) As Boolean On Error GoTo Error_NullTag Dim ctrl As Control Dim frmForm As Form Set frmForm = Application.Screen.ActiveForm For gintReit = 0 To frmForm.Count - 1 Set ctrl = frmForm(gintReit) If InStr(1, ctrl.Tag, strTagData) Then ctrl = Null 'alter this line to set the control as needed End If Next gintReit I use a similar sub to make the control visible or invisible as needed. Call it in code ToggleControl "False", "TagData" to set all controls on the active form Visible = false if the tag data = "TagData". Use you own tagdata. Use True to make the controls visible. Public Sub ToggleControl( ByVal fSwitch As Boolean, ByVal strTagData As String) On Error GoTo Error_ToggleControl DoCmd.Hourglass True Dim ctrl As Control Dim frmMF As Form Set frmMF = Application.Screen.ActiveForm For gintReit = 0 To frmMF.Count - 1 Set ctrl = frmMF(gintReit) If ctrl.Tag = strTagData Then ctrl.Visible = fSwitch End If Next gintReit Hope this helps. Mike -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Saturday, July 03, 2004 2:57 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Frame question Hi Oleg > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden is there a way to place them > in 2 frames, and have all items inside 1 frame cleared, and 2nd frame > hidden and cleared ? Not that I know of, but you could let a rectangle cover the textboxes (bring it to front), then setting this rectangle's Visible property to True or False. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Sun Jul 4 19:51:19 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Mon, 5 Jul 2004 10:51:19 +1000 Subject: [AccessD] Re: Quick Syntax question Message-ID: Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From d.dick at uws.edu.au Sun Jul 4 20:04:45 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Mon, 5 Jul 2004 11:04:45 +1000 Subject: [AccessD] Frame question References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com><40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> Message-ID: <005101c4622c$108289d0$28669a89@DDICK> Hi Oleg I do stuff like this using the tag property of a control If a control can be cleared I give it a TAG property of say...1 if it can be invisible I give it a TAG property of 2 and if it can be both I give it a TAG property of 3 Then based on your circumstances of data entry run one of 3 code options eg to make invisible all the controls thatcan be be invisible try...ps_SetVisibles 1 or to clear all the controls that are allowed to be cleared try...ps_SetVisibles 2 or to clear and make invisible the controls you want cleared and invisible try ps_SetVisibles 3 eg Make a module on your form like this Private Sub ps_SetVisibles(intWhatValue As Integer) 'This code looks for all controls on a form that have a TAG that matches the 'intWhatValue passed to this sub then makes that control or controls visible or 'clears their contents or both Dim ctl As Control Select Case intWhatValue Case 1 For Each ctl In Me.Controls If ctl.Tag = 1 Then ctl.Visible = False End If Next Case 2 For Each ctl In Me.Controls If ctl.Tag = 2 Then ctl.Value = "" End If Next Case 3 For Each ctl In Me.Controls If ctl.Tag = 3 Then ctl.Visible = False ctl.Value = "" End If Next Case Else MsgBox "can only deal with values 1 2 or 3" End Select Hope this helps Darren ----- Original Message ----- From: To: Sent: Sunday, July 04, 2004 4:37 AM Subject: [AccessD] Frame question > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden > is there a way to place them in 2 frames, and have all items inside 1 > frame cleared, and 2nd frame hidden and cleared ? > > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andrew.curtis at wapl.com.au Sun Jul 4 20:09:38 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 09:09:38 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: Connie, Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" Read the lines above, you are in fact assigning the TEXT of the select to the variable "specific", you are not EXECUTING THE SQL at all, hence you get an error because the TEXT is not an integer. If you were executing the SQL, you would have: SQLtxt="SELECT COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" Db.execute SQLtext Then assign the RESULT to the "specific" variable. Any help? Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Monday, 5 July 2004 8:51 AM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From andrew.curtis at wapl.com.au Sun Jul 4 20:36:11 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 09:36:11 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: Additional to my last: Heres the solution, modify to suit your fields, this needs a reference to DAO. Dim sqltext, specific As Integer Dim db As dao.Database, rs As dao.Recordset Set db = CurrentDb() sqltext = "SELECT count([id]) as countMe FROM Table1;" Set rs = db.OpenRecordset(sqltext) specific = rs.Fields("countMe") rs.Close Set db = Nothing Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Monday, 5 July 2004 8:51 AM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From stuart at lexacorp.com.pg Sun Jul 4 20:56:40 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jul 2004 11:56:40 +1000 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: <40E941F8.14608.AD16881@lexacorp.com.pg> On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sun Jul 4 21:00:15 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jul 2004 12:00:15 +1000 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: <40E942CF.18278.AD4AF6F@lexacorp.com.pg> On 5 Jul 2004 at 10:51, connie.kamrowski at agric.nsw.go wrote: > > Specific = "COUNT([SpecificCondition]) FROM > [tblDAuthorityConditionSpecific] WHERE > [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" > You can do this with a simple DCOUNT: Specific = DCOUNT("SpecificCondition",tblDAuthorityConditionSpecific","AuthorityID = " & RenewID) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From andrew.curtis at wapl.com.au Sun Jul 4 21:28:04 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 10:28:04 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: At least you have the solution now! :) Andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Monday, 5 July 2004 10:00 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: Quick Syntax question On 5 Jul 2004 at 10:51, connie.kamrowski at agric.nsw.go wrote: > > Specific = "COUNT([SpecificCondition]) FROM > [tblDAuthorityConditionSpecific] WHERE > [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" > You can do this with a simple DCOUNT: Specific = DCOUNT("SpecificCondition",tblDAuthorityConditionSpecific","AuthorityID = " & RenewID) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From accessd at shaw.ca Mon Jul 5 00:10:32 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sun, 04 Jul 2004 22:10:32 -0700 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: Hi Connie: IF ISNUMBER(RenewID) THEN RenewID = TRIM(STR(RenewID)) Specific = "COUNT(TACS.SpecificCondition) FROM tblDAuthorityConditionSpecific AS TACS WHERE NOT ISNULL(TACS.SpecificCondition) AND TACS.AuthorityID = " & RenewID & ";" I am not sure this would help but it will catch a couple of the obvious issues that have the potential to kill the above code. If the above line is really suppose to be a complete sequel statement then the following line would be more correct: Specific = "SELECT COUNT(TACS.SpecificCondition) FROM tblDAuthorityConditionSpecific AS TACS WHERE NOT ISNULL(TACS.SpecificCondition) AND TACS.AuthorityID = " & RenewID & ";" HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Sunday, July 04, 2004 5:51 PM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 5 04:02:55 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 5 Jul 2004 11:02:55 +0200 Subject: AW: [AccessD] Unbound forms In-Reply-To: <40E66566.5040407@shaw.ca> Message-ID: Thanks to all who responded - your help is a good starting point! Michael From michael.broesdorf at web.de Mon Jul 5 04:02:56 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 5 Jul 2004 11:02:56 +0200 Subject: [AccessD] Autonumber in SQL-Server In-Reply-To: <40E66566.5040407@shaw.ca> Message-ID: Hi, let's say I need an autonumber field in a table located on a SQL Sever 2000 but can't make it an ID-field. Using a trigger to fill in the value is no option either. Could I use a user defined function? Are there any know problem/limitations with that? Michael From Subscriptions at servicexp.com Mon Jul 5 15:14:34 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Mon, 5 Jul 2004 16:14:34 -0400 Subject: [AccessD] Auto-Update FE Over the Internet? In-Reply-To: Message-ID: Has anyone tried this? Robert Gracie www.servicexp.com From lists at jbsolutions.com.au Mon Jul 5 20:21:47 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 6 Jul 2004 11:21:47 +1000 Subject: [AccessD] Create Hyperlink Field in VBA Message-ID: <200407060121.i661LbQ13861@databaseadvisors.com> Hi Group Hoping someone can help me out here, I'm trying to create a Hyperlink Field in a table via VBA (Access 2K), the code looks like this... '=====================Begin Code Function addHyperlinkField(strDB as String) Dim db As DAO.Database Dim tbl As DAO.TableDef Dim newfld As DAO.Field Set db = OpenDatabase(strDB) Set tbl = db.TableDefs("tbl_Clients") Set newfld = tbl.CreateField("clnt_Website2", dbMemo, 233) tbl.Fields.Append newfld newfld.Attributes = dbHyperlinkField End Function '=====================End Code The code bombs out on the last line and gives me Error 3219 - "Invalid Operation". If anyone has any ideas, it would be most appreciated. Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-07-06 From lists at jbsolutions.com.au Mon Jul 5 21:08:40 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 6 Jul 2004 12:08:40 +1000 Subject: [AccessD] Create Hyperlink Field in VBA Message-ID: <200407060208.i6628TQ14567@databaseadvisors.com> Nevermind, figured it out. I needed to set the attribute before appending... ======= At 2004-07-06, 11:21:00 I wrote: ======= >Hi Group > >Hoping someone can help me out here, I'm trying to create a Hyperlink Field in a table via VBA (Access 2K), the code looks like this... > >'=====================Begin Code >Function addHyperlinkField(strDB as String) > >Dim db As DAO.Database >Dim tbl As DAO.TableDef >Dim newfld As DAO.Field > > >Set db = OpenDatabase(strDB) > >Set tbl = db.TableDefs("tbl_Clients") >Set newfld = tbl.CreateField("clnt_Website2", dbMemo, 233) >tbl.Fields.Append newfld >newfld.Attributes = dbHyperlinkField > >End Function >'=====================End Code > >The code bombs out on the last line and gives me Error 3219 - "Invalid Operation". If anyone has any ideas, it would be most appreciated. = = = = = = = = = = = = = = = = = = = = Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-07-06 From martyconnelly at shaw.ca Mon Jul 5 21:10:05 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 05 Jul 2004 19:10:05 -0700 Subject: [AccessD] Auto-Update FE Over the Internet? References: Message-ID: <40EA09FD.1090508@shaw.ca> Well you can download the FrontEnd mdb via XMLHTTP, Inet or URLMON.DLL. Choose your poison. After that it is just manipulating as a disk file. Oh yes you can also use winHTTP object on Win98 and up This gives you finer control in a class http://www.mvps.org/emorcillo/vb6/inet/adl.shtml Download files asynchronously with URLMON.DLL or -------------- 3. Add a MS Inet control to the form (Inet1) 4. Add a textbox (Text1) 5. Set the textbox Text property to "http://images.ucomics.com/comics/ga/2003/ga030214.gif" 6. Add a command button (Command1) 7. In the Command1_Click event, add this code Dim strURL As String Dim bData() As Byte ' Data variable Dim intFile As Integer ' FreeFile variable Dim sFilename As String strURL = Text1.Text sFilename = "C:\Temp\" & Mid(Text1.Text, InStrRev(Text1.Text, "/") + 1) intFile = FreeFile() ' Set intFile to an unused file. ' The result of the OpenURL method goes into the Byte ' array, and the Byte array is then saved to disk. bData() = Inet1.OpenURL(strURL, icByteArray) Open sFilename For Binary Access Write As #intFile Put #intFile, , bData() Close #intFile or -------------- 'This code fires off request to specified WEB page 'returns html, asp, xml, or text page in text string then sent to file on disk 'Makes use of the XMLHTTPRequest object contained in msxml.dll. 'Check off Reference to MSXML Version 2.0 3.0 ' I am using latest Version of IE5 ' should also work with IE5.0 MSXML ver 2.0,2.6, 3.0 etc 'GrabTextFileFromWebSite "http://www5.brinkster.com/mconnelly/GenericDB/Excel Redshift.zip" Public Sub GrabTextFileFromWebSite(strMyURL As String) 'Dim oHttp As Object Dim oHttp As New MSXML2.XMLHTTP40 Dim strFileName As String Dim intfile As Integer Dim bData() As Byte 'make use of the XMLHTTPRequest object contained in msxml.dll ' Set oHttp = CreateObject("MSXML2.XMLHTTP40") 'Set oHttp = GetObject("MSXML2.XMLHTTP30") 'oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 'oHttp.setRequestHeader "Content-Type", "text/xml" 'oHttp.setRequestHeader "Content-Type", "multipart/form-data" oHttp.Open "GET", strMyURL, False ' stick in your web page above , file type can be anything asp txt xml html etc. 'depends partially on content type oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oHttp.send 'check the feedback Debug.Print "Ready State =" & oHttp.readyState 'normal state =4 Debug.Print "Status =" & oHttp.status 'normal status = 200 Debug.Print "Status Text =" & oHttp.statusText ' Debug.Print oHttp.getAllResponseHeaders() 'Debug.Print "Response Body =" & oHttp.responseBody ' Debug.Print "Response Body =" & StrConv(oHttp.responseBody, vbUnicode) 'Debug.Print "Response Text =" & oHttp.responseText 'Parse response text string here or send to file 'create directory structure if not in existance ' CreateDirectoryStruct ("c:\Accesshtmlstealer") strFileName = "c:\Accesshtmlstealer\Amazon" strFileName = strFileName & Format(Now, "yyyymmddhhmmss") & ".txt" ' WriteFile strFileName, oHttp.responseText 'Temporary storage intfile = FreeFile() ' The file will be saved in the temp folder with the name download.zip' Open "c:\temp\download.zip" For Binary Access Write As #intfile 'Put #intfile, , bData() bData() = oHttp.responseBody Put #intfile, , bData() Close #intfile ' Exit Sub ErrorHandler: MsgBox Err.Description & vbCrLf & Err.Number ' Resume Next End Sub Robert Gracie wrote: > Has anyone tried this? > > >Robert Gracie >www.servicexp.com > > > > -- Marty Connelly Victoria, B.C. Canada From connie.kamrowski at agric.nsw.gov.au Mon Jul 5 23:43:56 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Tue, 6 Jul 2004 14:43:56 +1000 Subject: [AccessD] Re: Quick Syntax Question - Solved Message-ID: Thanks guys , my sanity is saved. I used Andrews solution as it was the first I got. I haven't tried the rest but Andrews works fine. Regards Connie Kamrowski Message: 7 Date: Mon, 05 Jul 2004 11:56:40 +1000 From: "Stuart McLachlan" Subject: RE: [AccessD] Re: Quick Syntax question To: Access Developers discussion and problem solving Message-ID: <40E941F8.14608.AD16881 at lexacorp.com.pg> Content-Type: text/plain; charset=US-ASCII On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Tue Jul 6 02:11:31 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Tue, 6 Jul 2004 15:11:31 +0800 Subject: [AccessD] Re: Quick Syntax Question - Solved Message-ID: Connie, glad it helped. The other guys did have a valid solution as well with dcount. DCount is more friendly as there is no need for a DAO reference, however I was looking purely from SQL syntax perspective. If you never intend upsizing the app to SQL server or other database, Dcount is probably the easiest implementation. More of a personal preference thing really as the result is the goal and is achieved either way. Good luck with the rest of the app. Andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, 6 July 2004 12:44 PM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax Question - Solved Thanks guys , my sanity is saved. I used Andrews solution as it was the first I got. I haven't tried the rest but Andrews works fine. Regards Connie Kamrowski Message: 7 Date: Mon, 05 Jul 2004 11:56:40 +1000 From: "Stuart McLachlan" Subject: RE: [AccessD] Re: Quick Syntax question To: Access Developers discussion and problem solving Message-ID: <40E941F8.14608.AD16881 at lexacorp.com.pg> Content-Type: text/plain; charset=US-ASCII On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From paul.hartland at fsmail.net Tue Jul 6 07:35:28 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 6 Jul 2004 14:35:28 +0200 (CEST) Subject: [AccessD] OT-Excel Show Decimal Places Only Message-ID: <18811147.1089117328414.JavaMail.www@wwinf3002> To all, I have some data in an Excel sheet (4.26, 3.04 etc) what I want in the column next to it is just the Decimal places part of the number (26, 04 etc). I'm sure that there is a way to do this but can't for the life of me think what it is. Paul -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Tue Jul 6 07:49:04 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 06 Jul 2004 22:49:04 +1000 Subject: [AccessD] OT-Excel Show Decimal Places Only In-Reply-To: <18811147.1089117328414.JavaMail.www@wwinf3002> Message-ID: <40EB2C60.26227.124D0F1F@lexacorp.com.pg> On 6 Jul 2004 at 14:35, paul.hartland at fsmail.net wrote: > To all, I have some data in an Excel sheet (4.26, 3.04 etc) what I want > in the column next to it is just the Decimal places part of the number > (26, 04 etc). I'm sure that there is a way to do this but can't for > the life of me think what it is. Paul > Assuming the number is in A1, in B1 put: (A1-Int(A1))*100 You will also need to format the cells as "Custom" with a Type of "00" to maintain the leading zeros. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From ppeters1 at cce.umn.edu Tue Jul 6 12:01:48 2004 From: ppeters1 at cce.umn.edu (Polly R Peterson) Date: Tue, 6 Jul 2004 12:01:48 -0500 Subject: [AccessD] How to stop Access from setting references Message-ID: > Problem Background > We develop Access applications for our users. We develop these > appliations as.ADP files and convert them to .ADE files before > deploying the application to our users. We currently develop in a > different MS Office environment than our users. Recently we > encountered some trouble with the DLL files. While in test, we > discovered that a user wasn't able to run our application without > error. The reason for this was that my pc had added an unnecessary > dll file to the application that our tester's pc didn't have. We > removed the reference and the application ran perfectly for her. We > continued to develop on that file, testing back and forth between > users without problem. When we went to launch the application, we > encountered the same problem-the dll reference had been automatically > added on my pc again. > > My question is how and when are dll references automatically added? > Is there a way for me to disable this function without manually > checking the references each time? > > Details > Developers: MS Office XP Developers, Microsoft Access 2002, we have > MS Front Page on our machines, users do not. > Users: MS Standard Office XP, Microsoft Access 2002 > > dll reference automatically being added: "Microsoft Office XP Web > Components" > (for an added twist, once I uncheck this reference, it disappears from > the reference list box and I can't even recheck it). > Thank You! Polly R. Peterson Office of Information Systems College of Continuing Education University of Minnesota, Twin Cities (t) 612.625.1578 (f) 612.625.2568 ppeters1 at cce.umn.edu From subs1847 at solution-providers.ie Tue Jul 6 15:06:31 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Tue, 06 Jul 2004 20:06:31 -0000 Subject: [AccessD] VB.NET References: <1336268994.20040602113302@cactus.dk> Message-ID: <000001c46394$b802d700$0101a8c0@D8TZHN0J> Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something like > > Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 6 15:22:31 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jul 2004 13:22:31 -0700 Subject: [AccessD] VB.NET Message-ID: Yes, we are using the .Net version, although I'm not working with it myself. For the moment, I'm stuck in the Access world maintaining and upgrading our XP apps until we finish the model for the first .Net version. I don't have any idea on the upgrade but maybe someone else can help. Charlotte Foust -----Original Message----- From: Mark L. Breen [mailto:subs1847 at solution-providers.ie] Sent: Wednesday, June 02, 2004 3:24 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] VB.NET Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something > > like Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 6 15:25:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jul 2004 13:25:34 -0700 Subject: [AccessD] How to stop Access from setting references Message-ID: We've run into something similar with MDBs. In MDBs, Access automatically adds the Web Components when you create a new database, perhaps to support the DAPs. If the reference breaks, it may NOT show up in the reference list, but you need to recompile the app to be sure it's gone. I had to actually remove the dll from my machine to be sure of finding and squashing all those references lurking in our apps. Charlotte Foust -----Original Message----- From: Polly R Peterson [mailto:ppeters1 at cce.umn.edu] Sent: Tuesday, July 06, 2004 9:02 AM To: AccessD at databaseadvisors.com Cc: Jerry Blixt Subject: [AccessD] How to stop Access from setting references > Problem Background > We develop Access applications for our users. We develop these > appliations as.ADP files and convert them to .ADE files before > deploying the application to our users. We currently develop in a > different MS Office environment than our users. Recently we > encountered some trouble with the DLL files. While in test, we > discovered that a user wasn't able to run our application without > error. The reason for this was that my pc had added an unnecessary > dll file to the application that our tester's pc didn't have. We > removed the reference and the application ran perfectly for her. We > continued to develop on that file, testing back and forth between > users without problem. When we went to launch the application, we > encountered the same problem-the dll reference had been automatically > added on my pc again. > > My question is how and when are dll references automatically added? Is > there a way for me to disable this function without manually checking > the references each time? > > Details > Developers: MS Office XP Developers, Microsoft Access 2002, we have > MS Front Page on our machines, users do not. > Users: MS Standard Office XP, Microsoft Access 2002 > > dll reference automatically being added: "Microsoft Office XP Web > Components" (for an added twist, once I uncheck this reference, it > disappears from the reference list box and I can't even recheck it). > Thank You! Polly R. Peterson Office of Information Systems College of Continuing Education University of Minnesota, Twin Cities (t) 612.625.1578 (f) 612.625.2568 ppeters1 at cce.umn.edu -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From hadyn at dataconcepts.co.nz Tue Jul 6 15:33:51 2004 From: hadyn at dataconcepts.co.nz (Hadyn Morgan) Date: Wed, 7 Jul 2004 08:33:51 +1200 Subject: [AccessD] VB.NET In-Reply-To: <000001c46394$b802d700$0101a8c0@D8TZHN0J> Message-ID: Hi Mark We evaluated ActiveReports for .NET and were happy with the results. The reason we purchased XtraReports from DevExpress instead is because of the licensing. You don't have to purchase another license to deploy a web app on a server. The other bonus is $100 cheaper and full source code supplied. Kind regards Hadyn -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark L. Breen Sent: Wednesday, 2 June 2004 23:24 To: Access Developers discussion and problem solving Subject: Re: [AccessD] VB.NET Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something like > > Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dkalsow at yahoo.com Tue Jul 6 16:01:42 2004 From: dkalsow at yahoo.com (Dale Kalsow) Date: Tue, 6 Jul 2004 14:01:42 -0700 (PDT) Subject: [AccessD] Autonumber in queries In-Reply-To: Message-ID: <20040706210142.61768.qmail@web50402.mail.yahoo.com> Does any one know how to add a column in a query that is an autonumber column? Thanks! Dale --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From stuart at lexacorp.com.pg Tue Jul 6 16:42:52 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jul 2004 07:42:52 +1000 Subject: [AccessD] Autonumber in queries In-Reply-To: <20040706210142.61768.qmail@web50402.mail.yahoo.com> References: Message-ID: <40EBA97C.7002.1435C49E@lexacorp.com.pg> On 6 Jul 2004 at 14:01, Dale Kalsow wrote: > > Does any one know how to add a column in a query that is an autonumber column? > What sort of a query? Do you mean create an Autonumber field in a MakeTable query or just insert a sequential number column in a select query? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From martyconnelly at shaw.ca Tue Jul 6 17:56:57 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 06 Jul 2004 15:56:57 -0700 Subject: [AccessD] Unbound forms References: <40E66566.5040407@shaw.ca> Message-ID: <40EB2E39.1060103@shaw.ca> There are also simple unbound samples here for Access 2000 in the files area Just register NoMail if you don't want the mailing list. http://groups.yahoo.com/group/NYCAccessVB/files/ It is the NewYork City Access VB Group There is also the off spring .Net Developers group in NewYork http://www.nycdotnetdev.com/ They have general seminars usually twice a month. at Microsoft offices , 1290 Avenue of the Americas Worth a visit and a schmooze if you are in NewYork, you usually walk away with a full copy of Whidbey or something like that. You might even bump into Ken Getz or Stephen Forte. MartyConnelly wrote: > You could try here under unbound sample mdb's > http://www.rogersaccesslibrary.com/TableOfContents3.asp > > Michael Br?sdorf wrote: > >> Dear group, >> >> there was a lot of messages concerning bound forms vs. unbound forms >> every >> once in a while on the list - I don't want to get the discussion >> about pros >> and cons started again ;-)) >> >> My question is: is there any comprehensive resource on the web showing a >> proven design of unbound forms? >> (e.g. how to update records, how to identify/handle conflicts in >> multi user >> environments, error handling etc.) >> >> Michael >> >> >> > -- Marty Connelly Victoria, B.C. Canada From Subscriptions at servicexp.com Tue Jul 6 18:44:39 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 6 Jul 2004 19:44:39 -0400 Subject: [AccessD] Auto-Update FE Over the Internet? In-Reply-To: <40EA09FD.1090508@shaw.ca> Message-ID: Thank You Marty !! Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Monday, July 05, 2004 10:10 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Auto-Update FE Over the Internet? Well you can download the FrontEnd mdb via XMLHTTP, Inet or URLMON.DLL. Choose your poison. After that it is just manipulating as a disk file. Oh yes you can also use winHTTP object on Win98 and up This gives you finer control in a class http://www.mvps.org/emorcillo/vb6/inet/adl.shtml Download files asynchronously with URLMON.DLL or -------------- 3. Add a MS Inet control to the form (Inet1) 4. Add a textbox (Text1) 5. Set the textbox Text property to "http://images.ucomics.com/comics/ga/2003/ga030214.gif" 6. Add a command button (Command1) 7. In the Command1_Click event, add this code Dim strURL As String Dim bData() As Byte ' Data variable Dim intFile As Integer ' FreeFile variable Dim sFilename As String strURL = Text1.Text sFilename = "C:\Temp\" & Mid(Text1.Text, InStrRev(Text1.Text, "/") + 1) intFile = FreeFile() ' Set intFile to an unused file. ' The result of the OpenURL method goes into the Byte ' array, and the Byte array is then saved to disk. bData() = Inet1.OpenURL(strURL, icByteArray) Open sFilename For Binary Access Write As #intFile Put #intFile, , bData() Close #intFile or -------------- 'This code fires off request to specified WEB page 'returns html, asp, xml, or text page in text string then sent to file on disk 'Makes use of the XMLHTTPRequest object contained in msxml.dll. 'Check off Reference to MSXML Version 2.0 3.0 ' I am using latest Version of IE5 ' should also work with IE5.0 MSXML ver 2.0,2.6, 3.0 etc 'GrabTextFileFromWebSite "http://www5.brinkster.com/mconnelly/GenericDB/Excel Redshift.zip" Public Sub GrabTextFileFromWebSite(strMyURL As String) 'Dim oHttp As Object Dim oHttp As New MSXML2.XMLHTTP40 Dim strFileName As String Dim intfile As Integer Dim bData() As Byte 'make use of the XMLHTTPRequest object contained in msxml.dll ' Set oHttp = CreateObject("MSXML2.XMLHTTP40") 'Set oHttp = GetObject("MSXML2.XMLHTTP30") 'oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 'oHttp.setRequestHeader "Content-Type", "text/xml" 'oHttp.setRequestHeader "Content-Type", "multipart/form-data" oHttp.Open "GET", strMyURL, False ' stick in your web page above , file type can be anything asp txt xml html etc. 'depends partially on content type oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oHttp.send 'check the feedback Debug.Print "Ready State =" & oHttp.readyState 'normal state =4 Debug.Print "Status =" & oHttp.status 'normal status = 200 Debug.Print "Status Text =" & oHttp.statusText ' Debug.Print oHttp.getAllResponseHeaders() 'Debug.Print "Response Body =" & oHttp.responseBody ' Debug.Print "Response Body =" & StrConv(oHttp.responseBody, vbUnicode) 'Debug.Print "Response Text =" & oHttp.responseText 'Parse response text string here or send to file 'create directory structure if not in existance ' CreateDirectoryStruct ("c:\Accesshtmlstealer") strFileName = "c:\Accesshtmlstealer\Amazon" strFileName = strFileName & Format(Now, "yyyymmddhhmmss") & ".txt" ' WriteFile strFileName, oHttp.responseText 'Temporary storage intfile = FreeFile() ' The file will be saved in the temp folder with the name download.zip' Open "c:\temp\download.zip" For Binary Access Write As #intfile 'Put #intfile, , bData() bData() = oHttp.responseBody Put #intfile, , bData() Close #intfile ' Exit Sub ErrorHandler: MsgBox Err.Description & vbCrLf & Err.Number ' Resume Next End Sub Robert Gracie wrote: > Has anyone tried this? > > >Robert Gracie >www.servicexp.com > > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jul 7 01:38:08 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 7 Jul 2004 07:38:08 +0100 Subject: [AccessD] Autonumber in queries In-Reply-To: <20040706210142.61768.qmail@web50402.mail.yahoo.com> Message-ID: <003b01c463ec$f7a2cd90$b274d0d5@minster33c3r25> Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > > Does any one know how to add a column in a query that is an > autonumber column? > > > > Thanks! > > > > Dale > > > > --------------------------------- > Do you Yahoo!? > New and Improved Yahoo! Mail - Send 10MB messages! > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From paul.hartland at fsmail.net Wed Jul 7 04:40:31 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 7 Jul 2004 11:40:31 +0200 (CEST) Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <15425661.1089193231392.JavaMail.www@wwinf3002> To all, Sorry for this but I am sure I have seen how to do this on one of the lists, but can't remember which one. I want to create a connection to Outlook via Access or Visual Basic, and write to a table every email address in my Outlook Global Address List. How can I go about doing this ? Thanks in advance. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Wed Jul 7 05:06:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jul 2004 12:06:46 +0200 Subject: [AccessD] OT-Outlook Email Addresses In-Reply-To: <15425661.1089193231392.JavaMail.www@wwinf3002> References: <15425661.1089193231392.JavaMail.www@wwinf3002> Message-ID: <5114345968.20040707120646@cactus.dk> Hi Paul You can link to that as a table - just pick Exchange() or Outlook() as tabletype in the dialog box where you choose which database to link to. /gustav > I want to create a connection to Outlook via Access or Visual Basic, > and write to a table every email address in my Outlook Global > Address List. > How can I go about doing this ? > Thanks in advance. > Paul Hartland From andy at minstersystems.co.uk Wed Jul 7 06:42:50 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 7 Jul 2004 12:42:50 +0100 Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <20040707114248.3564525420A@smtp.nildram.co.uk> Unless you're using Access 97, in which case I can probably dig out some code. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT-Outlook Email Addresses Date: 07/07/04 10:08 > > Hi Paul > > You can link to that as a table - just pick Exchange() or Outlook() as > tabletype in the dialog box where you choose which database to link > to. > > /gustav > > > > I want to create a connection to Outlook via Access or Visual Basic, > > and write to a table every email address in my Outlook Global > > Address List. > > How can I go about doing this ? > > > Thanks in advance. > > Paul Hartland > > -- > _______________________________________________ > 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 paul.hartland at fsmail.net Wed Jul 7 06:51:11 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 7 Jul 2004 13:51:11 +0200 (CEST) Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <21913121.1089201071563.JavaMail.www@wwinf3002> Thanks, but using Office XP. Message date : Jul 07 2004, 12:48 PM >From : "Andy Lacey" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] OT-Outlook Email Addresses Unless you're using Access 97, in which case I can probably dig out some code. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT-Outlook Email Addresses Date: 07/07/04 10:08 > > Hi Paul > > You can link to that as a table - just pick Exchange() or Outlook() as > tabletype in the dialog box where you choose which database to link > to. > > /gustav > > > > I want to create a connection to Outlook via Access or Visual Basic, > > and write to a table every email address in my Outlook Global > > Address List. > > How can I go about doing this ? > > > Thanks in advance. > > Paul Hartland > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Wed Jul 7 08:11:21 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 09:11:21 -0400 Subject: [AccessD] Re: Re: Message Message-ID: <107660-22004737131121784@M2W096.mail2web.com> I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From Stephen.Pickering at caremark.com Wed Jul 7 09:07:17 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Wed, 7 Jul 2004 09:07:17 -0500 Subject: [AccessD] Re: Re: Message Message-ID: <35C4AC5A5AFD9642833200159C2581560A69C5@s98026.psd.caremark.int> Don't do it! I believe it is one of the viruses (virii) going around. If you do download it, scan it first! I have seen this message structure many times, but I forget which virus it is. I deleted it. Steve -----Rocky's Original Message----- I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From mwp.reid at qub.ac.uk Wed Jul 7 10:11:26 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: 07 Jul 2004 15:11:26 +0000 Subject: [AccessD] Pass Throughs Message-ID: I am setting up a system I created on my machine at home. I am currently in the USA. Access 2000 - SQL Server 2000. Is there away to automatically change the properties of all Pass Through Queries to reflect the local set up rather than doing it manually?? The server name is different but other than that all other areas are fine? I saved the properties locally at home. Rocky - see you on Sunday (<: Of course any other suggestions comments welcome. Martin From CMackin at Quiznos.com Wed Jul 7 10:43:44 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 09:43:44 -0600 Subject: [AccessD] Pass Throughs Message-ID: Martin, You should be able to loop through the query defs and update the .Connect property of all your Pass-Thru's Here's something I wrote to handle this in the past, you'll want to examine the current .Connect property and modify as needed. The code below can be used to set to the "new" settings and also used to convert back to production settings: Sub QDFUpdating(blnSetToNew As Boolean) Dim db As DAO.Database Dim qdf As DAO.QueryDef Dim strConnect As String If blnSetToNew Then strConnect = "ODBC;DSN=AFD_SQL;DATABASE=AFD;Trusted_Connection=Yes" Else strConnect = "ODBC;DSN=AFDStoreData;DATABASE=MFD;Trusted_Connection=Yes" End If Set db = CurrentDb For Each qdf In db.QueryDefs If Left(qdf.Connect, 4) = "ODBC" Then qdf.Connect = strConnect Next qdf Set qdf = Nothing Set db = Nothing End Sub -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 9:11 AM To: Access Developers discussion and problem solving Subject: [AccessD] Pass Throughs I am setting up a system I created on my machine at home. I am currently in the USA. Access 2000 - SQL Server 2000. Is there away to automatically change the properties of all Pass Through Queries to reflect the local set up rather than doing it manually?? The server name is different but other than that all other areas are fine? I saved the properties locally at home. Rocky - see you on Sunday (<: Of course any other suggestions comments welcome. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jarus at amerinet-gpo.com Wed Jul 7 11:54:09 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 11:54:09 -0500 Subject: [AccessD] AXP and Word Message-ID: I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From Developer at UltraDNT.com Wed Jul 7 12:48:10 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 7 Jul 2004 13:48:10 -0400 Subject: [AccessD] AXP and Word In-Reply-To: Message-ID: <001201c4644a$94c06210$6401a8c0@COA3> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 7 14:02:54 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 7 Jul 2004 13:02:54 -0600 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <322590-220047371925494@christopherhawkins.com> I am in a special hell called Goldmine. I managed to get roped into a Goldmine customization project and it's just...disgusting. I don't know if the things I'm being asked to do simply can't be done in Goldmine, or if I just don't know how to do them. I've been all over the built-in documentation, Goldmine for Dummies, and the hacker's Guide to Goldmine. I'm lost and I need help. Does anyone have any experience with Goldmine customizations? -C- From jarus at amerinet-gpo.com Wed Jul 7 14:29:08 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 14:29:08 -0500 Subject: [AccessD] AXP and Word Message-ID: That was way too easy. Thank you so much. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> Developer at ultradnt.com 07/07/04 12:48PM >>> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lister at actuarial-files.com Wed Jul 7 14:39:55 2004 From: lister at actuarial-files.com (Ralf Lister) Date: Wed, 7 Jul 2004 15:39:55 -0400 Subject: [AccessD] Report Message-ID: <000801c4645a$57e7f4b0$e5bc3ac8@ralf> Hello, I have a table with some data sets. I want to print a report only with the data from the last data set. How can I achieve this that the report is not from all the data sets, just from the last. Saludos de Bolivia Ralf From CMackin at Quiznos.com Wed Jul 7 14:51:59 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 13:51:59 -0600 Subject: [AccessD] AXP and Word Message-ID: One correction though on references. THey do NOT default to ADO, they default to the reference that is listed higher in the reference list. So if youhave your DAO reference above your ADO reference all your recordset objects default to DAO. Regardless, always Dim your objects with the DAO or ADO prefix if there's any chance of Access needing to decide for you which one it is. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 1:29 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] AXP and Word That was way too easy. Thank you so much. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> Developer at ultradnt.com 07/07/04 12:48PM >>> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Wed Jul 7 15:11:04 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: 07 Jul 2004 20:11:04 +0000 Subject: [AccessD] Print Dialog Message-ID: Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin From jarus at amerinet-gpo.com Wed Jul 7 15:16:28 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 15:16:28 -0500 Subject: [AccessD] AXP and Word Automation - Next Question Message-ID: Now my code works except I'm getting a new Word document for each record. I want to run the records continuously within one document. I had set up a Word template with bookmarks for each field - but they are only good for one record. How do I get the Word template set up so that it will repeat the bookmarks within the same document for the next record OR is that even a possibility? Thanks to anyone for suggestions. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From mikedorism at adelphia.net Wed Jul 7 16:07:35 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 7 Jul 2004 17:07:35 -0400 Subject: [AccessD] Print Dialog In-Reply-To: Message-ID: <000001c46466$6dceaec0$cc0aa845@hargrove.internal> Why not just add the standard Print button to your toolbar? Once you have it in there, you will be able to change the ToolTip. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 4:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Wed Jul 7 16:16:42 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 15:16:42 -0600 Subject: [AccessD] Print Dialog Message-ID: Sure, If I understand you correctly, just set up a public sub like the following: Public Sub PrintIt docmd.RunCommand acCmdPrint End Sub Then in the Action properties of the toolbar object, set it to PrintIt, you can set the ToolTip and other properties as you see fit. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ 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 Jul 7 16:18:31 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 07:18:31 +1000 Subject: [AccessD] AXP and Word Automation - Next Question In-Reply-To: Message-ID: <40ECF547.9205.273D3E0@lexacorp.com.pg> On 7 Jul 2004 at 15:16, Terri Jarus wrote: > Now my code works except I'm getting a new Word document for each > record. Do you still have the Documents.Add in the same place as it was in the original code you posted? ie inside the DO..LOOP. If so, move it before the DO. > I want to run the records continuously within one document. I > had set up a Word template with bookmarks for each field - but they are > only good for one record. How do I get the Word template set up so that > it will repeat the bookmarks within the same document for the next > record OR is that even a possibility? > I'd guess that you need to create new bookmarks beyond the end of the current inserted content. How that will affect the formatting and you rtemplate is anyonees guess. Just as a matter of interest, why are you doing this rather than just creating a nicely formatted Access Report and outputting it as RTF? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From bchacc at san.rr.com Wed Jul 7 16:30:26 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 17:30:26 -0400 Subject: [AccessD] Re: Re: Message Message-ID: <130820-22004737213026503@M2W056.mail2web.com> Thanks for the heads up. Email is the only thing I'm really conservative about. Rocky Original Message: ----------------- From: Pickering, Stephen Stephen.Pickering at caremark.com Date: Wed, 07 Jul 2004 09:07:17 -0500 To: accessd at databaseadvisors.com Subject: RE: [AccessD] Re: Re: Message Don't do it! I believe it is one of the viruses (virii) going around. If you do download it, scan it first! I have seen this message structure many times, but I forget which virus it is. I deleted it. Steve -----Rocky's Original Message----- I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From my.lists at verizon.net Wed Jul 7 16:38:26 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 07 Jul 2004 14:38:26 -0700 Subject: [AccessD] Multi Forms Message-ID: <40EC6D52.8040801@verizon.net> http://members.iinet.net.au/~allenbrowne/ser-35.html I'd like to make this code more re-useable but i seem to be stuck at this line I thought I'd be able to pass a variable and then just set the new object as a new "form" object. Is this not possible? Set frm = New Form_frmClient wasn't there a thread not too long ago about multiforms? -- -Francisco From DWUTKA at marlow.com Wed Jul 7 16:40:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 7 Jul 2004 16:40:04 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D0@main2.marlow.com> A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew From bchacc at san.rr.com Wed Jul 7 16:47:15 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 17:47:15 -0400 Subject: [AccessD] Print Dialog Message-ID: <410-22004737214715335@M2W099.mail2web.com> Martin: Take a look at the custom toolbar I did for Br Tracks. Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 4:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From ssharkins at bellsouth.net Wed Jul 7 17:41:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jul 2004 18:41:42 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> I'm using a Recordset to populate a list box. When I open the form, the CompanyName and CustomerID fields are transposed in the actual control -- anybody have any clue why? Susan H. Private Sub Form_Load() 'Use Recordset as list box control 'record source. Dim rst As ADODB.Recordset Dim lst As Access.ListBox Set rst = New ADODB.Recordset Set lst = lstPhone rst.Open "SELECT CustomerID, CompanyName, " & _ "Phone, Fax FROM Customers", CurrentProject.Connection, _ adOpenStatic, adLockPessimistic Set lst.Recordset = rst End Sub From cfoust at infostatsystems.com Wed Jul 7 18:00:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 7 Jul 2004 16:00:15 -0700 Subject: [AccessD] Multi Forms Message-ID: Are you trying to open multiple instances of the same form, or what? Charlotte Foust -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, July 07, 2004 1:38 PM To: AccessD Subject: [AccessD] Multi Forms http://members.iinet.net.au/~allenbrowne/ser-35.html I'd like to make this code more re-useable but i seem to be stuck at this line I thought I'd be able to pass a variable and then just set the new object as a new "form" object. Is this not possible? Set frm = New Form_frmClient wasn't there a thread not too long ago about multiforms? -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jul 7 18:37:32 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 7 Jul 2004 18:37:32 -0500 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D7@main2.marlow.com> What version? We have an older version of Goldmine (I think 5.0) and we are just now upgrading to a newer version. If you ask me, I would rather have my gums scraped, then work in goldmine! LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 07, 2004 2:03 PM To: accessd at databaseadvisors.com Subject: [AccessD] OT: Goldmine customization know-how, anyone? I am in a special hell called Goldmine. I managed to get roped into a Goldmine customization project and it's just...disgusting. I don't know if the things I'm being asked to do simply can't be done in Goldmine, or if I just don't know how to do them. I've been all over the built-in documentation, Goldmine for Dummies, and the hacker's Guide to Goldmine. I'm lost and I need help. Does anyone have any experience with Goldmine customizations? -C- -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 7 21:39:44 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 7 Jul 2004 20:39:44 -0600 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <148530-2200474823944132@christopherhawkins.com> Version 6.5. And I hear you on the gum-scraping thing. Although I must say, if I can overcome my pathological hatred for Goldmine, there might be some money in specializing in it. There seems to be quite a cottage industry built around customizing Goldmine. -C- ---- Original Message ---- From: DWUTKA at marlow.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Date: Wed, 7 Jul 2004 18:37:32 -0500 >What version? We have an older version of Goldmine (I think 5.0) >and we are >just now upgrading to a newer version. If you ask me, I would >rather have >my gums scraped, then work in goldmine! LOL. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, July 07, 2004 2:03 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > >I am in a special hell called Goldmine. I managed to get roped into >a Goldmine customization project and it's just...disgusting. I don't >know if the things I'm being asked to do simply can't be done in >Goldmine, or if I just don't know how to do them. > >I've been all over the built-in documentation, Goldmine for Dummies, >and the hacker's Guide to Goldmine. I'm lost and I need help. > >Does anyone have any experience with Goldmine customizations? > >-C- > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > From michael.mattys at adelphia.net Wed Jul 7 22:19:40 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Wed, 7 Jul 2004 23:19:40 -0400 Subject: [AccessD] OT: Goldmine customization know-how, anyone? References: <148530-2200474823944132@christopherhawkins.com> Message-ID: <00c301c4649a$698128f0$6401a8c0@default> I converted a DBCams database to Goldmine 5. What a pain! Try this site: http://support.frontrange.com/freesupport/gm_techdocs.asp ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Wednesday, July 07, 2004 10:39 PM Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? > Version 6.5. > > And I hear you on the gum-scraping thing. Although I must say, if I > can overcome my pathological hatred for Goldmine, there might be some > money in specializing in it. There seems to be quite a cottage > industry built around customizing Goldmine. > > -C- > > > > ---- Original Message ---- > From: DWUTKA at marlow.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? > Date: Wed, 7 Jul 2004 18:37:32 -0500 > > >What version? We have an older version of Goldmine (I think 5.0) > >and we are > >just now upgrading to a newer version. If you ask me, I would > >rather have > >my gums scraped, then work in goldmine! LOL. > > > >Drew > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > >Hawkins > >Sent: Wednesday, July 07, 2004 2:03 PM > >To: accessd at databaseadvisors.com > >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > > > > >I am in a special hell called Goldmine. I managed to get roped into > >a Goldmine customization project and it's just...disgusting. I don't > >know if the things I'm being asked to do simply can't be done in > >Goldmine, or if I just don't know how to do them. > > > >I've been all over the built-in documentation, Goldmine for Dummies, > >and the hacker's Guide to Goldmine. I'm lost and I need help. > > > >Does anyone have any experience with Goldmine customizations? > > > >-C- > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >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 Wed Jul 7 22:25:10 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 7 Jul 2004 22:25:10 -0500 Subject: [AccessD] Table Relationships Layout Changed? Message-ID: <000001c4649b$2d5a5620$de1811d8@danwaters> I opened this window in the BE to add a couple of relationships and discovered that all the tables were neatly laid out in a grid pattern. I want my 60 tables back the way they were. What caused the layout to change? Thanks, Dan Waters From dwaters at usinternet.com Wed Jul 7 22:37:51 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 7 Jul 2004 22:37:51 -0500 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <28507438.1089240661410.JavaMail.root@sniper6.usinternet.com> Message-ID: <000a01c4649c$f2707ab0$de1811d8@danwaters> Susan, I would look at the listbox properties. How many columns does it say should be there? Which column is bound? Do any columns have their width set to 0? Also, try creating a query to populate the listbox. See if that gives the same or different results. You're using CurrentProject.Connection. Is this an '02 or '03 mdb? Do any of your lst variables actually start with the number one (1)? They sure are close. Just stuff to look at . . . Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, July 07, 2004 5:42 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Recordset object transposes field order I'm using a Recordset to populate a list box. When I open the form, the CompanyName and CustomerID fields are transposed in the actual control -- anybody have any clue why? Susan H. Private Sub Form_Load() 'Use Recordset as list box control 'record source. Dim rst As ADODB.Recordset Dim lst As Access.ListBox Set rst = New ADODB.Recordset Set lst = lstPhone rst.Open "SELECT CustomerID, CompanyName, " & _ "Phone, Fax FROM Customers", CurrentProject.Connection, _ adOpenStatic, adLockPessimistic Set lst.Recordset = rst End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Thu Jul 8 00:53:44 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 8 Jul 2004 15:53:44 +1000 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andy at minstersystems.co.uk Thu Jul 8 02:16:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 8 Jul 2004 08:16:19 +0100 Subject: [AccessD] Table Relationships Layout Changed? In-Reply-To: <000001c4649b$2d5a5620$de1811d8@danwaters> Message-ID: <007001c464bb$77544590$b274d0d5@minster33c3r25> Dan Don't know if it's the same thing but in my system the relationship plan is as I left it if I open it in the BE but in a grid as you describe it if I open it in the FE (with all tables linked of course), Could this be what's happening? -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 08 July 2004 04:25 > To: Database Advisors > Subject: [AccessD] Table Relationships Layout Changed? > > > I opened this window in the BE to add a couple of > relationships and discovered that all the tables were neatly > laid out in a grid pattern. I want my 60 tables back the way > they were. > > > > What caused the layout to change? > > > > Thanks, > > Dan Waters > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From accessd667 at yahoo.com Thu Jul 8 02:21:25 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 00:21:25 -0700 (PDT) Subject: [AccessD] Query problem Message-ID: <20040708072125.16259.qmail@web61110.mail.yahoo.com> Hi group, i've got a query problem. I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: Filename Field2, Field3, Field4, etc... "Filename1", blabla, blabla, blabla, blabla, "Filename2", blabla, blabla, blabla, blabla, "Filename3", blabla, blabla, blabla, blabla, I need a query that displays: "Filename1", blabla, blabla, blabla, blabla, Problem: All other fields have diff info for all records!! Any idea how to solve this? TIA VS --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From michael.broesdorf at web.de Thu Jul 8 03:59:22 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 10:59:22 +0200 Subject: [AccessD] KeyCode overview In-Reply-To: <007001c464bb$77544590$b274d0d5@minster33c3r25> Message-ID: Dear group, somehow I am not able to get this working: I would like to trap for pressing certain keys on a specific control on my form. The KeyDown-Event gives me the keycode, but that keycode does not match the ASCII-code of the character. E.g. the keycode for the left arrow is 37, but this is the % in ASCII. Is there an overview over those keycodes somewhere? The Access Help only seems to have a list of keycode constants. What I am trying to do is this: Select case keycode case 32 to 126 'These should be all normal printable letters, digits and special characters (such as /{( etc.) 'Do something case else end select Michael From gustav at cactus.dk Thu Jul 8 04:01:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:01:41 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> References: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> Message-ID: <446724299.20040708110141@cactus.dk> Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav > I'm using a Recordset to populate a list box. When I open the form, the > CompanyName and CustomerID fields are transposed in the actual control -- > anybody have any clue why? > Susan H. > Private Sub Form_Load() > 'Use Recordset as list box control > 'record source. > Dim rst As ADODB.Recordset > Dim lst As Access.ListBox > Set rst = New ADODB.Recordset > Set lst = lstPhone > rst.Open "SELECT CustomerID, CompanyName, " & _ > "Phone, Fax FROM Customers", CurrentProject.Connection, _ > adOpenStatic, adLockPessimistic > Set lst.Recordset = rst > End Sub From gustav at cactus.dk Thu Jul 8 04:05:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:05:52 +0200 Subject: [AccessD] KeyCode overview In-Reply-To: References: Message-ID: <1746974669.20040708110552@cactus.dk> Hi Michael Why not move the key handling to KeyPress? That uses the ascii values. /gustav > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > What I am trying to do is this: > Select case keycode > case 32 to 126 'These should be all normal printable letters, digits and > special characters (such as /{( etc.) > 'Do something > case else > end select > Michael From gustav at cactus.dk Thu Jul 8 04:10:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:10:32 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708072125.16259.qmail@web61110.mail.yahoo.com> References: <20040708072125.16259.qmail@web61110.mail.yahoo.com> Message-ID: <517255422.20040708111032@cactus.dk> Hi S > i've got a query problem. > I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: > Filename Field2, Field3, Field4, etc... > "Filename1", blabla, blabla, blabla, blabla, > "Filename2", blabla, blabla, blabla, blabla, > "Filename3", blabla, blabla, blabla, blabla, > I need a query that displays: > "Filename1", blabla, blabla, blabla, blabla, > Problem: All other fields have diff info for all records!! Well Select * From tblSD Where Filename = 'Filename1'; will do that. But that's too obvious. What are you trying to do? /gustav From accessd667 at yahoo.com Thu Jul 8 04:25:49 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 02:25:49 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <517255422.20040708111032@cactus.dk> Message-ID: <20040708092549.84645.qmail@web61109.mail.yahoo.com> Thanx Gustav! That's exactly what I need! Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! :-) there's a little bit of sarcasme in the above :-) I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: Customer Aug 03.xls Customer Sept 03.xls Expens Aug 03.xls Expens Sept 03.xls etc etc I want the query to return: Customer Expens This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( HTH Gustav Brock wrote: Hi S > i've got a query problem. > I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: > Filename Field2, Field3, Field4, etc... > "Filename1", blabla, blabla, blabla, blabla, > "Filename2", blabla, blabla, blabla, blabla, > "Filename3", blabla, blabla, blabla, blabla, > I need a query that displays: > "Filename1", blabla, blabla, blabla, blabla, > Problem: All other fields have diff info for all records!! Well Select * From tblSD Where Filename = 'Filename1'; will do that. But that's too obvious. What are you trying to do? /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! From stuart at lexacorp.com.pg Thu Jul 8 04:30:10 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 19:30:10 +1000 Subject: [AccessD] KeyCode overview In-Reply-To: References: <007001c464bb$77544590$b274d0d5@minster33c3r25> Message-ID: <40EDA0C2.13849.511A67C@lexacorp.com.pg> On 8 Jul 2004 at 10:59, Michael Brosdorf wrote: > Dear group, > > somehow I am not able to get this working: > > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > > What I am trying to do is this: > >From A2K Help: Keycode Constants The following constants can be used anywhere in your code in place of the actual values: Constant Value Description vbKeyLButton 0x1 Left mouse button vbKeyRButton 0x2 Right mouse button vbKeyCancel 0x3 CANCEL key vbKeyMButton 0x4 Middle mouse button vbKeyBack 0x8 BACKSPACE key vbKeyTab 0x9 TAB key vbKeyClear 0xC CLEAR key vbKeyReturn 0xD ENTER key vbKeyShift 0x10 SHIFT key vbKeyControl 0x11 CTRL key vbKeyMenu 0x12 MENU key vbKeyPause 0x13 PAUSE key vbKeyCapital 0x14 CAPS LOCK key vbKeyEscape 0x1B ESC key vbKeySpace 0x20 SPACEBAR key vbKeyPageUp 0x21 PAGE UP key vbKeyPageDown 0x22 PAGE DOWN key vbKeyEnd 0x23 END key vbKeyHome 0x24 HOME key vbKeyLeft 0x25 LEFT ARROW key vbKeyUp 0x26 UP ARROW key vbKeyRight 0x27 RIGHT ARROW key vbKeyDown 0x28 DOWN ARROW key vbKeySelect 0x29 SELECT key vbKeyPrint 0x2A PRINT SCREEN key vbKeyExecute 0x2B EXECUTE key vbKeySnapshot 0x2C SNAPSHOT key vbKeyInsert 0x2D INSERT key vbKeyDelete 0x2E DELETE key vbKeyHelp 0x2F HELP key vbKeyNumlock 0x90 NUM LOCK key The A key through the Z key are the same as the ASCII equivalents A ? Z: Constant Value Description vbKeyA 65 A key vbKeyB 66 B key vbKeyC 67 C key vbKeyD 68 D key vbKeyE 69 E key vbKeyF 70 F key vbKeyG 71 G key vbKeyH 72 H key vbKeyI 73 I key vbKeyJ 74 J key vbKeyK 75 K key vbKeyL 76 L key vbKeyM 77 M key vbKeyN 78 N key vbKeyO 79 O key vbKeyP 80 P key vbKeyQ 81 Q key vbKeyR 82 R key vbKeyS 83 S key vbKeyT 84 T key vbKeyU 85 U key vbKeyV 86 V key vbKeyW 87 W key vbKeyX 88 X key vbKeyY 89 Y key vbKeyZ 90 Z key The 0 key through 9 key are the same as their ASCII equivalents 0 ? 9: Constant Value Description vbKey0 48 0 key vbKey1 49 1 key vbKey2 50 2 key vbKey3 51 3 key vbKey4 52 4 key vbKey5 53 5 key vbKey6 54 6 key vbKey7 55 7 key vbKey8 56 8 key vbKey9 57 9 key The following constants represent keys on the numeric keypad: Constant Value Description vbKeyNumpad0 0x60 0 key vbKeyNumpad1 0x61 1 key vbKeyNumpad2 0x62 2 key vbKeyNumpad3 0x63 3 key vbKeyNumpad4 0x64 4 key vbKeyNumpad5 0x65 5 key vbKeyNumpad6 0x66 6 key vbKeyNumpad7 0x67 7 key vbKeyNumpad8 0x68 8 key vbKeyNumpad9 0x69 9 key vbKeyMultiply 0x6A MULTIPLICATION SIGN (*) key vbKeyAdd 0x6B PLUS SIGN (+) key vbKeySeparator 0x6C ENTER key vbKeySubtract 0x6D MINUS SIGN (?) key vbKeyDecimal 0x6E DECIMAL POINT (.) key vbKeyDivide 0x6F DIVISION SIGN (/) key The following constants represent function keys: Constant Value Description vbKeyF1 0x70 F1 key vbKeyF2 0x71 F2 key vbKeyF3 0x72 F3 key vbKeyF4 0x73 F4 key vbKeyF5 0x74 F5 key vbKeyF6 0x75 F6 key vbKeyF7 0x76 F7 key vbKeyF8 0x77 F8 key vbKeyF9 0x78 F9 key vbKeyF10 0x79 F10 key vbKeyF11 0x7A F11 key vbKeyF12 0x7B F12 key vbKeyF13 0x7C F13 key vbKeyF14 0x7D F14 key vbKeyF15 0x7E F15 key vbKeyF16 0x7F F16 key -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Thu Jul 8 05:09:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 12:09:17 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708092549.84645.qmail@web61109.mail.yahoo.com> References: <20040708092549.84645.qmail@web61109.mail.yahoo.com> Message-ID: <7610779660.20040708120917@cactus.dk> Hi Sander Well, you need the first word of the filename. Try selecting on Select Distinct Left([Filename], IIf(InStr([Filename]," ")=0, Len([Filename]), InStr([Filename], " ")-1)) As File From tblFiles; /gustav > Thanx Gustav! That's exactly what I need! > Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! > :-) there's a little bit of sarcasme in the above :-) > I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: > Customer Aug 03.xls > Customer Sept 03.xls > Expens Aug 03.xls > Expens Sept 03.xls > etc etc > I want the query to return: > Customer > Expens > This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( > HTH > Gustav Brock wrote: > Hi S >> i've got a query problem. >> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >> Filename Field2, Field3, Field4, etc... >> "Filename1", blabla, blabla, blabla, blabla, >> "Filename2", blabla, blabla, blabla, blabla, >> "Filename3", blabla, blabla, blabla, blabla, >> I need a query that displays: >> "Filename1", blabla, blabla, blabla, blabla, >> Problem: All other fields have diff info for all records!! > Well > Select * From tblSD Where Filename = 'Filename1'; > will do that. > But that's too obvious. What are you trying to do? > /gustav From accessd667 at yahoo.com Thu Jul 8 05:41:06 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 03:41:06 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <7610779660.20040708120917@cactus.dk> Message-ID: <20040708104106.99742.qmail@web61101.mail.yahoo.com> No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) It gets the first word, true but it didn't solve the problem. As mentioned before there are a lot of other fields that need to be displayed... A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. I'll have another look at it. Thanx anyway. Sander Gustav Brock wrote: Hi Sander Well, you need the first word of the filename. Try selecting on Select Distinct Left([Filename], IIf(InStr([Filename]," ")=0, Len([Filename]), InStr([Filename], " ")-1)) As File From tblFiles; /gustav > Thanx Gustav! That's exactly what I need! > Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! > :-) there's a little bit of sarcasme in the above :-) > I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: > Customer Aug 03.xls > Customer Sept 03.xls > Expens Aug 03.xls > Expens Sept 03.xls > etc etc > I want the query to return: > Customer > Expens > This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( > HTH > Gustav Brock wrote: > Hi S >> i've got a query problem. >> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >> Filename Field2, Field3, Field4, etc... >> "Filename1", blabla, blabla, blabla, blabla, >> "Filename2", blabla, blabla, blabla, blabla, >> "Filename3", blabla, blabla, blabla, blabla, >> I need a query that displays: >> "Filename1", blabla, blabla, blabla, blabla, >> Problem: All other fields have diff info for all records!! > Well > Select * From tblSD Where Filename = 'Filename1'; > will do that. > But that's too obvious. What are you trying to do? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail Address AutoComplete - You start. We finish. From michael.broesdorf at web.de Thu Jul 8 05:53:42 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 12:53:42 +0200 Subject: AW: [AccessD] KeyCode overview In-Reply-To: <1746974669.20040708110552@cactus.dk> Message-ID: Gustav, because I need to respond to some special keys as well (navigation keys etc.) Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Gustav Brock Gesendet: Donnerstag, 8. Juli 2004 11:06 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] KeyCode overview Hi Michael Why not move the key handling to KeyPress? That uses the ascii values. /gustav > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > What I am trying to do is this: > Select case keycode > case 32 to 126 'These should be all normal printable letters, digits and > special characters (such as /{( etc.) > 'Do something > case else > end select > Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Thu Jul 8 05:53:42 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 12:53:42 +0200 Subject: [AccessD] Grid-Controls In-Reply-To: <1746974669.20040708110552@cactus.dk> Message-ID: Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael From stuart at lexacorp.com.pg Thu Jul 8 06:18:18 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 21:18:18 +1000 Subject: [AccessD] Query problem In-Reply-To: <20040708104106.99742.qmail@web61101.mail.yahoo.com> References: <7610779660.20040708120917@cactus.dk> Message-ID: <40EDBA1A.29359.574A5BF@lexacorp.com.pg> On 8 Jul 2004 at 3:41, S D wrote: > No that didn't do the trick. The problem is I do NOT know the values! > So it's not just the first word (filename could be: customer01.xls, > customer02.xls) It gets the first word, true but it didn't solve the > problem. As mentioned before there are a lot of other fields that need > to be displayed... A real nasty one. I've got some SQL-guru's over here > looking at the problem. They've came up with the most exotic > things..none of them worked. I'll have another look at it. Thanx anyway. > Sander > In that case, strip it out to the first not alpha character rather than to the first space. Function Rootname(filename as string) as string dim loopcount as long dim strTest as String strTest = "ABCDEFGHUJKLMNOPQRSTUVWXYZ" filename = ucase$(filename) For loopcount = 1 to len(filename) if instr(strTest, mid$(filename, loopcount,1)) = 0 then Rootname = left$(filename, loopcount -1) exit for next End Function Select Distinct Rootname((Filename) From tblFiles; -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Thu Jul 8 06:24:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 13:24:35 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708104106.99742.qmail@web61101.mail.yahoo.com> References: <20040708104106.99742.qmail@web61101.mail.yahoo.com> Message-ID: <2715298618.20040708132435@cactus.dk> Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav From jarus at amerinet-gpo.com Thu Jul 8 06:40:23 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Thu, 08 Jul 2004 06:40:23 -0500 Subject: [AccessD] AXP and Word Automation - Next Question Message-ID: I had already moved the Documents. Add before the Do and then I get each record repeated at each existing bookmark - for example, for the bookmark Name, if I have 5 records, that bookmark would have a list of the 5 names. I'm exporting to Word because I am using Total Access Memo fields (ActiveX) which don't page correctly within an Access report. That add-in is really nice except for outputting the formatted data. I'm just struggling for the best/easiest solution. I keep trying both an Access report or a Word doc - and I get hung up with different issues in each one. Thanks for the help. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> stuart at lexacorp.com.pg 07/07/04 04:18PM >>> On 7 Jul 2004 at 15:16, Terri Jarus wrote: > Now my code works except I'm getting a new Word document for each > record. Do you still have the Documents.Add in the same place as it was in the original code you posted? ie inside the DO..LOOP. If so, move it before the DO. > I want to run the records continuously within one document. I > had set up a Word template with bookmarks for each field - but they are > only good for one record. How do I get the Word template set up so that > it will repeat the bookmarks within the same document for the next > record OR is that even a possibility? > I'd guess that you need to create new bookmarks beyond the end of the current inserted content. How that will affect the formatting and you rtemplate is anyonees guess. Just as a matter of interest, why are you doing this rather than just creating a nicely formatted Access Report and outputting it as RTF? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From dwaters at usinternet.com Thu Jul 8 07:13:12 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 8 Jul 2004 07:13:12 -0500 Subject: [AccessD] Table Relationships Layout Changed? In-Reply-To: <11688509.1089271400236.JavaMail.root@sniper2.usinternet.com> Message-ID: <000c01c464e4$f1365f50$de1811d8@danwaters> Ah Hah! I have opened the layout view in the FE so that's probably it. Thanks Andy! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Thursday, July 08, 2004 2:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Table Relationships Layout Changed? Dan Don't know if it's the same thing but in my system the relationship plan is as I left it if I open it in the BE but in a grid as you describe it if I open it in the FE (with all tables linked of course), Could this be what's happening? -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 08 July 2004 04:25 > To: Database Advisors > Subject: [AccessD] Table Relationships Layout Changed? > > > I opened this window in the BE to add a couple of > relationships and discovered that all the tables were neatly > laid out in a grid pattern. I want my 60 tables back the way > they were. > > > > What caused the layout to change? > > > > Thanks, > > Dan Waters > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd667 at yahoo.com Thu Jul 8 08:01:16 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:01:16 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <2715298618.20040708132435@cactus.dk> Message-ID: <20040708130116.68061.qmail@web61108.mail.yahoo.com> Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. From accessd667 at yahoo.com Thu Jul 8 08:08:14 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:08:14 -0700 (PDT) Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Message-ID: <20040708130814.52774.qmail@web61104.mail.yahoo.com> Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! From Mark.Mitsules at ngc.com Thu Jul 8 08:17:44 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 09:17:44 -0400 Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Message-ID: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 08:20:25 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:20:25 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <446724299.20040708110141@cactus.dk> Message-ID: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> Yes, this is correct -- why would that make this difference? Susan H. Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav From ssharkins at bellsouth.net Thu Jul 8 08:31:45 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:31:45 -0400 Subject: [AccessD] That SQL date catch again Message-ID: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. Susan H. From accessd667 at yahoo.com Thu Jul 8 08:37:52 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:37:52 -0700 (PDT) Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter for DoCmd.TransferText acImportDelim) In-Reply-To: Message-ID: <20040708133752.59023.qmail@web61104.mail.yahoo.com> Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From gustav at cactus.dk Thu Jul 8 08:39:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 15:39:26 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <1372151333.20040708153926@cactus.dk> Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav > Yes, this is correct -- why would that make this difference? > Susan H. > Hi Susan > Sounds like the listbox's ColumnHeads are set to True. > /gustav From paul.hartland at fsmail.net Thu Jul 8 08:41:49 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 8 Jul 2004 15:41:49 +0200 (CEST) Subject: [AccessD] Recordset object transposes field order Message-ID: <4871853.1089294109545.JavaMail.www@wwinf3001> When column heads are set to true it displays the field names, if set to false then only displays the records Paul Message date : Jul 08 2004, 02:21 PM >From : "Susan Harkins" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] Recordset object transposes field order Yes, this is correct -- why would that make this difference? Susan H. Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From ssharkins at bellsouth.net Thu Jul 8 08:42:30 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:42:30 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <1372151333.20040708153926@cactus.dk> Message-ID: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> Column Heads should simply display the column names in the first row -- not rearrange the columns. The SELECT statement retrieves Customary and Company Name -- in that order, but the list box displays Company Name first. That's what I meant by "transposed." Susan H. Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav From ssharkins at bellsouth.net Thu Jul 8 08:50:12 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:50:12 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <4871853.1089294109545.JavaMail.www@wwinf3001> Message-ID: <20040708135009.GUMX1779.imf22aec.mail.bellsouth.net@SUSANONE> Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul From gustav at cactus.dk Thu Jul 8 08:51:00 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 15:51:00 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <1312844960.20040708155100@cactus.dk> Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row -- not > rearrange the columns. The SELECT statement retrieves Customary and Company > Name -- in that order, but the list box displays Company Name first. That's > what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav From ssharkins at bellsouth.net Thu Jul 8 08:53:21 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:53:21 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <1312844960.20040708155100@cactus.dk> Message-ID: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ 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 Thu Jul 8 08:58:59 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 8 Jul 2004 14:58:59 +0100 Subject: [AccessD] Grid-Controls Message-ID: Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 09:04:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 16:04:36 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <433660874.20040708160436@cactus.dk> Hi Susan Is it related to which column of the listbox you bind? /gustav > Ordinary SELECT Gustav -- > "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" > Simple as pie. > But remember, I'm populating the list box via the Recordset property - - and > that's what seems to mess it up -- so whether it's some peculiar behavior of > the Recordset object, the property, or the list box I can't tell. > Susan H. > Hi Susan > Oh, sorry, missed that point. > I have no idea - never observed that. > What does your Select statement look like? "Select * .." or "Select Company, > Customary .." > /gustav >> Column Heads should simply display the column names in the first row >> -- not rearrange the columns. The SELECT statement retrieves Customary >> and Company Name -- in that order, but the list box displays Company >> Name first. That's what I meant by "transposed." >> Susan H. >> Hi Susan >> Ehh ... That's by design ... >> What else would you suggest a property of this name should address? >> /gustav From ssharkins at bellsouth.net Thu Jul 8 09:15:46 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:15:46 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <433660874.20040708160436@cactus.dk> Message-ID: <20040708141543.YXNY1781.imf25aec.mail.bellsouth.net@SUSANONE> The bound column is the first column -- CustomerID, which of course, screws things up. However, I set those properties manually when I created the list box. I guess I could force th issue by setting them programmatically when I load the form and populate the control -- but still doesn't explain why it happens. :( Susan H. Is it related to which column of the listbox you bind? /gustav > Ordinary SELECT Gustav -- > "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" > Simple as pie. > But remember, I'm populating the list box via the Recordset property - > - and that's what seems to mess it up -- so whether it's some peculiar > behavior of the Recordset object, the property, or the list box I can't tell. > Susan H. > Hi Susan > Oh, sorry, missed that point. > I have no idea - never observed that. > What does your Select statement look like? "Select * .." or "Select > Company, Customary .." > /gustav >> Column Heads should simply display the column names in the first row >> -- not rearrange the columns. The SELECT statement retrieves >> Customary and Company Name -- in that order, but the list box >> displays Company Name first. That's what I meant by "transposed." >> Susan H. >> Hi Susan >> Ehh ... That's by design ... >> What else would you suggest a property of this name should address? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 8 09:17:26 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Thu, 8 Jul 2004 10:17:26 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <66830-22004748141726666@M2W094.mail2web.com> Susan: A workaround I'd use would be to loop thorugh the recordset seting the fields into a string in the order you want separated by semicolons and then set the row source of the list box to that string. I do combo boxes that way. Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:42:30 -0400 To: accessd at databaseadvisors.com Subject: RE: [AccessD] Recordset object transposes field order Column Heads should simply display the column names in the first row -- not rearrange the columns. The SELECT statement retrieves Customary and Company Name -- in that order, but the list box displays Company Name first. That's what I meant by "transposed." Susan H. Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From bchacc at san.rr.com Thu Jul 8 09:23:24 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Thu, 8 Jul 2004 10:23:24 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <10450-22004748142324775@M2W039.mail2web.com> Susan: What would happen if you plugged your select statement in as the row source of the list box instead of going through recordset? Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:50:12 -0400 To: accessd at databaseadvisors.com Subject: RE: RE: [AccessD] Recordset object transposes field order Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From Jdemarco at hudsonhealthplan.org Thu Jul 8 09:36:55 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Thu, 8 Jul 2004 10:36:55 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC06@TTNEXCHSRV1.hshhp.com> Susan, Out of curiousity have you tried looping through the recordset Fields collection and printing out the field names to see what order they appear within the record set? HTH, Jim DeMarco -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, July 08, 2004 9:53 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Recordset object transposes field order Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From accessd at shaw.ca Thu Jul 8 09:35:14 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 08 Jul 2004 07:35:14 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0D0@main2.marlow.com> Message-ID: Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 09:50:30 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:50:30 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F99030FEC06@TTNEXCHSRV1.hshhp.com> Message-ID: <20040708145030.SLQK1775.imf19aec.mail.bellsouth.net@SUSANONE> Yes, the Recordset object is fine and in the expected order. Susan H. Susan, Out of curiousity have you tried looping through the recordset Fields collection and printing out the field names to see what order they appear within the record set? HTH, Jim DeMarco -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, July 08, 2004 9:53 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Recordset object transposes field order Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 09:51:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:51:49 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <66830-22004748141726666@M2W094.mail2web.com> Message-ID: <20040708145146.SMIQ1775.imf19aec.mail.bellsouth.net@SUSANONE> This was an exercise in something else -- I specifically wanted to use the Recordset property. I'm not stuck, I'm just curious now -- is this a real bug or some wad that I just don't know about -- or have I done something wrong? Just curious now. Susan H. Susan: A workaround I'd use would be to loop thorugh the recordset seting the fields into a string in the order you want separated by semicolons and then set the row source of the list box to that string. I do combo boxes that way. From ssharkins at bellsouth.net Thu Jul 8 09:52:46 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:52:46 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <10450-22004748142324775@M2W039.mail2web.com> Message-ID: <20040708145248.SMYM1775.imf19aec.mail.bellsouth.net@SUSANONE> The arrangement is correct and as expected. I haven't tested it with a combo or with other SELECT's yet -- I will when I have a bit of time. (Yeah... Right!) Susan H. Susan: What would happen if you plugged your select statement in as the row source of the list box instead of going through recordset? Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:50:12 -0400 To: accessd at databaseadvisors.com Subject: RE: RE: [AccessD] Recordset object transposes field order Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Thu Jul 8 09:59:42 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 16:59:42 +0200 Subject: AW: [AccessD] Grid-Controls In-Reply-To: Message-ID: Hi Richard, did you use the grid-in-grid-feature, where one grid is used as a combo box within another grid? I am having strange problems with this. Other then that, it works just fine! It can even be used as a bound control! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Griffiths, Richard Gesendet: Donnerstag, 8. Juli 2004 15:59 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Grid-Controls Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 8 10:10:04 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 11:10:04 -0400 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd .TransferText acImportDelim) Message-ID: While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ 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 Thu Jul 8 10:22:04 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 8 Jul 2004 16:22:04 +0100 Subject: [AccessD] Grid-Controls Message-ID: Hi Sorry, I have not used this functionality (what is the strange problem BTW) - the sample code that comes with it is usually a good reference point - also I have found their technical support via email quite good - in addition they have a user forum on their web site - may be worth posting a query there. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 16:00 To: Access Developers discussion and problem solving Subject: AW: [AccessD] Grid-Controls Hi Richard, did you use the grid-in-grid-feature, where one grid is used as a combo box within another grid? I am having strange problems with this. Other then that, it works just fine! It can even be used as a bound control! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Griffiths, Richard Gesendet: Donnerstag, 8. Juli 2004 15:59 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Grid-Controls Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 8 10:46:46 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jul 2004 10:46:46 -0500 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D9@main2.marlow.com> I'd rather keep my sanity, then make money in that industry! LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 07, 2004 9:40 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Version 6.5. And I hear you on the gum-scraping thing. Although I must say, if I can overcome my pathological hatred for Goldmine, there might be some money in specializing in it. There seems to be quite a cottage industry built around customizing Goldmine. -C- ---- Original Message ---- From: DWUTKA at marlow.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Date: Wed, 7 Jul 2004 18:37:32 -0500 >What version? We have an older version of Goldmine (I think 5.0) >and we are >just now upgrading to a newer version. If you ask me, I would >rather have >my gums scraped, then work in goldmine! LOL. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, July 07, 2004 2:03 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > >I am in a special hell called Goldmine. I managed to get roped into >a Goldmine customization project and it's just...disgusting. I don't >know if the things I'm being asked to do simply can't be done in >Goldmine, or if I just don't know how to do them. > >I've been all over the built-in documentation, Goldmine for Dummies, >and the hacker's Guide to Goldmine. I'm lost and I need help. > >Does anyone have any experience with Goldmine customizations? > >-C- > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joe.adair at lcbo.com Thu Jul 8 11:28:19 2004 From: joe.adair at lcbo.com (Adair, Joe) Date: Thu, 8 Jul 2004 12:28:19 -0400 Subject: [AccessD] Access and HTML Message-ID: You need to make your web pages a trusted site. It is easiest to just have everything on the Intranet server a trusted site. In Internet Explorer | Tools | Internet Options ... | Security | Trusted Sites | Trusted Sites | Sites ... | Uncheck "Require server verification (https:) for all sites in this zone." | In "Add this web site to the zone" enter http:// followed by the server name holding the .htm file | Add Note: if you want to use a drive letter in the address on your browser: For drive letter access, substitute http://ServerName, with file:DriveLetter: (EG: file:U:). You can have both http and drive letter access as trusted sites. From cfoust at infostatsystems.com Thu Jul 8 11:29:46 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:29:46 -0700 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Message-ID: Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Thu Jul 8 11:36:10 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:36:10 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: What openfilename command are you referring to? Show us the code. Charlotte Foust -----Original Message----- From: connie.kamrowski at agric.nsw.gov.au [mailto:connie.kamrowski at agric.nsw.gov.au] Sent: Wednesday, July 07, 2004 9:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at touchtelindia.net Thu Jul 8 11:35:17 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 8 Jul 2004 22:05:17 +0530 Subject: [AccessD] Autonumber in queries References: <003b01c463ec$f7a2cd90$b274d0d5@minster33c3r25> Message-ID: <002801c46509$b7dde460$081865cb@winxp> A word of caution! Incremental numbers based upon global variables are found to exhibit certain peculiarities when used in a query. Each navigational pass through such a calculated field, triggers a change in its value. If one experiments by moving up & down (keeping such a field selected), the displayed values keeps on increasing. The phenomenon is persistent, irrespective of the fact whether the select query is viewed directly or the results are displayed on a form using such a query as the record source. Under the circumstances, global variable approach is apparently best suited only to single pass action queries (e.g. append query), and NOT for display purposes (e.g. select query). Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 07, 2004 12:08 Subject: RE: [AccessD] Autonumber in queries Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > Does any one know how to add a column in a query that is an > autonumber column?> > > Thanks! > > Dale From martyconnelly at shaw.ca Thu Jul 8 11:41:21 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 08 Jul 2004 09:41:21 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 References: Message-ID: <40ED7931.6030102@shaw.ca> If you are just starting to work with VB.NET You can also download VS Net 2005 beta from here For Visual VB.net, C#, J#, C++, ASP.Net 2.0, WEBDev and SQL Server Express 2005 http://lab.msdn.microsoft.com/express/ Jim Lawrence (AccessD) wrote: >Hi Drew: > >Yes I do... Just send me that request off-line and I will send you an >address to the CD image. > >HTH >Jim > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >DWUTKA at marlow.com >Sent: Wednesday, July 07, 2004 2:40 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] VB.Net MSDN Disk 3 > > >A few weeks ago, someone posted a link that you could 'review' a few >training videos, and Microsoft would send you a free copy of VB.Net Standard >edition. (Sorry, don't remember who posted it....) > >I did that, and last week I got my installation CD's in the mail. >Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't >install the help files. Anyone have a copy of Disc 3? > >Drew >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Thu Jul 8 11:52:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:52:33 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: Aha, I just notice the difference in the subject and the body of your post. If you're talking about the API call, we use this and it works in A97 on XP: Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Thursday, July 08, 2004 8:36 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working What openfilename command are you referring to? Show us the code. Charlotte Foust -----Original Message----- From: connie.kamrowski at agric.nsw.gov.au [mailto:connie.kamrowski at agric.nsw.gov.au] Sent: Wednesday, July 07, 2004 9:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 8 12:00:56 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 13:00:56 -0400 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd. TransferText acImportDelim) Message-ID: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 8 12:19:12 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 08 Jul 2004 10:19:12 -0700 Subject: [AccessD] Multi Forms In-Reply-To: References: Message-ID: <40ED8210.5070906@verizon.net> Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco From jwcolby at colbyconsulting.com Thu Jul 8 12:26:44 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 13:26:44 -0400 Subject: [AccessD] Autonumber in queries In-Reply-To: <002801c46509$b7dde460$081865cb@winxp> Message-ID: <001601c46510$bdbe1650$0501a8c0@colbyws> Yes, functions are called every time a record is displayed. I doubt that (though I haven't tested) just clicking into the record would cause the change, but paging up / down or otherwise causing records to redisplay definitely will cause the function to be called again, once for each record redisplayed. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of A.D.Tejpal Sent: Thursday, July 08, 2004 12:35 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Autonumber in queries A word of caution! Incremental numbers based upon global variables are found to exhibit certain peculiarities when used in a query. Each navigational pass through such a calculated field, triggers a change in its value. If one experiments by moving up & down (keeping such a field selected), the displayed values keeps on increasing. The phenomenon is persistent, irrespective of the fact whether the select query is viewed directly or the results are displayed on a form using such a query as the record source. Under the circumstances, global variable approach is apparently best suited only to single pass action queries (e.g. append query), and NOT for display purposes (e.g. select query). Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 07, 2004 12:08 Subject: RE: [AccessD] Autonumber in queries Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > Does any one know how to add a column in a query that is an > autonumber column?> > > Thanks! > > Dale -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 12:28:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 19:28:22 +0200 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working In-Reply-To: References: Message-ID: <4610405662.20040708192822@cactus.dk> Hi Charlotte I'm having some problems with an old app and ComDlg32.ocx when the client purchases new machines with WinXP; thus I wish to switch to the dll. But isn't there a minor difference in the code to run on Win9x and the code to run un WinNT+? /gustav > Aha, I just notice the difference in the subject and the body of your > post. If you're talking about the API call, we use this and it works in > A97 on XP: > Declare Function GetOpenFileName Lib "comdlg32.dll" Alias > "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean > Charlotte Foust > -----Original Message----- > From: Charlotte Foust > Sent: Thursday, July 08, 2004 8:36 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working > What openfilename command are you referring to? Show us the code. > Charlotte Foust > -----Original Message----- > From: connie.kamrowski at agric.nsw.gov.au > [mailto:connie.kamrowski at agric.nsw.gov.au] > Sent: Wednesday, July 07, 2004 9:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working > I am having issues with an access97 database installed on XP. The > openfilename command does not appear to be working in XP and is halting > the import of records. It works fuine if I take it back to a 98 machine. > Do I need to reference the dll differently? > Is there a specific change I need to make to get the database to open > the file dialogue in XP? > thanks > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 8 13:24:29 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 14:24:29 -0400 Subject: [AccessD] Multi Forms In-Reply-To: <40ED8210.5070906@verizon.net> Message-ID: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Thu Jul 8 13:40:39 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 8 Jul 2004 14:40:39 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <027c01c4651b$10fc5070$6601a8c0@rock> Something else that you might want to look at is the query itself. I.e., you open the query, then transpose the fields, the query statement doesn't change, only the presentation does). Perhaps you did this accidentally at some point. Perhaps not, but it won't take long to check. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, July 08, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] That SQL date catch again I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 8 13:53:58 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 08 Jul 2004 11:53:58 -0700 Subject: [AccessD] Multi Forms In-Reply-To: <001d01c46518$cf3d2d50$0501a8c0@colbyws> References: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Message-ID: <40ED9846.6020507@verizon.net> awesome, i'll try it out and see how it works, (I was thinking of just using the same hWnd like the link I posted initially... I'll post back w/ my results :) jwcolby wrote On 7/8/2004 11:24 AM: >Actual working code. The key is that opening a form this way only keeps it >open as long as a pointer to the form remains in existence. Thus you have >to save the pointer in a collection to hold it open. The CLOSE of the form >MUST remove itself from the collection or the user will be able to close the >form but a pointer to it will remain, clogging up the works. > >I use a string in the caption as the key to the collection, thus the form >can look in it's caption to find the key to its pointer in the collection. > >Option Compare Database >Option Explicit > >Private colForms As Collection >Private blnFrmsInit As Boolean > >Function MyFormOpen(strFrmName As String, strInstanceName As String) >Dim frm As Form > > If blnFrmsInit = False Then > Set colForms = New Collection > blnFrmsInit = True > End If > Set frm = New Form_lfrmSpecialtyPreferences > frm.Caption = strInstanceName > colForms.Add frm, strInstanceName >End Function > >Function MyFormClose(strInstanceName As String) > colForms.Remove strInstanceName >End Function > >Hope this helps. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia >Sent: Thursday, July 08, 2004 1:19 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Multi Forms > > >Yup, but in my app, i'm going to have to open several instances of the >several forms, I don't want to write up this funciton for every one of >them... > >Charlotte Foust wrote On 7/7/2004 4:00 PM: > > > >>Are you trying to open multiple instances of the same form, or what? >> >>Charlotte Foust >> >>-----Original Message----- >>From: Francisco H Tapia [mailto:my.lists at verizon.net] >>Sent: Wednesday, July 07, 2004 1:38 PM >>To: AccessD >>Subject: [AccessD] Multi Forms >> >> >>http://members.iinet.net.au/~allenbrowne/ser-35.html >> >>I'd like to make this code more re-useable but i seem to be stuck at >>this line >> >>I thought I'd be able to pass a variable and then just set the new >>object as a new "form" object. Is this not possible? >> >> Set frm = New Form_frmClient >> >> >>wasn't there a thread not too long ago about multiforms? >> >> >> >> >> > > > > -- -Francisco From jwcolby at colbyconsulting.com Thu Jul 8 13:59:20 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 14:59:20 -0400 Subject: [AccessD] Multi Forms In-Reply-To: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Message-ID: <001e01c4651d$ad2003f0$0501a8c0@colbyws> I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 14:05:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 21:05:50 +0200 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <13616254522.20040708210550@cactus.dk> Hi Susan > I've heard you guys discuss the SQL behavior that uses the US standard for > date strings, which causes non-US developers trouble if they don't know > about it. > My question is: > Is this a problem only when passing a date "string" or is the same true if > you pass a date data type. I would think SQL should be able to process a > date value passed by a date data type correctly. > I haven't tested anything -- looking for a place to start. The issue exists when building SQL in code inserting one or more parameters as date/time. I guess this is what you are thinking of. For handling fields of date/time type I have experienced no problems. /gustav From ssharkins at bellsouth.net Thu Jul 8 14:56:27 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 15:56:27 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <027c01c4651b$10fc5070$6601a8c0@rock> Message-ID: <20040708195625.IDUS1781.imf25aec.mail.bellsouth.net@SUSANONE> This is just one of those areas where I know the problem is what I'm asking and how I'm asking it and I can't figure out how to ask the problem correctly. :( Susan H. Something else that you might want to look at is the query itself. I.e., you open the query, then transpose the fields, the query statement doesn't change, only the presentation does). Perhaps you did this accidentally at some point. Perhaps not, but it won't take long to check. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, July 08, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] That SQL date catch again I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. 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 ssharkins at bellsouth.net Thu Jul 8 14:58:12 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 15:58:12 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708195625.IDUS1781.imf25aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040708195809.IEZZ1781.imf25aec.mail.bellsouth.net@SUSANONE> Ask the problem... Barf... Susan H. This is just one of those areas where I know the problem is what I'm asking and how I'm asking it and I can't figure out how to ask the problem correctly. :( From ssharkins at bellsouth.net Thu Jul 8 15:15:59 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 16:15:59 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <13616254522.20040708210550@cactus.dk> Message-ID: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> The issue exists when building SQL in code inserting one or more parameters as date/time. I guess this is what you are thinking of. For handling fields of date/time type I have experienced no problems. ===============Yes, and I guess this gets me a tad closer. So, if I pass a date "string" via a SQL statement, I need to format it first. If I pass a date via a date data type, it should be OK. Is this correct? Susan H. From DWUTKA at marlow.com Thu Jul 8 15:24:43 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jul 2004 15:24:43 -0500 Subject: [AccessD] Query problem Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0E8@main2.marlow.com> It would be easier to do this in code, then in just a query. Is that an option? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Thursday, July 08, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query problem Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jul 8 15:46:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 13:46:00 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: Didn't 98 support the 32-bit API calls? In any case, the question was about 97 in WinXP, and what I posted definitely works there. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Thursday, July 08, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access97 DB in WinXP -getOpenfileName not working Hi Charlotte I'm having some problems with an old app and ComDlg32.ocx when the client purchases new machines with WinXP; thus I wish to switch to the dll. But isn't there a minor difference in the code to run on Win9x and the code to run un WinNT+? /gustav > Aha, I just notice the difference in the subject and the body of your > post. If you're talking about the API call, we use this and it works > in A97 on XP: > Declare Function GetOpenFileName Lib "comdlg32.dll" Alias > "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean > Charlotte Foust > -----Original Message----- > From: Charlotte Foust > Sent: Thursday, July 08, 2004 8:36 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working > What openfilename command are you referring to? Show us the code. > Charlotte Foust > -----Original Message----- > From: connie.kamrowski at agric.nsw.gov.au > [mailto:connie.kamrowski at agric.nsw.gov.au] > Sent: Wednesday, July 07, 2004 9:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working > I am having issues with an access97 database installed on XP. The > openfilename command does not appear to be working in XP and is halting > the import of records. It works fuine if I take it back to a 98 machine. > Do I need to reference the dll differently? > Is there a specific change I need to make to get the database to open > the file dialogue in XP? > thanks > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 8 15:49:47 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 13:49:47 -0700 Subject: [AccessD] Multi Forms Message-ID: If you use Set objFrm = Form_MyFormName, you automatically open an instance of the form object. Charlotte Foust -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 08, 2004 10:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Thu Jul 8 15:56:14 2004 From: pedro at plex.nl (Pedro Janssen) Date: Thu, 8 Jul 2004 22:56:14 +0200 Subject: [AccessD] db1, 2, 3 ........ Message-ID: <004f01c4652e$23c65d00$fcc581d5@pedro> Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen From cfoust at infostatsystems.com Thu Jul 8 16:01:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: [AccessD] db1, 2, 3 ........ Message-ID: Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 8 16:24:21 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 17:24:21 -0400 Subject: [AccessD] Multi Forms In-Reply-To: Message-ID: <001f01c46531$efd8c420$0501a8c0@colbyws> Yes, I know and used that in the code I provided. This is not the same as using the name of the form as shown in the form window however. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 08, 2004 4:50 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multi Forms If you use Set objFrm = Form_MyFormName, you automatically open an instance of the form object. Charlotte Foust -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 08, 2004 10:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jul 9 00:22:43 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Thu, 8 Jul 2004 23:22:43 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <308880-2200475952243512@christopherhawkins.com> It's been sooooo long since I did this. I'm looping through the fields in a tabledef object. What's the syntax to figure out if a field is the key field (or a key field)? -Christopher- From accessd667 at yahoo.com Fri Jul 9 01:43:37 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 23:43:37 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0E8@main2.marlow.com> Message-ID: <20040709064337.13414.qmail@web61101.mail.yahoo.com> Yep, that's what I'm going to do. Thnx DWUTKA at marlow.com wrote: It would be easier to do this in code, then in just a query. Is that an option? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Thursday, July 08, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query problem Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail Address AutoComplete - You start. We finish. From accessd667 at yahoo.com Fri Jul 9 01:50:26 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 23:50:26 -0700 (PDT) Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd. TransferText acImportDelim) In-Reply-To: Message-ID: <20040709065026.18953.qmail@web61105.mail.yahoo.com> Mark, Charlotte, thnx, but I cannot find this 'option' and 'import/export specs' thingy. Where did MS put this? Is it in A2K? Sander "Mitsules, Mark S. (Newport News)" wrote: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! From gustav at cactus.dk Fri Jul 9 01:43:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jul 2004 08:43:26 +0200 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> References: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: <611162882.20040709084326@cactus.dk> Hi Susan Yes. /gustav > The issue exists when building SQL in code inserting one or more parameters > as date/time. I guess this is what you are thinking of. > For handling fields of date/time type I have experienced no problems. > ===============Yes, and I guess this gets me a tad closer. So, if I pass a > date "string" via a SQL statement, I need to format it first. If I pass a > date via a date data type, it should be OK. Is this correct? > Susan H. From pedro at plex.nl Fri Jul 9 09:20:38 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Fri, 09 Jul 2004 09:20:38 (MET DST) Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <200407090720.i697Kc9l013829@mailhostC.plex.net> Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen From paul.hartland at fsmail.net Fri Jul 9 03:56:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jul 2004 10:56:21 +0200 (CEST) Subject: [AccessD] OT-Installing SQL Server 7.0 Message-ID: <32565368.1089363381429.JavaMail.www@wwinf3002> To all, I have a development server on which I used to run SQL Server 7.0 the server has Windows 2000 on it and was recently re-installed. I re-installed SQL Server 7.0 and now can?t connect to it. I?m sure I have installed as I have done before but must be missing something. Has anyone any ideas what it could be, or a site which can guide me through the whole setup process again. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jmoss111 at bellsouth.net Fri Jul 9 04:15:04 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Fri, 9 Jul 2004 04:15:04 -0500 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) In-Reply-To: <20040709065026.18953.qmail@web61105.mail.yahoo.com> Message-ID: Sander, >From the database where you are importing the import specs, click on File|Get External Data|Import| the file select dialog will pop up, select you file, which will open Import Objects window. Click Options >> button at bottom right, and the Import/Export Specs checkboix in the Import Group, and anything else that you care to import, and OK. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Friday, July 09, 2004 1:50 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Mark, Charlotte, thnx, but I cannot find this 'option' and 'import/export specs' thingy. Where did MS put this? Is it in A2K? Sander "Mitsules, Mark S. (Newport News)" wrote: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Fri Jul 9 08:52:56 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Fri, 9 Jul 2004 07:52:56 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: I forget the exact syntax, but I know one way to do it is to look at the Attributes of the field, if you look in help you should be able to find it. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Thursday, July 08, 2004 11:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] DAO: Find the key field in a tdf? It's been sooooo long since I did this. I'm looping through the fields in a tabledef object. What's the syntax to figure out if a field is the key field (or a key field)? -Christopher- -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 9 10:15:37 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 08:15:37 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ 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 Jul 9 10:59:08 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 9 Jul 2004 16:59:08 +0100 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <20040709155904.7F9D025091C@smtp.nildram.co.uk> In fact I think you have to look in the Indexes collection of the Tabledef and then look at its Fields property. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: 09/07/04 13:56 > > I forget the exact syntax, but I know one way to do it is to look at the Attributes of the field, if you look in help you should be able to find it. > > -Chris Mackin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Thursday, July 08, 2004 11:23 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] DAO: Find the key field in a tdf? > > > It's been sooooo long since I did this. > > I'm looping through the fields in a tabledef object. > > What's the syntax to figure out if a field is the key field (or a key > field)? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From Jim.Hale at FleetPride.com Fri Jul 9 11:16:19 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Fri, 9 Jul 2004 11:16:19 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 9 12:16:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 10:16:24 -0700 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) Message-ID: No, I haven't, not in any version of Access. What version or versions are you dealing with? Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Friday, July 09, 2004 8:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Fri Jul 9 12:19:28 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 9 Jul 2004 12:19:28 -0500 Subject: [AccessD] Multi Forms In-Reply-To: <001e01c4651d$ad2003f0$0501a8c0@colbyws> Message-ID: <00cd01c465d8$e4d14dc0$2a3ca8c0@TEXASSYSTEMS.COM> John, Francisco: >At any rate, I do not have the answer as to how to pass in the name of the >form and open it using the Set statement syntax. There is no clean way to do this that I have found. However, I have written a function that has the same effect: CreateFormInstance("frmExample") Will open up a new instance of frmExample. It is, of course, a Case statement that matches the form name to its class module. The nice thing is, I've written a companion routine, BuildFormList, that will automatically generate this Case statement for all forms in any Access database (A2K and above). If you are interested, contact me off-list for the code. -Ken From martyconnelly at shaw.ca Fri Jul 9 13:49:01 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jul 2004 11:49:01 -0700 Subject: [AccessD] QuickBooks Project... Anyone game? References: Message-ID: <40EEE89D.501@shaw.ca> Here is a very brief market survey on the use of quickbooks I haven't come across Sage/Best mentioned here. http://www.webcpa.com/WebCPA/index.cfm/txtFuse/dspShellContent/fuseAction/DISPLAY/numContentID/52991/numSiteID/12/numTaxonomyTypeID/10/numTaxonomyID/937.htm Robert Gracie wrote: >Christopher, > I'm glad you asked.....;-) When ever I hear, "Well I'm not sure how much I >can help, but count me in" type of statement it **Generally** means I really >can't help, but I would like to have access to the work.. For me at least, >this has been no easy task, and is requiring a major commitment of effort >trying to weed through the QB program model. > > You and John C. where the *only* two (I was looking for 5) who wanted to be >a part of the project with no "disclaimers", meaning serious and wanting to >put in the effort it is going to take to pull this off. > > So let me turn this around..... > Have you (and JC), downloaded and started reviewing the SDK in it's >entirety, and if so how far into the model are you? > > You know, since JC is like the equivilent of 3 programmers, I guess we do >have 5...;-) > >Robert Gracie >www.servicexp.com > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, June 23, 2004 10:17 PM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] QuickBooks Project... Anyone game? > > >You've had me, JC, Ken at least two others offer to join your >project. How much more serious help do you need? ;) > >-C- > >---- Original Message ---- >From: Subscriptions at servicexp.com >To: accessd at databaseadvisors.com, >Subject: RE: [AccessD] QuickBooks Project... Anyone game? >Date: Wed, 23 Jun 2004 21:16:50 -0400 > > > >>Ken, >>Bottom line, not enough **serious** interest here. I'm about 15-20 >>hours >>into my "QuickBooks Class Build", and it's going OK, not nearly as >>fast as I >>hoped but then again I'm just one guy.... >> >> >>Good Luck!! >> >> >>Robert Gracie >>www.servicexp.com >> >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Stoker >>Sent: Wednesday, June 23, 2004 7:51 PM >>To: 'Access Developers discussion and problem solving' >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >> >>I would like to be included as well. I don't know how much help I >>can be, >>but my partner and I just met with a potential new client and found >>out that >>they use Quickbooks for their inventory tracking. We are to put a >>proposal >>together that will integrate a revamped web site that will include a >>knowledgebase, online purchasing (which part will need to interact >>with >>Quickbooks) and some other options. After our first meeting, I >>quickly came >>back and grabbed the list of emails for this string from my deleted >>items so >>that I could see what everyone was saying. >> >>Thanks >> >>Ken >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby >>Sent: Friday, June 11, 2004 5:21 AM >>To: 'Access Developers discussion and problem solving' >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >>I'm in. I have a client right now jumping through hoops to do this. >> >>John W. Colby >>www.ColbyConsulting.com >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert >>Gracie >>Sent: Friday, June 11, 2004 7:35 AM >>To: Access Developers discussion and problem solving >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >> >>Christopher, >>I guess there are about 75 VB examples in the SDK (3.0). All of >>which are >>as seamless as the next as far as I have played with (there just a >>pain to >>work with). It is really easy to see this for yourself if you have >>QuickBooks 2002 or above.. >> >>The problem is, there are no (none that I can find at least) >>complete >>sophisticated solutions that are under 500.00. I have tried the >>coreObjX >>dll, but that thing is a nightmare to even get registered on the >>users >>machines (even their own install routine will not register 9 time >>out of >>10), the other (AcctSync) solutions I found is about 1K, so it's out >>of my >>price range. >> >>What I'm hoping (going) to build is a class based solution based on >>the >>QBFC. So in the end I will end up with a solution that will allow for >>portability, and very easy communications with QB. The solution will >>do all >>the "grunt" work under the hood automatically, and allow me to send >>and >>interpret QB requests very easily. >> >>It's not easy working with QB's API, and I would have like to made >>it an >>open source kind of thing, but I was hoping for at least 5 serious >>developers to join in. >> >> >>Robert Gracie >>www.servicexp.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >> > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > > -- Marty Connelly Victoria, B.C. Canada From pedro at plex.nl Fri Jul 9 14:11:59 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 9 Jul 2004 21:11:59 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ References: Message-ID: <005901c465e8$e1073320$f4c581d5@pedro> Hello Charlotte, wat do you mean by partially compiled state? When the db1 is a compacted copie of the original, its strange that the db1 is 74 Mb and the original is 8Mb? Pedro Janssen ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Friday, July 09, 2004 5:15 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > The db1.mdb, etc., files are compacted copies of the database that > couldn't be renamed, perhaps because the original couldn't be deleted > for some reason. If you're spawning those, then you probably aren't > actually compacting your database even though you may think you are. If > the database is in a partially compiled state (this is a VBA project > issue, not compact and repair), then that might be what is causing the > problem. Try turning off the autocompact and then using the decompile > switch to open the database and use the bypass key to avoid running any > code. Then close the database, reopen without the decompile switch but > using the bypass, and compile and save the VBA project. Then try > turning compact on exit back on and see if that cures the problem. > > Charlotte Foust > > -----Original Message----- > From: pedro at plex.nl [mailto:pedro at plex.nl] > Sent: Friday, July 09, 2004 1:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and > indeed its a permissions protected database. > So i can delete these db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the > fact that in this way the database several times a day wil be compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of > thing when the database attempted to compact but for some reason (often > permissions), it couldn't delete the original and rename the db1.mdb, > etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates > temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with > different filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Jim.Hale at FleetPride.com Fri Jul 9 14:28:24 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Fri, 9 Jul 2004 14:28:24 -0500 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD7D@corp-es01.fleetpride.com> 2000. It happens after maybe 20+ changes but is impossible to predict. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 12:16 PM To: Access Developers discussion and problem solving Subject: RE: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) No, I haven't, not in any version of Access. What version or versions are you dealing with? Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Friday, July 09, 2004 8:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Fri Jul 9 15:00:14 2004 From: JHewson at karta.com (Jim Hewson) Date: Fri, 9 Jul 2004 15:00:14 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E094@karta-exc-int.Karta.com> Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From chris at piasd.org Fri Jul 9 16:14:19 2004 From: chris at piasd.org (Chris Kettenbach) Date: Fri, 9 Jul 2004 14:14:19 -0700 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <2F7BA03C93D17D48B13C42228C8FDAF206D1D2@server.domain.local> What event are you calling the requery method from? Try the afterupdate event of the text box. Also maybe repaint or refresh the form. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Hewson Sent: Friday, July 09, 2004 1:00 PM To: AccessD Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From cfoust at infostatsystems.com Fri Jul 9 17:30:53 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 15:30:53 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: Starting with 2000, it is possible for the database to be partially compiled, which has a major effect on performance. Sometimes you'll make a change but the Compile option on the Debug menu in VBE will be grayed out. I was assuming that the db1 was the compacted copy, but it may not be. Since that is the default suggested for any new file, it could be something else entirely. When compact and repair can't complete, it just names its temporary files db1, db2, etc., starting with the next number after the highest already existing. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: Re: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, wat do you mean by partially compiled state? When the db1 is a compacted copie of the original, its strange that the db1 is 74 Mb and the original is 8Mb? Pedro Janssen ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Friday, July 09, 2004 5:15 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > The db1.mdb, etc., files are compacted copies of the database that > couldn't be renamed, perhaps because the original couldn't be deleted > for some reason. If you're spawning those, then you probably aren't > actually compacting your database even though you may think you are. > If the database is in a partially compiled state (this is a VBA > project issue, not compact and repair), then that might be what is > causing the problem. Try turning off the autocompact and then using > the decompile switch to open the database and use the bypass key to > avoid running any code. Then close the database, reopen without the > decompile switch but using the bypass, and compile and save the VBA > project. Then try turning compact on exit back on and see if that > cures the problem. > > Charlotte Foust > > -----Original Message----- > From: pedro at plex.nl [mailto:pedro at plex.nl] > Sent: Friday, July 09, 2004 1:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and > indeed its a permissions protected database. So i can delete these > db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the > fact that in this way the database several times a day wil be > compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of > thing when the database attempted to compact but for some reason > (often permissions), it couldn't delete the original and rename the > db1.mdb, etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates > temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each > with different filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 9 18:07:36 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jul 2004 16:07:36 -0700 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) References: <6A6AA9DF57E4F046BDA1E273BDDB677217FD7D@corp-es01.fleetpride.com> Message-ID: <40EF2538.3020307@shaw.ca> You may have the COMPILE ON DEMAND option turned on What happens is that when COMPILE ON DEMAND is checked, only as much code as is called gets compiled. This means modules containing external functions may get partially compiled. When you turn it off, a call to the external function will compile the entire module, not just the called function. This means that the compiling will be in fewer chunks, and that there will be less chance of fragmentation of the compiled code and less chance of something going wrong in managing that fragmentation. It means slower compiles if you turn off. You can force the code to compile by choosing Compile from the Debug menu (code window). You can allow Access to automatically compile your code as needed with Tools | Options | General | Compile On Demand. This is helpful in identifying problems in your code, such as a For statement that does not have a matching Next. You can discover whether the project is currently saved in a compiled state by entering this into the Immediate Window (Ctrl+G): ? IsCompiled() You should also try decompiling the front end, then compacting it, then compiling it. It is not at all uncommon to find that this process will reveal invalid code that a compile before the decompile did not reveal. That is, there is corrupt or invalid or uncompilable code in your app that was not showing up until you discarded all the compiled code and started over from scratch. For information about why this happens see: http://trigeminal.com/usenet/usenet004.asp?1033 Hale, Jim wrote: >2000. It happens after maybe 20+ changes but is impossible to predict. >Jim Hale > >-----Original Message----- >From: Charlotte Foust [mailto:cfoust at infostatsystems.com] >Sent: Friday, July 09, 2004 12:16 PM >To: Access Developers discussion and problem solving >Subject: RE: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 >....) > > >No, I haven't, not in any version of Access. What version or versions >are you dealing with? > >Charlotte Foust > >-----Original Message----- >From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] >Sent: Friday, July 09, 2004 8:16 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > > >Slightly different question- have you run into cases where after "x" >number of changes to code Access just decides not to run them, ie it >just executes the old code and completely ignores the new? It is >extremely annoying. The only cure I've found is to import everything >into a new database container. Jim Hale > >-----Original Message----- >From: Charlotte Foust [mailto:cfoust at infostatsystems.com] >Sent: Friday, July 09, 2004 10:16 AM >To: Access Developers discussion and problem solving >Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > > >The db1.mdb, etc., files are compacted copies of the database that >couldn't be renamed, perhaps because the original couldn't be deleted >for some reason. If you're spawning those, then you probably aren't >actually compacting your database even though you may think you are. If >the database is in a partially compiled state (this is a VBA project >issue, not compact and repair), then that might be what is causing the >problem. Try turning off the autocompact and then using the decompile >switch to open the database and use the bypass key to avoid running any >code. Then close the database, reopen without the decompile switch but >using the bypass, and compile and save the VBA project. Then try >turning compact on exit back on and see if that cures the problem. > >Charlotte Foust > >-----Original Message----- >From: pedro at plex.nl [mailto:pedro at plex.nl] >Sent: Friday, July 09, 2004 1:21 AM >To: AccessD at databaseadvisors.com >Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > >Hello Charlotte, > >i indeed have turned on Compile (compact and repair) after Exit, and >indeed its a permissions protected database. >So i can delete these db1.mdb etc without any troubles?? > >Another question: Is compiling after exit a good option, because the >fact that in this way the database several times a day wil be compacted. > >Pedro Janssen > > > > > >From: "Charlotte Foust" >To: "Access Developers discussion and problem solving" >Date: Thu, 8 Jul 2004 14:01:58 -0700 >Subject: RE: [AccessD] db1, 2, 3 ........ > >Do you have Compile on Exit turned on? I've usually seen that kind of >thing when the database attempted to compact but for some reason (often >permissions), it couldn't delete the original and rename the db1.mdb, >etc. > >Charlotte Foust > >-----Original Message----- >From: Pedro Janssen [mailto:pedro at plex.nl] >Sent: Thursday, July 08, 2004 12:56 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] db1, 2, 3 ........ > > >Hello Group, > >i have an front & backend mdb on a server. The front-end creates >temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with >different filesize. > >Why is this and why are these not deleted automatically? > >TIA > >Pedro Janssen > > > -- Marty Connelly Victoria, B.C. Canada From glen_mcwilliams at msn.com Fri Jul 9 19:37:14 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 09 Jul 2004 17:37:14 -0700 Subject: [AccessD] Recordset object transposes field order Message-ID: Susan Check the primary key index or filter on the table. Glen >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: RE: [AccessD] Recordset object transposes field order >Date: Thu, 8 Jul 2004 09:50:12 -0400 > >Right regarding Columm Heads, but that isn't the problem -- I think that >discussion came about just through a misunderstanding of the problem. > >The list box is rearranging the columns. Specifically, it's transposing the >first two columns. > >If I use a SELECT statement to populate the list box, the column order in >the list box is correct. If I use a Recordset object via the Recordset >property, the first two columns are flipflopped in the listbox. The >Recordset itself is fine -- order is correct -- I checked it. > >The list box seems to do the flipping -- and Column Heads isn't involved. I >just checked just to make sure and the order is wrong with Column Heads on >or off. > >Susan H. > >When column heads are set to true it displays the field names, if set to >false then only displays the records Paul > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jul 9 19:41:44 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 9 Jul 2004 18:41:44 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <225300-22004761004144621@christopherhawkins.com> Aaaaaah, yes. I think you're right. I'll go try it. -C- ---- Original Message ---- From: andy at minstersystems.co.uk To: accessd at databaseadvisors.com, Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: Fri, 9 Jul 2004 16:59:08 +0100 >In fact I think you have to look in the Indexes collection of the >Tabledef >and then look at its Fields property. >-- >Andy Lacey >http://www.minstersystems.co.uk > > > >--------- Original Message -------- >From: Access Developers discussion and problem solving > >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] DAO: Find the key field in a tdf? >Date: 09/07/04 13:56 > >> >> I forget the exact syntax, but I know one way to do it is to look >at the >Attributes of the field, if you look in help you should be able to >find it. >> >> -Chris Mackin >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >Christopher >> Hawkins >> Sent: Thursday, July 08, 2004 11:23 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] DAO: Find the key field in a tdf? >> >> >> It's been sooooo long since I did this. >> >> I'm looping through the fields in a tabledef object. >> >> What's the syntax to figure out if a field is the key field (or a >key >> field)? >> >> -Christopher- >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> >> >> >> >> > >________________________________________________ >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 ssharkins at bellsouth.net Fri Jul 9 20:14:09 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 9 Jul 2004 21:14:09 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: Message-ID: <20040710011407.ZWHV1742.imf17aec.mail.bellsouth.net@SUSANONE> No filter. There's a primary key on the CustomerID field and a Duplicates index on the CompanyName -- I deleted the index on CompanyName just to see what happened and it didn't make any difference. Susan H. Susan Check the primary key index or filter on the table. From jmhla at earthlink.net Sat Jul 10 01:21:51 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Fri, 9 Jul 2004 23:21:51 -0700 Subject: [AccessD] LA Conference Message-ID: <000001c46646$33a4f8d0$6501a8c0@delllaptop> Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net From jwcolby at colbyconsulting.com Sat Jul 10 06:43:25 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 07:43:25 -0400 Subject: [AccessD] DAO: Find the key field in a tdf? In-Reply-To: <225300-22004761004144621@christopherhawkins.com> Message-ID: <003f01c46673$1c7b95b0$0501a8c0@colbyws> Just remember that if the original developer used natural keys, there may be a multi-field key, thus several fields may be "the key field". John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Friday, July 09, 2004 8:42 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] DAO: Find the key field in a tdf? Aaaaaah, yes. I think you're right. I'll go try it. -C- ---- Original Message ---- From: andy at minstersystems.co.uk To: accessd at databaseadvisors.com, Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: Fri, 9 Jul 2004 16:59:08 +0100 >In fact I think you have to look in the Indexes collection of the >Tabledef >and then look at its Fields property. >-- >Andy Lacey >http://www.minstersystems.co.uk > > > >--------- Original Message -------- >From: Access Developers discussion and problem solving > >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] DAO: Find the key field in a tdf? >Date: 09/07/04 13:56 > >> >> I forget the exact syntax, but I know one way to do it is to look >at the >Attributes of the field, if you look in help you should be able to >find it. >> >> -Chris Mackin >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >Christopher >> Hawkins >> Sent: Thursday, July 08, 2004 11:23 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] DAO: Find the key field in a tdf? >> >> >> It's been sooooo long since I did this. >> >> I'm looping through the fields in a tabledef object. >> >> What's the syntax to figure out if a field is the key field (or a >key >> field)? >> >> -Christopher- >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> >> >> >> >> > >________________________________________________ >Message sent using UebiMiau 2.7.2 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jul 10 06:43:25 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 07:43:25 -0400 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E094@karta-exc-int.Karta.com> Message-ID: <003e01c46673$1c5c9c00$0501a8c0@colbyws> Is the event firing? Just because you have an event stub doesn't mean the event fires. You must have the event property of the control filled in. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Hewson Sent: Friday, July 09, 2004 4:00 PM To: AccessD Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From jwcolby at colbyconsulting.com Sat Jul 10 07:08:32 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 08:08:32 -0400 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <200407090720.i697Kc9l013829@mailhostC.plex.net> Message-ID: <004001c46676$9ecee5f0$0501a8c0@colbyws> Pedro, Just remember that if you run a split database, i.e. FE/BE, doing a compact on exit will only compact the FE, not the BE. Compacting the FE may not even be necessary depending on whether you get a new copy daily (as I do) or what you do with the FE. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of pedro at plex.nl Sent: Friday, July 09, 2004 9:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jul 10 07:08:32 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 08:08:32 -0400 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Message-ID: <004101c46676$9f298910$0501a8c0@colbyws> Sounds like a decompile / compact / repair is in order. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 12:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Sat Jul 10 08:49:41 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Sat, 10 Jul 2004 09:49:41 -0400 Subject: [AccessD] LA Conference Message-ID: <78130-220047610134941845@M2W047.mail2web.com> Still souds like a good idea to me Joe. Even if it's just a day. I could present my Chinese translation project. Nothing groundbreaking but it might be useful to somebody. Rocky Original Message: ----------------- From: Joe Hecht jmhla at earthlink.net Date: Fri, 09 Jul 2004 23:21:51 -0700 To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com Subject: [AccessD] LA Conference Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From bchacc at san.rr.com Sat Jul 10 08:50:43 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Sat, 10 Jul 2004 09:50:43 -0400 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <39290-220047610135043793@M2W046.mail2web.com> Jim: Didi you set a breakpoint on the second one to see if the code is actually being executed? Rocky Original Message: ----------------- From: Jim Hewson JHewson at karta.com Date: Fri, 09 Jul 2004 15:00:14 -0500 To: accessD at databaseadvisors.com Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From jmhla at earthlink.net Sat Jul 10 11:08:44 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Sat, 10 Jul 2004 09:08:44 -0700 (GMT-07:00) Subject: [AccessD] LA Conference Message-ID: <22442942.1089475725924.JavaMail.root@fozzie.psp.pas.earthlink.net> you were the only clear for the 8/14. Maybe in the fall -----Original Message----- From: "bchacc at san.rr.com" Sent: Jul 10, 2004 6:49 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] LA Conference Still souds like a good idea to me Joe. Even if it's just a day. I could present my Chinese translation project. Nothing groundbreaking but it might be useful to somebody. Rocky Original Message: ----------------- From: Joe Hecht jmhla at earthlink.net Date: Fri, 09 Jul 2004 23:21:51 -0700 To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com Subject: [AccessD] LA Conference Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 13:12:41 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:12:41 -0400 Subject: [AccessD] exiting Access Message-ID: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. From jwcolby at colbyconsulting.com Sat Jul 10 13:31:21 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 14:31:21 -0400 Subject: [AccessD] exiting Access In-Reply-To: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: <004201c466ac$19472ec0$0501a8c0@colbyws> The only way I know of is to load a form, and in the form's Close event check a boolean. Cancel the close if the boolean is not set. Have a button set the boolean and close the app. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 2:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Sat Jul 10 13:35:14 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:35:14 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29874954.1089483461888.JavaMail.root@sniper4.usinternet.com> Message-ID: <000001c466ac$a45309d0$de1811d8@danwaters> Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 13:37:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:37:01 -0400 Subject: [AccessD] exiting Access In-Reply-To: <004201c466ac$19472ec0$0501a8c0@colbyws> Message-ID: <20040710183700.QECM1779.imf22aec.mail.bellsouth.net@SUSANONE> The user can still close the application at any time -- the user isn't forced to use the form to close. I can disable the Exit command on the File menu -- but can't figure out how to inhibit the Close button on the application's title bar. I'm pretty sure I've done so before, but dang if I can remember how. :( Susan H. The only way I know of is to load a form, and in the form's Close event check a boolean. Cancel the close if the boolean is not set. Have a button set the boolean and close the app. From ssharkins at bellsouth.net Sat Jul 10 13:39:33 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:39:33 -0400 Subject: [AccessD] exiting Access In-Reply-To: <000001c466ac$a45309d0$de1811d8@danwaters> Message-ID: <20040710183931.QEUV1779.imf22aec.mail.bellsouth.net@SUSANONE> OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 dwaters at usinternet.com Sat Jul 10 13:49:56 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:49:56 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29297778.1089484948147.JavaMail.root@sniper2.usinternet.com> Message-ID: <000101c466ae$b2974fe0$de1811d8@danwaters> How about an invisible form which contains the code in the Unload event? Open it by code when the app is first opened, and that should take care of things! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] exiting Access OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 ssharkins at bellsouth.net Sat Jul 10 13:53:08 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:53:08 -0400 Subject: [AccessD] exiting Access In-Reply-To: <000101c466ae$b2974fe0$de1811d8@danwaters> Message-ID: <20040710185306.QIOY1779.imf22aec.mail.bellsouth.net@SUSANONE> Yes, that would work -- thank you for the idea. You'd think this would be easier. Susan H. How about an invisible form which contains the code in the Unload event? Open it by code when the app is first opened, and that should take care of things! Dan From dwaters at usinternet.com Sat Jul 10 13:53:26 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:53:26 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29297778.1089484948147.JavaMail.root@sniper2.usinternet.com> Message-ID: <000201c466af$2f071600$de1811d8@danwaters> One other thing! This will prevent you from doing a manually initiated repair/compact. What I do is have a button titled "Allow Compact/Repair" which resets GblnAllowClose to True. Then the user can Compact/Repair themselves. If you're using Compact On Close, you won't need to have an "Allow Compact/Repair" button. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] exiting Access OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 accessd at shaw.ca Sat Jul 10 14:03:51 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 10 Jul 2004 12:03:51 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Message-ID: Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 10 14:15:55 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 10 Jul 2004 15:15:55 -0400 Subject: [AccessD] exiting Access In-Reply-To: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: It isn't simple, but it isn't that hard either. See: http://support.microsoft.com/default.aspx?scid=kb;en-us;300688&Product=acc20 03 Steve Goodhall www.goodhall.info/steve There is nothing more difficult to take in hand, more perilous to conduct, or more uncertain in its success, than to take the lead in the introduction of a new order of things. Niccolo Machiavelli The Prince [1532], ch.6 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 2:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 14:23:13 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 15:23:13 -0400 Subject: [AccessD] exiting Access In-Reply-To: Message-ID: <20040710192311.NKKA1776.imf21aec.mail.bellsouth.net@SUSANONE> Thanks Steve -- that's all I'm turning up too -- I really thought I'd just flipped a switch on this somewhere in the long ago past, but I'm just confused. ;) Susan H. It isn't simple, but it isn't that hard either. See: http://support.microsoft.com/default.aspx?scid=kb;en-us;300688&Product=acc20 03 Steve Goodhall www.goodhall.info/steve There is nothing more difficult to take in hand, more perilous to conduct, or more uncertain in its success, than to take the lead in the introduction of a new order of things. Niccolo Machiavelli The Prince [1532], ch.6 From bchacc at san.rr.com Sat Jul 10 21:43:42 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 19:43:42 -0700 Subject: [AccessD] Re: Re: Message References: <200407042301.i64N18Q29000@databaseadvisors.com> Message-ID: <019501c466f0$e10cc070$6601a8c0@HAL9002> Finally got home to where I could view an attachment but...no attachment. What was it? Rocky ----- Original Message ----- From: To: Sent: Sunday, July 04, 2004 3:53 PM Subject: [AccessD] Re: Re: Message > Please have a look at the attached file. > ---------------------------------------------------------------------------- ---- > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Sat Jul 10 21:44:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 19:44:20 -0700 Subject: [AccessD] LA Conference References: <22442942.1089475725924.JavaMail.root@fozzie.psp.pas.earthlink.net> Message-ID: <01a901c466f0$f7b7d260$6601a8c0@HAL9002> Standing by... ----- Original Message ----- From: To: "Access Developers discussion and problem solving" Sent: Saturday, July 10, 2004 9:08 AM Subject: RE: [AccessD] LA Conference > you were the only clear for the 8/14. Maybe in the fall > > -----Original Message----- > From: "bchacc at san.rr.com" > Sent: Jul 10, 2004 6:49 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] LA Conference > > > Still souds like a good idea to me Joe. Even if it's just a day. I could > present my Chinese translation project. Nothing groundbreaking but it > might be useful to somebody. > > Rocky > > Original Message: > ----------------- > From: Joe Hecht jmhla at earthlink.net > Date: Fri, 09 Jul 2004 23:21:51 -0700 > To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com > Subject: [AccessD] LA Conference > > > Do to lack of interest the get together I was offering to host is off until > at least September or October. > > > > I am still willing to try to organize it but is the west coast folks up for > another get together? > > > > > > JOE HECHT > > LOS ANGELES CA > > jmhla at earthlink.net > > > > > > -------------------------------------------------------------------- > mail2web - Check your email from the web at > http://mail2web.com/ . > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jul 10 22:37:13 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 11 Jul 2004 13:37:13 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <019501c466f0$e10cc070$6601a8c0@HAL9002> Message-ID: <40F14289.18039.13418A18@lexacorp.com.pg> On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > Finally got home to where I could view an attachment but...no attachment. > What was it? > A virus -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From bchacc at san.rr.com Sat Jul 10 23:23:37 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 21:23:37 -0700 Subject: [AccessD] Re: Re: Message References: <40F14289.18039.13418A18@lexacorp.com.pg> Message-ID: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Ack! Which one? How'd it get by your AV software? Rocky ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Saturday, July 10, 2004 8:37 PM Subject: Re: [AccessD] Re: Re: Message > On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > > > Finally got home to where I could view an attachment but...no attachment. > > What was it? > > > A virus > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sun Jul 11 04:14:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 11 Jul 2004 19:14:09 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Message-ID: <40F19181.14060.12755C6@lexacorp.com.pg> On 10 Jul 2004 at 21:23, Rocky Smolin - Beach Access S wrote: > Ack! Which one? How'd it get by your AV software? > > Rocky No idea now which one it was. I deleted the original message when it came in. It didn't get by my AV software. I've no idea where it came from, but it went to everyone on the list. > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problem solving" > > Sent: Saturday, July 10, 2004 8:37 PM > Subject: Re: [AccessD] Re: Re: Message > > > > On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > > > > > Finally got home to where I could view an attachment but...no > attachment. > > > What was it? > > > > > A virus > > > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From carbonnb at sympatico.ca Sun Jul 11 08:56:37 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sun, 11 Jul 2004 09:56:37 -0400 Subject: [AccessD] Re: Re: Message In-Reply-To: <40F19181.14060.12755C6@lexacorp.com.pg> References: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Message-ID: <40F10ED5.28690.133038@localhost> On 11 Jul 2004 at 19:14, Stuart McLachlan wrote: > On 10 Jul 2004 at 21:23, Rocky Smolin - Beach Access S wrote: > > > Ack! Which one? How'd it get by your AV software? > > > > Rocky > > No idea now which one it was. I deleted the original message when it > came in. It didn't get by my AV software. I've no idea where it came > from, but it went to everyone on the list. There was no payload with this message. The list software strips attachments, so it got past because the AV didn't see the payload (which wasn't there) IOW, *this* one was safe, -- Bryan Carbonnell - carbonnb at sympatico.ca Don't take life too seriously. You won't get out alive. From stuart at lexacorp.com.pg Sun Jul 11 10:06:44 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 12 Jul 2004 01:06:44 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <40F10ED5.28690.133038@localhost> References: <40F19181.14060.12755C6@lexacorp.com.pg> Message-ID: <40F1E424.11363.26A2107@lexacorp.com.pg> On 11 Jul 2004 at 9:56, Bryan Carbonnell wrote: > > There was no payload with this message. The list software strips > attachments, so it got past because the AV didn't see the payload > (which wasn't there) > > IOW, *this* one was safe, > And of course, since you and I both use Pegasus Mail, we were safe anyway unless we were really stupid :-) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From starkey at wanadoo.nl Sun Jul 11 11:14:03 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:14:03 +0200 Subject: [AccessD] Need ADO ADP help Message-ID: <20040711160316.18DFD53B04@smtp4.wanadoo.nl> Hi all, I hope someone on this list will be able to help me get on my way again.. I want to make use of an application role for security reasons and not having to grant permissions for every user on SQL Server 2000. My environment: Access 2003 SQL Server 2000 MDAC 2.8 JET 4 latest version/update Busy playing with ADO and unbound forms/datasheets still being updatable... I was doing pretty well using an Access MDB until I found out that I would not be able to use ADO as a recordset source for reports unless I'd make use of an ADP instead. So ohwell let's build an ADP, imported all the objects from the MDB and before even trying to get the reports to work I stumbled into another problem... the code used in my MDB enabling updatable recordset etc... worked but in the ADP the sets were no longer updatable?! I have been playing around with a connected ADP and a disconnected ADP, making use of the project.connection property etc. however it seems that I can't figure out what conditions to meet when binding a form/datasheet to an ADO recordset and still be updatable. The code I have been using in my MDB: (References: - ADO 2.8 - DAO 3.6) Connecting and authorising Set oConn = New ADODB.Connection oConn.Open "Provider=SQLOLEDB;Data Source=PC1;Initial Catalog=EBNinfo;Integrated Security=SSPI" oConn.Execute "EXEC sp_setapprole 'AppRoleName', {Encrypt N 'mypassword'}, 'ODBC' " Binding the form Dim rs As New ADODB.Recordset With rs Set .ActiveConnection = oConn .Source = "SELECT * FROM stamCluster" .LockType = adLockOptimistic .CursorType = adOpenKeyset .CursorLocation = adUseClient .Open End With Set Me.Recordset = rs rs.Close So, this worked fine in my MDB but the ADP refuses to have my dataset updatable.... sigh I hope someone ran into this behaviour before or at least knows either a work-around or another syntax which would do the trick. I know there are other way than using an application role but as for know I prefer this solution... Once I am able to get my forms/reports/comboboxes to work using ADO recordsets all's well:-) Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. Regards and TIA, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:03 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Sun Jul 11 11:14:40 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:14:40 +0200 Subject: [AccessD] Got it! Message-ID: <20040711160353.0BE1F52AB6@smtp4.wanadoo.nl> Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. From ssharkins at bellsouth.net Sun Jul 11 11:07:52 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 12:07:52 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711160316.18DFD53B04@smtp4.wanadoo.nl> Message-ID: <20040711160749.KNXV1776.imf21aec.mail.bellsouth.net@SUSANONE> Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub From starkey at wanadoo.nl Sun Jul 11 11:31:59 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:31:59 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711160749.KNXV1776.imf21aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711162112.22EDF53EBD@smtp4.wanadoo.nl> Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. From ssharkins at bellsouth.net Sun Jul 11 11:30:09 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 12:30:09 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711162112.22EDF53EBD@smtp4.wanadoo.nl> Message-ID: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Sun Jul 11 12:32:06 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 19:32:06 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711172118.518A14DD93@smtp4.wanadoo.nl> Susan, that's what makes it a little frustrating, it looks like MS is having a lot of trouble making Access fully ADO compatible if you look at all the updates (access mdac jet etc). Now it is not said that this whitepaper of 2002 also applies to 2003 I would think not totally though the 'error' message is the same. Maybe there's a way different from what I've been using but to be honest I think I'll have to try something else.. I thought the use of this application role was best suited but now more and more obstacles are getting in my way as I walk down this ADO path:-) Thanks for your reply Susan, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:30 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 19:32:05 avast! auteursrecht (c) 2000-2004 ALWIL Software. From artful at rogers.com Sun Jul 11 14:25:49 2004 From: artful at rogers.com (Arthur Fuller) Date: Sun, 11 Jul 2004 15:25:49 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: <039a01c4677c$df938850$6601a8c0@rock> Just out of curiosity, what is/are the advantage(s) of using a recordset rather than a query or a bound form? I've been reading this thread sporadically, but have never used a recordset for either a form or a report. What significant powers am I missing due to this ignorance? So do you do this because it's difficult or impossible to create a query that does the same thing? TIA, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, July 11, 2004 12:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * >From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jul 11 15:29:20 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 16:29:20 -0400 Subject: [AccessD] Got it! In-Reply-To: <20040711160353.0BE1F52AB6@smtp4.wanadoo.nl> Message-ID: <20040711202918.HSGT1775.imf19aec.mail.bellsouth.net@SUSANONE> >From Help -- not sure if this answers your question or not. I've been reviewing the differences between Connection and AccessConnection myself this afternoon. Susan H. The AccessConnection property returns an ADO connection that uses two OLE DB providers. It uses the Microsoft OLE DB Provider for Microsoft Jet (Microsoft.Jet.OLEDB.4.0) as the data provider and the Microsoft OLE DB Provider for Microsoft Access 10 (Microsoft.Access.OLEDB.10.0) as the service provider. You should use the AccessConnection property if you intend to create ADO recordsets that will be bound to Access forms. The form will not be updateable unless it is created by using the OLE DB Provider for Microsoft Access 10, even if the recordset is updateable in ADO. Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Sun Jul 11 15:45:41 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 22:45:41 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <039a01c4677c$df938850$6601a8c0@rock> Message-ID: <20040711203503.AC0325A995@smtp8.wanadoo.nl> Hi Arthur, Well for starters I am playing around with ADO and application roles and trying to figure out what I can use best when not wanting users to have permissions on a SQL Server database except the one to connect to a certain database. This can be accomplished by using an application role. It would also be possible to use DAO but ADO is a bit more enhanced though DAO is optimized for Access, ohwell:-) Here's an interesting link about application roles and SQL Server combined with Access: http://www.winnetmag.com/SQLServer/Articles/ArticleID/20534/pg/1/1.html There is no real difference with queries/tables as a recordsource since the use a recordset makes the form bound the way you are familiar with. I just found out that reports in an MDB do not support the ADO recordset binding (haven't tried DAO yet) so ohwell:-) ADP is another option I have and should do the trick though I haven't got it running yet. What makes it all a bit nasty is all the versions and different techniques to get the job done... So much for plain and simple:-) Recordset advantages can be... Unless you use a pass-through query, networkload and performance. Less Server-connections if you make use of 'disconnected' recordsets. On the other hand, I think that pass-through queries do not work with subforms... Not sure if a recordset will but I haven't read about this yet or tried this. The thing is I'd like to work as much unbound as possible and as secure as possible and have little SQL server user maintenance. I'd advise you to start sniffing around a little since I haven't got that much experience myself yet and it's a pretty big workfield to explore. Having DotNet as the next generation platform and thin clients etc... ADO knowledge will be necessary and I am running a bit behind:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Arthur Fuller Verzonden: zondag 11 juli 2004 21:26 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Just out of curiosity, what is/are the advantage(s) of using a recordset rather than a query or a bound form? I've been reading this thread sporadically, but have never used a recordset for either a form or a report. What significant powers am I missing due to this ignorance? So do you do this because it's difficult or impossible to create a query that does the same thing? TIA, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, July 11, 2004 12:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * >From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 22:45:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Sun Jul 11 15:51:56 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 22:51:56 +0200 Subject: [AccessD] Got it! In-Reply-To: <20040711202918.HSGT1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711204118.9950E5A8BC@smtp8.wanadoo.nl> Hi Susan, I've read this part also and to be honest... There seem to be so many exceptions with ADO (MDB/ADP) having so many connect options and providers, not to mention known ADO bugs etc... I was already happy I got it to work (again):-) Maybe DAO would be easier?:-) -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 22:29 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Got it! >From Help -- not sure if this answers your question or not. I've been reviewing the differences between Connection and AccessConnection myself this afternoon. Susan H. The AccessConnection property returns an ADO connection that uses two OLE DB providers. It uses the Microsoft OLE DB Provider for Microsoft Jet (Microsoft.Jet.OLEDB.4.0) as the data provider and the Microsoft OLE DB Provider for Microsoft Access 10 (Microsoft.Access.OLEDB.10.0) as the service provider. You should use the AccessConnection property if you intend to create ADO recordsets that will be bound to Access forms. The form will not be updateable unless it is created by using the OLE DB Provider for Microsoft Access 10, even if the recordset is updateable in ADO. Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 22:51:55 avast! auteursrecht (c) 2000-2004 ALWIL Software. From martyconnelly at shaw.ca Sun Jul 11 17:35:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 11 Jul 2004 15:35:14 -0700 Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL References: <20040711203503.AC0325A995@smtp8.wanadoo.nl> Message-ID: <40F1C0A2.1010407@shaw.ca> Just came across this article that gives both points of view Migrating from Microsoft SQL Server and Access to MySQL http://dev.mysql.com/tech-resources/articles/migrating-from-microsoft.html It also describe briefly some conversion methods and helpful programs Note that a lot of problems will be resolved by MySQL 5.0 where stored procedures, triggers and views have been introduced, although the stored procedure syntax will vary in some degree from Microsoft's T-SQL language. However MySQL 5.0 is still in alpha which was released in Febuary. You will have problems with the various dialects of SQL like T-SQL from Microsoft or PL-SQL from Oracle. It is not plug and play. More like plug and pray. MySQL Server has many extensions to the SQL standard (so does everyone else), but does have a startup switch to use only ANSI SQL:2003 compliant code. MySQL does have a heavier duty database MAXDB from SAP which uses an Oracle like SQL syntax, there are perhaps problems with the ODBC bridge to MAXDB. I have connected to it using Access, but nothing heavy duty. Also, there is no OLEDB bridge yet to MySQL, for use with .Net, the people I have heard who know how to write this (they are thin on the ground) want cash to write it. Open Source is fine, but not if you have to take off three months to write and test this. Probably MYSQL or SAP will pay for it. -- Marty Connelly Victoria, B.C. Canada From davide at dalyn.co.nz Mon Jul 12 00:37:16 2004 From: davide at dalyn.co.nz (David Emerson) Date: Mon, 12 Jul 2004 17:37:16 +1200 Subject: [AccessD] Recording field changes In-Reply-To: Message-ID: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> I have finally got round to implementing Bob's code. It is working well but I have a problem with combo boxes. In cases where there are more than 1 columns and the first column is an ID number, I would like to show the 2nd column value (which is what is shown on the screen as the first column is 0cm width). I can get the new value of the combo box with "C.Column(1)" (C is dimmed as a control). How do I get the old value of the 2nd column though? David At 21/06/2004, you wrote: >Hi David, > >You could play with adding a memo field to your form's record source >called "Updates", add a textbox control to your form thats bound to >"Updates" (you can hide this field if you like), add =AuditTrailX() as a >function call in your form's Before Update event, then add the following >module to your project. Wish I could remember where this came from but i >can't. The code iterates through all the data entry controls in your >form's controls collection, recording old and new values for only those >fields that have changed. From stuart at lexacorp.com.pg Mon Jul 12 00:55:08 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 12 Jul 2004 15:55:08 +1000 Subject: [AccessD] Recording field changes In-Reply-To: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> References: Message-ID: <40F2B45C.6457.5977C34@lexacorp.com.pg> On 12 Jul 2004 at 17:37, David Emerson wrote: > I have finally got round to implementing Bob's code. It is working well > but I have a problem with combo boxes. In cases where there are more than > 1 columns and the first column is an ID number, I would like to show the > 2nd column value (which is what is shown on the screen as the first column > is 0cm width). > > I can get the new value of the combo box with "C.Column(1)" (C is dimmed as > a control). How do I get the old value of the 2nd column though? > You can't from the combobox directly, you will have to get it from the underlying data, something like =DLookup("DisplayName","tblLookupTable","PK = " & cboC) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Mon Jul 12 02:22:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 09:22:17 +0200 Subject: [AccessD] Recording field changes In-Reply-To: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> References: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> Message-ID: <1613474466.20040712092217@cactus.dk> Hi David If you store the ListIndex of the old selection, you can look up the value of any column directly: ' Save index of selected row. lngListIndex = Me!cboC.ListIndex ... ... ' Look up value of Column(1) or row lngListIndex. strOldValue = Me!cboC.Column(1, lngListIndex) /gustav > I have finally got round to implementing Bob's code. It is working well > but I have a problem with combo boxes. In cases where there are more than > 1 columns and the first column is an ID number, I would like to show the > 2nd column value (which is what is shown on the screen as the first column > is 0cm width). > I can get the new value of the combo box with "C.Column(1)" (C is dimmed as > a control). How do I get the old value of the 2nd column though? > David > At 21/06/2004, you wrote: >>Hi David, >> >>You could play with adding a memo field to your form's record source >>called "Updates", add a textbox control to your form thats bound to >>"Updates" (you can hide this field if you like), add =AuditTrailX() as a >>function call in your form's Before Update event, then add the following >>module to your project. Wish I could remember where this came from but i >>can't. The code iterates through all the data entry controls in your >>form's controls collection, recording old and new values for only those >>fields that have changed. From paul.hartland at fsmail.net Mon Jul 12 05:47:28 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 12:47:28 +0200 (CEST) Subject: [AccessD] Date Ranges Message-ID: <27822843.1089629248821.JavaMail.www@wwinf3006> To all, Either I am getting too old for this programming lark or just can?t seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn?t due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report ..and this person didn?t appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From mikedorism at adelphia.net Mon Jul 12 06:38:40 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 12 Jul 2004 07:38:40 -0400 Subject: [AccessD] Date Ranges In-Reply-To: <27822843.1089629248821.JavaMail.www@wwinf3006> Message-ID: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Change your criteria so that you are pulling start dates between DateFrom and DateTo OR finish dates between DateFrom and DateTo. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 6:47 AM To: accessd Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jul 12 07:18:20 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 14:18:20 +0200 (CEST) Subject: [AccessD] Date Ranges Message-ID: <11204449.1089634700461.JavaMail.www@wwinf3006> thats what I done but the start date for one of the records was before the start date required for the report and the finish date for the record was after the finish date required for the report, so I have had to also put for start date being before the startdate (report) AND finish date being after the finishdate (report) as well.... Thanks for help. I'm hoping this will solve it now Message date : Jul 12 2004, 12:39 PM >From : "Mike & Doris Manning" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] Date Ranges Change your criteria so that you are pulling start dates between DateFrom and DateTo OR finish dates between DateFrom and DateTo. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 6:47 AM To: accessd Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From djkr at msn.com Mon Jul 12 07:22:36 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Mon, 12 Jul 2004 13:22:36 +0100 Subject: [AccessD] Date Ranges In-Reply-To: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Message-ID: <000301c4680a$ea666fc0$3500a8c0@dabsight> Not enough, sorry, Doris. Paul, what you need is this: start date between DateFrom and DateTo OR finish date between DateFrom and DateTo OR (start date before DateFrom AND finish date after DateTo) HTH John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mike & Doris Manning > Sent: 12 July 2004 12:39 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Date Ranges > > > Change your criteria so that you are pulling start dates > between DateFrom and DateTo OR finish dates between DateFrom > and DateTo. > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: Monday, July 12, 2004 6:47 AM > To: accessd > Subject: [AccessD] Date Ranges > > > To all, > > Either I am getting too old for this programming lark or just > can't seem to think anymore. We have a personnel & absence > database from which we can pull off reports on certain date > ranges. The problem I have is that one person was off from > 16/06/04 and isn't due to return until 14/08/04. One of the > HR girls entered the dates 27/06/04 as the start date for a > report and 07/07/04 and a finish date for the report...and > this person didn't appear on the records cause basically I > have if the DateFrom in their absence record is greater than > equal to the start date they enter and to DateTo in the > absence record is less than or equal to the finish date for > the report it gives those records. How would I take into > account anyone that is off at any point between the startdate > and finishdate that we enter for a report. > > Thanks in advance for all your help. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JHewson at karta.com Mon Jul 12 08:05:25 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 08:05:25 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> Sorry, left for the weekend before I received any replies. Thanks for your replies. I'll answer each now. Chris - requery is called from the after update event of the text box. Doesn't work. I've tried repaint and refresh - still doesn't work. John - the event property of the control is filled in, checked it numerous times - even made sure the name of the controls were different than field names. Rocky - set a breakpoint it stops correctly, set a breakpoint on the line after - it stops correctly. I've tried using a querydef as the row source and a SQL statement. Doesn't make a difference. I also added a line to setfocus on the control, then requery and then setfocus on another control. The focus changes as expected and moves to the control after the requery line... still doesn't requery. Any other suggestions? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bchacc at san.rr.com Sent: Saturday, July 10, 2004 8:51 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Requery ListBox doesn't work Jim: Didi you set a breakpoint on the second one to see if the code is actually being executed? Rocky Original Message: ----------------- From: Jim Hewson JHewson at karta.com Date: Fri, 09 Jul 2004 15:00:14 -0500 To: accessD at databaseadvisors.com Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.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 Jul 12 08:09:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 15:09:49 +0200 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> References: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> Message-ID: <13224326079.20040712150949@cactus.dk> Hi Jim I guess you need to save the record before asking for the requery. /gustav > Two identical lines of code to requery a ListBox, one works, one doesn't. > Both on the same form, both reference the same ListBox. > > The one that works is located on the on click event of a button to delete > the current record. Delete the record - requery the ListBox. Works. > > The one that doesn't work is on the after update event of a text box. > Enter text - move to next text box - requery ListBox. Doesn't work. From JHewson at karta.com Mon Jul 12 08:48:52 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 08:48:52 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> Thanks for the suggestion. Tried it - still doesn't work. However, it does requery and displace the previous change! I've used the requery on several forms and it usually works. I just cannot figure out why on this form it doesn't! Thanks Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Monday, July 12, 2004 8:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Requery ListBox doesn't work Hi Jim I guess you need to save the record before asking for the requery. /gustav > Two identical lines of code to requery a ListBox, one works, one doesn't. > Both on the same form, both reference the same ListBox. > > The one that works is located on the on click event of a button to delete > the current record. Delete the record - requery the ListBox. Works. > > The one that doesn't work is on the after update event of a text box. > Enter text - move to next text box - requery ListBox. Doesn't work. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheygood at abestsystems.com Mon Jul 12 08:50:03 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Mon, 12 Jul 2004 06:50:03 -0700 Subject: [AccessD] Microsoft Access Annoyances In-Reply-To: <11204449.1089634700461.JavaMail.www@wwinf3006> Message-ID: Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee From gustav at cactus.dk Mon Jul 12 09:04:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 16:04:13 +0200 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> References: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> Message-ID: <16827589631.20040712160413@cactus.dk> Hi Jim Then you probably need to requery the form after having saved the record ... /gustav > Thanks for the suggestion. Tried it - still doesn't work. > However, it does requery and displace the previous change! > I've used the requery on several forms and it usually works. > I just cannot figure out why on this form it doesn't! > Thanks > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Monday, July 12, 2004 8:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Requery ListBox doesn't work > Hi Jim > I guess you need to save the record before asking for the requery. > /gustav >> Two identical lines of code to requery a ListBox, one works, one doesn't. >> Both on the same form, both reference the same ListBox. >> >> The one that works is located on the on click event of a button to delete >> the current record. Delete the record - requery the ListBox. Works. >> >> The one that doesn't work is on the after update event of a text box. >> Enter text - move to next text box - requery ListBox. Doesn't work. From paul.hartland at fsmail.net Mon Jul 12 09:24:03 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 16:24:03 +0200 (CEST) Subject: [AccessD] Summing Time Message-ID: <29312307.1089642243429.JavaMail.www@wwinf3006> To all, I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two dates, thought I had done this but apprently it's not calculating correctly. Any ideas how I can calculate this exactly to the minute. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Mon Jul 12 09:41:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 16:41:45 +0200 Subject: [AccessD] Summing Time In-Reply-To: <29312307.1089642243429.JavaMail.www@wwinf3006> References: <29312307.1089642243429.JavaMail.www@wwinf3006> Message-ID: <17629842050.20040712164145@cactus.dk> Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland From CMackin at Quiznos.com Mon Jul 12 09:50:51 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 12 Jul 2004 08:50:51 -0600 Subject: [AccessD] Summing Time Message-ID: Just get the difference in seconds using DateDiff then divide by 60 to get minutes. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 8:24 AM To: accessd Subject: [AccessD] Summing Time To all, I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two dates, thought I had done this but apprently it's not calculating correctly. Any ideas how I can calculate this exactly to the minute. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jul 12 09:52:54 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 16:52:54 +0200 (CEST) Subject: [AccessD] Summing Time Message-ID: <23666582.1089643974165.JavaMail.www@wwinf3006> Not sure I explained properly an example table would be: INPUTDATE TIME 28/06/04 00:10 28/06/04 00:10 28/06/04 00:12 28/06/04 00:10 28/06/04 00:13 28/06/04 00:10 28/06/04 01:18 29/06/04 00:10 29/06/04 00:10 29/06/04 00:30 29/06/04 00:10 29/06/04 00:13 29/06/04 00:10 29/06/04 02:00 So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get TotalHours 04:48 I only want to sum the actual time field Paul Hartland Message date : Jul 12 2004, 03:44 PM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] Summing Time Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Mon Jul 12 10:12:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 17:12:32 +0200 Subject: [AccessD] Summing Time In-Reply-To: <23666582.1089643974165.JavaMail.www@wwinf3006> References: <23666582.1089643974165.JavaMail.www@wwinf3006> Message-ID: <1931688705.20040712171232@cactus.dk> Hi Paul > Not sure I explained properly an example table would be: > INPUTDATE TIME > 28/06/04 00:10 > 28/06/04 00:10 > 28/06/04 00:12 > 28/06/04 00:10 > 28/06/04 00:13 > 28/06/04 00:10 > 28/06/04 01:18 > 29/06/04 00:10 > 29/06/04 00:10 > 29/06/04 00:30 > 29/06/04 00:10 > 29/06/04 00:13 > 29/06/04 00:10 > 29/06/04 02:00 > So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get > TotalHours > 04:48 > I only want to sum the actual time field Then you can get the minutes for each record: WaitMinutes: DateDiff("n", #00:00#, datefield2) and sum these. /gustav > lngWaitMinutes = DateDiff("n", datefield1, datefield2) > /gustav >> To all, >> I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 >> upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two >> dates, thought I had done this but apprently it's not calculating correctly. >> Any ideas how I can calculate this exactly to the minute. >> Thanks in advance for any help. >> Paul Hartland > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From CMackin at Quiznos.com Mon Jul 12 10:19:22 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 12 Jul 2004 09:19:22 -0600 Subject: [AccessD] Summing Time Message-ID: So you just Group By INPUTDATE and Sum the Time and you should be fine. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 8:53 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] Summing Time Not sure I explained properly an example table would be: INPUTDATE TIME 28/06/04 00:10 28/06/04 00:10 28/06/04 00:12 28/06/04 00:10 28/06/04 00:13 28/06/04 00:10 28/06/04 01:18 29/06/04 00:10 29/06/04 00:10 29/06/04 00:30 29/06/04 00:10 29/06/04 00:13 29/06/04 00:10 29/06/04 02:00 So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get TotalHours 04:48 I only want to sum the actual time field Paul Hartland Message date : Jul 12 2004, 03:44 PM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] Summing Time Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Mon Jul 12 11:41:28 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 12 Jul 2004 11:41:28 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD8B@corp-es01.fleetpride.com> Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 12 12:02:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 10:02:04 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Mon Jul 12 12:14:34 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 12:14:34 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E09A@karta-exc-int.Karta.com> Thanks, Gustav! It works. On a whim, I decided to try refresh one more time. It worked! Thanks everyone for your help. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Monday, July 12, 2004 9:04 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Requery ListBox doesn't work Hi Jim Then you probably need to requery the form after having saved the record ... /gustav > Thanks for the suggestion. Tried it - still doesn't work. > However, it does requery and displace the previous change! > I've used the requery on several forms and it usually works. > I just cannot figure out why on this form it doesn't! > Thanks > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Monday, July 12, 2004 8:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Requery ListBox doesn't work > Hi Jim > I guess you need to save the record before asking for the requery. > /gustav >> Two identical lines of code to requery a ListBox, one works, one doesn't. >> Both on the same form, both reference the same ListBox. >> >> The one that works is located on the on click event of a button to delete >> the current record. Delete the record - requery the ListBox. Works. >> >> The one that doesn't work is on the after update event of a text box. >> Enter text - move to next text box - requery ListBox. Doesn't work. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 12:17:27 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 13:17:27 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. From Jim.Hale at FleetPride.com Mon Jul 12 12:16:52 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 12 Jul 2004 12:16:52 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD8C@corp-es01.fleetpride.com> No, I'm using A2000; Jim Lawrence is using A2003 Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Monday, July 12, 2004 12:02 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 12:31:38 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 13:31:38 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lembit.Soobik at t-online.de Mon Jul 12 12:44:44 2004 From: Lembit.Soobik at t-online.de (Lembit Soobik) Date: Mon, 12 Jul 2004 19:44:44 +0200 Subject: [AccessD] Date Ranges References: <27822843.1089629248821.JavaMail.www@wwinf3006> Message-ID: <09b901c46837$ec72c110$0400a8c0@S856> Paul, you may want to download the Collision check from our website. its just for such cases Lembit Lembit Soobik ----- Original Message ----- From: To: "accessd" Sent: Monday, July 12, 2004 12:47 PM Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Mon Jul 12 13:01:48 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Mon, 12 Jul 2004 14:01:48 -0400 Subject: [AccessD] Access over network Message-ID: When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark From rjhjr at cox.net Mon Jul 12 13:20:23 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 12 Jul 2004 14:20:23 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> References: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712182020.GA13260@kongemord.krig.net> On Mon, Jul 12, 2004 at 01:31:38PM -0400, Susan Harkins wrote: > Well, I did a poor job of asking that... > > My question is -- does checking a reference or modifying a reference using > the Reference object and its many properties and methods fall into either > category? No. >From a Knowledge Base article on Access: "Dim objAccess As Access.Application" This type of declaration is called early binding, which is fastest. The article's example of late binding is Dim objAccess As Object "Binding" refers to binding a variable to an object. Setting a reference tells your code where a predefined class can be found. Of course, you've got to set a reference to do early binding, so the two tend to get mixed together. From starkey at wanadoo.nl Mon Jul 12 13:30:46 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:30:46 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: Message-ID: <20040712182903.ECF5516536@smtp6.wanadoo.nl> Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Developer at UltraDNT.com Mon Jul 12 13:29:16 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Mon, 12 Jul 2004 14:29:16 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <000801c4683e$26c9ffd0$6401a8c0@COA3> Susan: The early/late binding is entirely in the HOW, but how meaning in terms of creating and specifying the object type. By checking references, you are just being a good citizen and making sure your early binding is going to work. Ensuring a Word reference is Not "blnBroken" then dimming a Word.Application is still early binding (maybe we could call it "Dynamic Early-binding"); CreateObject("Word.Application") is still late-binding, no matter else you do. Steve PS: do you write for "Advisor"? If so, can you email me off-list? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 1:32 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 jimdettman at earthlink.net Mon Jul 12 13:30:30 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 12 Jul 2004 14:30:30 -0400 Subject: [AccessD] Access over network In-Reply-To: Message-ID: John, <> Opens it and pulls data as needed. If Access/JET (MDB) all data is processed on the client side. Server acts only as a file sharing device. If ADP, data is processed on the server and only the result set is returned. <> Not a good thing to do if Access/JET. JET was designed for LANs, not WANs. Your asking for trouble. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Monday, July 12, 2004 2:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jul 12 13:32:36 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 11:32:36 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: But I'm not using 2000 or 97, except for testing. I work in 2002 and I think I'll stay there for a while. I've worked a lot with ADO but I'll be moving to .Net in the not too distant future, so I'll give 2003 a pass ... Except for testing. I'm not a hot for XML as many people, although it is a handy way to share data. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Monday, July 12, 2004 10:31 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Mon Jul 12 13:35:50 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:35:50 +0200 Subject: [AccessD] more on early versus late binding In-Reply-To: <000801c4683e$26c9ffd0$6401a8c0@COA3> Message-ID: <20040712183407.D13C716149@smtp6.wanadoo.nl> I'd call it pre-early binding;-) -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Steve Conklin (Developer at UltraDNT) Verzonden: maandag 12 juli 2004 20:29 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] more on early versus late binding Susan: The early/late binding is entirely in the HOW, but how meaning in terms of creating and specifying the object type. By checking references, you are just being a good citizen and making sure your early binding is going to work. Ensuring a Word reference is Not "blnBroken" then dimming a Word.Application is still early binding (maybe we could call it "Dynamic Early-binding"); CreateObject("Word.Application") is still late-binding, no matter else you do. Steve PS: do you write for "Advisor"? If so, can you email me off-list? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 1:32 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:35:50 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Mon Jul 12 13:39:07 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:39:07 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: Message-ID: <20040712183724.CABD516800@smtp6.wanadoo.nl> I understand... I skipped 2002 on purpose since I haven't seen any office environment overhere working with it... Most of them still use A2K or 97. -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 20:33 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ But I'm not using 2000 or 97, except for testing. I work in 2002 and I think I'll stay there for a while. I've worked a lot with ADO but I'll be moving to .Net in the not too distant future, so I'll give 2003 a pass ... Except for testing. I'm not a hot for XML as many people, although it is a handy way to share data. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Monday, July 12, 2004 10:31 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:39:07 avast! auteursrecht (c) 2000-2004 ALWIL Software. From cfoust at infostatsystems.com Mon Jul 12 13:37:32 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 11:37:32 -0700 Subject: [AccessD] more on early versus late binding Message-ID: I certainly would call what I did in this respect early binding. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, July 12, 2004 9:17 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] more on early versus late binding This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 13:42:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:42:16 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712183407.D13C716149@smtp6.wanadoo.nl> Message-ID: <20040712184212.CJRF1775.imf19aec.mail.bellsouth.net@SUSANONE> There's one in every joint... ;) Susan H. I'd call it pre-early binding;-) From ssharkins at bellsouth.net Mon Jul 12 13:50:20 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:50:20 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040712185016.CPXG1775.imf19aec.mail.bellsouth.net@SUSANONE> I kind of see the terms early and late -- in Access -- a bit differently than the way most documentation wants to define them. To me, early just means the library is referenced, hence the objects are instantiated, but not being used -- late, the object is instantiated at the time it's needed -- the reference is implicit. I see a lot of documentation that refer to setting references manually via the References dialog box as "early" binding, but using the References collection and object are never mentioned -- however... Seems to me you're setting the reference and instantiating the objects without using them, so, to my mind, it's early. Susan H. I certainly would call what I did in this respect early binding. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, July 12, 2004 9:17 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] more on early versus late binding This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 ssharkins at bellsouth.net Mon Jul 12 13:55:50 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:55:50 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712182020.GA13260@kongemord.krig.net> Message-ID: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> > > My question is -- does checking a reference or modifying a reference > using the Reference object and its many properties and methods fall > into either category? No. >From a Knowledge Base article on Access: "Dim objAccess As Access.Application" This type of declaration is called early binding, which is fastest. The article's example of late binding is Dim objAccess As Object "Binding" refers to binding a variable to an object. Setting a reference tells your code where a predefined class can be found. Of course, you've got to set a reference to do early binding, so the two tend to get mixed together. ===========Interesting take -- the terminology's the thing... :) So, the References collection and Reference objects are just explicit referencing -- nothing to do with binding other than it enables early binding -- OK. Susan H. From accessd at shaw.ca Mon Jul 12 14:08:09 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 12:08:09 -0700 Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL In-Reply-To: <40F1C0A2.1010407@shaw.ca> Message-ID: Hi Marty: Good information. I especially like you statemet "It is not plug and play. More like plug and pray."...it about sums it up. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Sunday, July 11, 2004 3:35 PM To: Access Developers discussion and problem solving Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL Just came across this article that gives both points of view Migrating from Microsoft SQL Server and Access to MySQL http://dev.mysql.com/tech-resources/articles/migrating-from-microsoft.html It also describe briefly some conversion methods and helpful programs Note that a lot of problems will be resolved by MySQL 5.0 where stored procedures, triggers and views have been introduced, although the stored procedure syntax will vary in some degree from Microsoft's T-SQL language. However MySQL 5.0 is still in alpha which was released in Febuary. You will have problems with the various dialects of SQL like T-SQL from Microsoft or PL-SQL from Oracle. It is not plug and play. More like plug and pray. MySQL Server has many extensions to the SQL standard (so does everyone else), but does have a startup switch to use only ANSI SQL:2003 compliant code. MySQL does have a heavier duty database MAXDB from SAP which uses an Oracle like SQL syntax, there are perhaps problems with the ODBC bridge to MAXDB. I have connected to it using Access, but nothing heavy duty. Also, there is no OLEDB bridge yet to MySQL, for use with .Net, the people I have heard who know how to write this (they are thin on the ground) want cash to write it. Open Source is fine, but not if you have to take off three months to write and test this. Probably MYSQL or SAP will pay for it. -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Mon Jul 12 14:46:35 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 15:46:35 -0400 Subject: [AccessD] Summing Time is missing minutes In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 From rbgajewski at adelphia.net Mon Jul 12 14:58:47 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 15:58:47 -0400 Subject: [AccessD] Summing Time is missing minutes (fixed typo) In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 From DWUTKA at marlow.com Mon Jul 12 15:23:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jul 2004 15:23:54 -0500 Subject: [AccessD] Microsoft Access Annoyances Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB111@main2.marlow.com> The fact that Access 2000 and up, which use VBA 6.0, allow for the use of AddressOf of a Public function, but when an API callback is used, if you ever go into the VBE, you'll lock up Access. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bob Heygood Sent: Monday, July 12, 2004 8:50 AM To: Access Developers discussion and problem solving Subject: [AccessD] Microsoft Access Annoyances Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From donald.a.Mcgillivray at mail.sprint.com Mon Jul 12 15:28:49 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Mon, 12 Jul 2004 15:28:49 -0500 Subject: [AccessD] Summing Time is missing minutes Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEA1C@PKDWB01C.ad.sprint.com> Bob, When you wrap a value in a Format function, the result is returned as a string (as you obviously know.) When you convert that string using the Val function, the conversion halts at the first non-numeric character in the string, in your case the colon between the hours and minutes. You'll have to convert the string to a time value again before summing and reformatting. HTH, Don -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Gajewski Sent: Monday, July 12, 2004 12:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Mon Jul 12 16:54:13 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 12 Jul 2004 17:54:13 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> References: <20040712182020.GA13260@kongemord.krig.net> <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712215410.GB15891@kongemord.krig.net> On Mon, Jul 12, 2004 at 02:55:50PM -0400, Susan Harkins wrote: > > > > My question is -- does checking a reference or modifying a reference > > using the Reference object and its many properties and methods fall > > into either category? > > No. > > From a Knowledge Base article on Access: > > "Dim objAccess As Access.Application" > This type of declaration is called early binding, which is fastest. > > The article's example of late binding is > > Dim objAccess As Object > > "Binding" refers to binding a variable to an object. Setting a reference > tells your code where a predefined class can be found. Of course, you've got > to set a reference to do early binding, so the two tend to get mixed > together. > > ===========Interesting take -- the terminology's the thing... :) So, the > References collection and Reference objects are just explicit referencing -- > nothing to do with binding other than it enables early binding -- OK. Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. From donald.a.Mcgillivray at mail.sprint.com Mon Jul 12 17:38:27 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Mon, 12 Jul 2004 17:38:27 -0500 Subject: [AccessD] more on early versus late binding Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> To the extent that I can call myself a programmer (not far I promise!) I'm totally self-taught, so when topics like this come up, I follow them with an eye toward expanding my knowledge and understanding of the finer points. That said, I'm not sure I follow the distinction between the two examples you cite. True, one assigns a specific value directly to the variable, while the other calls a separate function to do so, but the choice of one over the other is less a matter of speed versus flexibility than it is a matter of what's available at runtime to assign to the variable. If the value is unknown until retrieved via some other process, there really isn't much choice, is there? Similarly, if the value IS known and can be reliably coded into the procedure (number of days in a week, for example), why run some other procedure to retrieve it? Whether "hard-coded" or dynamic, neither one actually does anything until the code is run, right? Or am I misunderstanding something in the concept being illustrated? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Hall Sent: Monday, July 12, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] more on early versus late binding Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 17:49:01 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 15:49:01 -0700 Subject: [AccessD] Microsoft Access Annoyances In-Reply-To: Message-ID: Hi Bob: I will post it on our front web page and see if it catches any other surfers. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bob Heygood Sent: Monday, July 12, 2004 6:50 AM To: Access Developers discussion and problem solving Subject: [AccessD] Microsoft Access Annoyances Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 18:06:35 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 16:06:35 -0700 Subject: [AccessD] Access over network In-Reply-To: Message-ID: Hi John: I believe it is the works. Generally not a issue with fast connection and a FE of 100MB or less. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Monday, July 12, 2004 11:02 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 18:06:34 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 16:06:34 -0700 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: Hi Susan: If I am reading this correctly, merely checking the reference does not fall into either. Only when the 'declaring' is performed can the binding type be ascertained. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 10:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 davide at dalyn.co.nz Mon Jul 12 18:10:20 2004 From: davide at dalyn.co.nz (David Emerson) Date: Tue, 13 Jul 2004 11:10:20 +1200 Subject: [AccessD] Recording field changes In-Reply-To: <1613474466.20040712092217@cactus.dk> References: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> Message-ID: <5.2.0.9.0.20040713111006.00b4e5d8@mail.dalyn.co.nz> Thanks Gustav. David At 12/07/2004, you wrote: >Hi David > >If you store the ListIndex of the old selection, you can look up the >value of any column directly: > > ' Save index of selected row. > lngListIndex = Me!cboC.ListIndex > ... > > ... > ' Look up value of Column(1) or row lngListIndex. > strOldValue = Me!cboC.Column(1, lngListIndex) > >/gustav > > > > I have finally got round to implementing Bob's code. It is working well > > but I have a problem with combo boxes. In cases where there are more than > > 1 columns and the first column is an ID number, I would like to show the > > 2nd column value (which is what is shown on the screen as the first column > > is 0cm width). > > > I can get the new value of the combo box with "C.Column(1)" (C is > dimmed as > > a control). How do I get the old value of the 2nd column though? > > > David > > > At 21/06/2004, you wrote: > >>Hi David, > >> > >>You could play with adding a memo field to your form's record source > >>called "Updates", add a textbox control to your form thats bound to > >>"Updates" (you can hide this field if you like), add =AuditTrailX() as a > >>function call in your form's Before Update event, then add the following > >>module to your project. Wish I could remember where this came from but i > >>can't. The code iterates through all the data entry controls in your > >>form's controls collection, recording old and new values for only those > >>fields that have changed. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 12 18:38:01 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 19:38:01 -0400 Subject: [AccessD] Access over network In-Reply-To: Message-ID: <000901c46869$4584c380$0501a8c0@colbyws> It pulls the pieces on an as needed basis. For example, if you try to open a form, it will pull form itself, the queries for the form and all controls such as combos (if stored as queries, else they are just SQL in the form definition itself). Then the data required to populate the form and controls. Etc. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Monday, July 12, 2004 2:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 18:40:06 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 19:40:06 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040712234002.PJID1737.imf24aec.mail.bellsouth.net@SUSANONE> I agree -- completely. Susan H. Hi Susan: If I am reading this correctly, merely checking the reference does not fall into either. Only when the 'declaring' is performed can the binding type be ascertained. Jim Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 Mon Jul 12 19:11:35 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 10:11:35 +1000 Subject: [AccessD] Date Ranges In-Reply-To: <000301c4680a$ea666fc0$3500a8c0@dabsight> References: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Message-ID: <40F3B556.968.210337B@lexacorp.com.pg> On 12 Jul 2004 at 13:22, DJK(John) Robinson wrote: > Not enough, sorry, Doris. > > Paul, what you need is this: > > start date between DateFrom and DateTo > OR finish date between DateFrom and DateTo > OR (start date before DateFrom AND finish date after DateTo) > Why not just StartDate <= DateTo and FinishDate >= DateFrom -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From KP at sdsonline.net Mon Jul 12 20:16:50 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 11:16:50 +1000 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <003a01c46877$13c4fb90$6501a8c0@user> I need to set up an overnight task in Windows Scheduler, (Win XP Pro) to open an Access database. This is what I have put in the 'Run' line, but I don't get even a flicker from it. "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd AutoRun The TestBatch.mdb has a startup form, with this 'On Open' event: -------------------------------------------------------------------------------- Private Sub Form_Open(Cancel As Integer) If Command$ = "AutoRun" Then MsgBox ("In") ' Call procedure(s) to perform the necessary tasks. 'Call BasProcessItems End If End Sub -------------------------------------------------------------------------------- This one is urgent - any help?? Kath Pelletti Software Design & Solutions Pty Ltd. Ph: 9505-6714 Fax: 9505-6430 KP at SDSOnline.net From jwcolby at colbyconsulting.com Mon Jul 12 20:28:34 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 21:28:34 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712185016.CPXG1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <000a01c46878$b7138310$0501a8c0@colbyws> Nope, early is not that, and late is not that. Early is dimensioning a variable as a specific object type - for example as an excel object or a word object or a command control etc. then referencing the object properties directly. Dim cbo as combo debug.print cbo.Name Late is dimensioning a variable as an OBJECT data type, then referencing the property but using the "object object". Dim cbo as object debug.print cbo.name The reason it is called early and late is simply that early binding: Dim cbo as combo Causes the compiler (interpreter actually) to find and set a reference to the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. Late binding causes the interpreter to "discover" what the object is by what is stored in the variable AT RUN TIME and look up the properties and stuff in the actual object (library, ocx etc) at run time. Thus the early binding causes the map of dim to real thing without ever even running the code. Late binding simply cannot discover what to do with the dimensioned variable until the variable is set = to something. This is very often used to pass in different things to a function for example. Function MyObject(obj as object) debug.print object.name End function Function TestObjects() MyObject MyCbo MyObject MyForm End function MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word document, a combo box. What happens inside of MyObject may or may not be legal depending on what you pass in to the function, but you can pass in ANY OBJECT AT ALL because the compiler does not check the dimensioned type against the passed in type (other than to determine that it is an object). Function MyControl(txt As TextBox) Debug.Print txt.Name End Function Function TestControls() Dim MyCbo As ComboBox Dim MyTextBox As TextBox Dim MyForm As Form Set MyForm = New Form_Form1 MyControl MyForm '<<<<< ERROR AT RUN TIME MyControl MyCbo MyControl MyTextBox End Function Test control will correctly pass in controls but won't run since MyForm is dimensioned as a form and at RUN TIME the interpreter checks all calls to MyControl to see if what is being passed in is a variable of type control. With early binding, since you dimension an object specifically to its object type, you can use intellisense because the compiler knows how to find the object information. With late binding, the object type isn't determined until something is actually passed in so how can intellisense help you out. Hope this helps explain what early and late binding are really all about. Now... Setting the reference really has nothing to do with any of this OTHER THAN allowing some specific object type to be found in a library, and thus be dimensioned to a specific object type. IOW, If I don't reference the excel library, I can STILL USE EXCEL, but I have to late bind, dim as an object, then store an Excel object (spreadsheet, cell etc) in the variable. If I reference the excel library, now I can early bind and dimension a variable as a spreadsheet, or a cell, or whatever I want since those things can be found in a referenced library. So setting the reference is neither early binding nor late binding. It ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel in any way whatsoever. However I cannot reference an excel object type (dim a variable as a cell or spreadsheet etc) unless I reference the Excel library. Referencing a library does nothing more than load (before compiling) a table of objects inside that library into a table of all possible objects for the compiler to use to look up dimension statement datatypes in. If a dimension statement datatype is not found in the table of all possible datatypes, then a compile error is thrown on the dim statement. Clear as mud? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 2:50 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding I kind of see the terms early and late -- in Access -- a bit differently than the way most documentation wants to define them. To me, early just means the library is referenced, hence the objects are instantiated, but not being used -- late, the object is instantiated at the time it's needed -- the reference is implicit. I see a lot of documentation that refer to setting references manually via the References dialog box as "early" binding, but using the References collection and object are never mentioned -- however... Seems to me you're setting the reference and instantiating the objects without using them, so, to my mind, it's early. Susan H. From jwcolby at colbyconsulting.com Mon Jul 12 20:39:20 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 21:39:20 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712215410.GB15891@kongemord.krig.net> Message-ID: <000b01c4687a$37f6b370$0501a8c0@colbyws> >The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Not exactly true. If Function ReadSomeFileAndFetchWibbleValue() as String (for example) then the returned value is a string and the compiler can check that the function is returning the same data type as lngWibble. Early binding (kind of). If: Function ReadSomeFileAndFetchWibbleValue() Then the returned value is a variant (in VB anyway) and the process will still work correctly due to coercion however it is "late bound" (kind of). In fact early and late binding don't really apply to built in data types such as strings and numbers (in VB at any rate) since these are not objects. Objects are typically classes or OCXs etc which have methods and properties. In .Net however, even variables such as integers and strings are objects with methods and properties so all of a sudden early and late binding might just apply to them... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Hall Sent: Monday, July 12, 2004 5:54 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] more on early versus late binding On Mon, Jul 12, 2004 at 02:55:50PM -0400, Susan Harkins wrote: > > > > My question is -- does checking a reference or modifying a reference > > using the Reference object and its many properties and methods fall > > into either category? > > No. > > From a Knowledge Base article on Access: > > "Dim objAccess As Access.Application" > This type of declaration is called early binding, which is > fastest. > > The article's example of late binding is > > Dim objAccess As Object > > "Binding" refers to binding a variable to an object. Setting a > reference tells your code where a predefined class can be found. Of > course, you've got to set a reference to do early binding, so the two > tend to get mixed together. > > ===========Interesting take -- the terminology's the thing... :) So, > the References collection and Reference objects are just explicit > referencing -- nothing to do with binding other than it enables early > binding -- OK. Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Mon Jul 12 21:40:04 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 22:40:04 -0400 Subject: [AccessD] Summing Time is missing minutes SOLVED In-Reply-To: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEA1C@PKDWB01C.ad.sprint.com> Message-ID: Don That was certainly it! sttlTimeDiff: Format(Sum(IIf([EndTime]>[StartTime],[EndTime]-[StartTime],(DateAdd("d",1,[E ndTime]-[StartTime]))),"h:nn") ttlTimeDiff: Format(Sum(IIf([EndTime]>[StartTime],[EndTime]-[StartTime],(DateAdd("d",1,[E ndTime]-[StartTime]))),"h:nn") The only difference with this is that the subtotals and totals now print as hours and minutes (5:30) instead of hours (5.5). That works fine for this application. Thanks a HUGE BUNCH! As always, this list is great!!! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mcgillivray, Donald [ITS] Sent: Monday, July 12, 2004 16:29 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Bob, When you wrap a value in a Format function, the result is returned as a string (as you obviously know.) When you convert that string using the Val function, the conversion halts at the first non-numeric character in the string, in your case the colon between the hours and minutes. You'll have to convert the string to a time value again before summing and reformatting. HTH, Don -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Gajewski Sent: Monday, July 12, 2004 12:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Tue Jul 13 00:28:46 2004 From: rjhjr at cox.net (Bob Hall) Date: Tue, 13 Jul 2004 01:28:46 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> References: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> Message-ID: <20040713052844.GL19664@kongemord.krig.net> On Mon, Jul 12, 2004 at 05:38:27PM -0500, Mcgillivray, Donald [ITS] wrote: > To the extent that I can call myself a programmer (not far I promise!) > I'm totally self-taught, so when topics like this come up, I follow them > with an eye toward expanding my knowledge and understanding of the finer > points. That said, I'm not sure I follow the distinction between the > two examples you cite. True, one assigns a specific value directly to > the variable, while the other calls a separate function to do so, but > the choice of one over the other is less a matter of speed versus > flexibility than it is a matter of what's available at runtime to assign > to the variable. If the value is unknown until retrieved via some other > process, there really isn't much choice, is there? Similarly, if the > value IS known and can be reliably coded into the procedure (number of > days in a week, for example), why run some other procedure to retrieve > it? Whether "hard-coded" or dynamic, neither one actually does anything > until the code is run, right? Or am I misunderstanding something in the > concept being illustrated? If you bind a variable early, e.g. lngWibble = 47 then you have to go into the code and change the code if you want to change the value you are binding to lngWibble. If you bind late, e.g. lngWibble = ReadSomeFileAndFetchWibbleValue() then you can change the value assigned to lngWibble by changing data in the file. Any can do this with a text editor and it doesn't require rewriting and recompiling the code. Configuration files all work this way. From andy at minstersystems.co.uk Tue Jul 13 02:05:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 08:05:18 +0100 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <003a01c46877$13c4fb90$6501a8c0@user> Message-ID: <000701c468a7$cdb38d20$b274d0d5@minster33c3r25> Kath Unless it's changed in A2K the command line in A97 would end ".... /x Autorun" not /cmd. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kath Pelletti > Sent: 13 July 2004 02:17 > To: AccessD at databaseadvisors.com > Subject: [AccessD] Scheduled Access task - URGENT > > > I need to set up an overnight task in Windows Scheduler, (Win > XP Pro) to open an Access database. This is what I have put > in the 'Run' line, but I don't get even a flicker from it. > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd AutoRun > > The TestBatch.mdb has a startup form, with this 'On Open' event: > > -------------------------------------------------------------- > ------------------ > > Private Sub Form_Open(Cancel As Integer) > If Command$ = "AutoRun" Then > MsgBox ("In") > ' Call procedure(s) to perform the necessary tasks. > 'Call BasProcessItems > End If > > End Sub > > -------------------------------------------------------------- > ------------------ > > > This one is urgent - any help?? > > > Kath Pelletti > Software Design & Solutions Pty Ltd. > Ph: 9505-6714 > Fax: 9505-6430 > KP at SDSOnline.net > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From stuart at lexacorp.com.pg Tue Jul 13 02:12:34 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 17:12:34 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <000701c468a7$cdb38d20$b274d0d5@minster33c3r25> References: <003a01c46877$13c4fb90$6501a8c0@user> Message-ID: <40F41802.18104.391A06D@lexacorp.com.pg> On 13 Jul 2004 at 8:05, Andy Lacey wrote: > Kath > Unless it's changed in A2K the command line in A97 would end ".... /x > Autorun" not /cmd. > "/cmd commands" is the correct syntax to pass command line arguments. "/x macroname" is used to run the named macro on startup. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From rjhjr at cox.net Tue Jul 13 02:27:28 2004 From: rjhjr at cox.net (Bob Hall) Date: Tue, 13 Jul 2004 03:27:28 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <000b01c4687a$37f6b370$0501a8c0@colbyws> References: <20040712215410.GB15891@kongemord.krig.net> <000b01c4687a$37f6b370$0501a8c0@colbyws> Message-ID: <20040713072725.GM19664@kongemord.krig.net> On Mon, Jul 12, 2004 at 09:39:20PM -0400, jwcolby wrote: > >The line > lngWibble = ReadSomeFileAndFetchWibbleValue() > is late binding. The variable isn't bound to the specific value until the > code is run. > > > Not exactly true. If My example comes from a book published by Microsoft call "Code Complete". > In fact early and late binding don't really apply to built in data types > such as strings and numbers (in VB at any rate) since these are not objects. It doesn't matter whether we're talking about primitive data types or user defined classes. Strings, numbers, and objects are all instances of of types (classes). The only difference between a primitive type and a user defined class is the "user defined". When you declare a String or Integer variable, you actually are declaring an object that gets it's operations and properties from its type. The extra work involved in declaring a VBA object is due to the fact that it isn't an instance of a primitive type. Since it's not built in to the language, you have to do extra work to tell VBA what it is. > Objects are typically classes or OCXs etc which have methods and properties. Both classes and primitive data types have operations and properties. The fact that class operations are called methods and are called using a different syntax doesn't change the fact that they are the same thing. You obviously can't have primitive types inheriting procedures from other types; it wouldn't have any point. But type operators are overloaded; the "+" operator does one thing with numbers and another with strings. And integer multiplication is not the same as floating point mulitiplication. So where it is relevant, primitive and non-primitive types act the same way. Early and late binding can be used in purely non-OOP languages. A definition: "early binding: A characteristic of programming languages that perform most bindings during translation, usually to achieve execution efficiency. For example, COBOL, Fortran, Pascal." And a binding doesn't have to involve an object. An example of early binding from Java: int wibble = 47; I've seen early and late binding discussed in terms of variable names, function names, and object names. From KP at sdsonline.net Tue Jul 13 02:38:59 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 17:38:59 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <003a01c46877$13c4fb90$6501a8c0@user> <40F41802.18104.391A06D@lexacorp.com.pg> Message-ID: <002101c468ac$767577d0$6501a8c0@user> Does anyone have a line currently working as a scheduled task to open an .mdb? I would love to see the syntax. Kath ----- Original Message ----- From: Stuart McLachlan To: Access Developers discussion and problemsolving Sent: Tuesday, July 13, 2004 5:12 PM Subject: RE: [AccessD] Scheduled Access task - URGENT On 13 Jul 2004 at 8:05, Andy Lacey wrote: > Kath > Unless it's changed in A2K the command line in A97 would end ".... /x > Autorun" not /cmd. > "/cmd commands" is the correct syntax to pass command line arguments. "/x macroname" is used to run the named macro on startup. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 03:30:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 10:30:19 +0200 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002101c468ac$767577d0$6501a8c0@user> References: <003a01c46877$13c4fb90$6501a8c0@user> <40F41802.18104.391A06D@lexacorp.com.pg> <002101c468ac$767577d0$6501a8c0@user> Message-ID: <1497137242.20040713103019@cactus.dk> Hi Kath I think you need to modify "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd AutoRun to "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd "AutoRun" One line, of course. A Space must separate the parts. /gustav > Does anyone have a line currently working as a scheduled task to open an .mdb? I would love to see the syntax. From viner at eunet.yu Tue Jul 13 03:46:58 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 13 Jul 2004 10:46:58 +0200 Subject: [AccessD] Batch printing the .doc files from a folder Message-ID: <002201c468b6$18217940$0100a8c0@razvoj> Hi, there are a plenty of .doc files in a particular folder, and I want to print them without manually opening every single file. I'm interested in VBA or .bat or whatever solution! Many TIA's Ervin From stuart at lexacorp.com.pg Tue Jul 13 04:10:08 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 19:10:08 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <1497137242.20040713103019@cactus.dk> References: <002101c468ac$767577d0$6501a8c0@user> Message-ID: <40F43390.8329.3FD439A@lexacorp.com.pg> On 13 Jul 2004 at 10:30, Gustav Brock wrote: > Hi Kath > > I think you need to modify > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd AutoRun > > to > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd "AutoRun" > It works fine for me without quotes around the argument(s) Trying to find Kath's problem, this works as expected and a message box displays the two words when called from a form's on_open "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test Argument It works fine whether in a shortcut or a batch file (Win2K, A2K) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Tue Jul 13 04:25:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 11:25:08 +0200 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <40F43390.8329.3FD439A@lexacorp.com.pg> References: <002101c468ac$767577d0$6501a8c0@user> <40F43390.8329.3FD439A@lexacorp.com.pg> Message-ID: <7710425821.20040713112508@cactus.dk> Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) From gustav at cactus.dk Tue Jul 13 04:52:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 11:52:58 +0200 Subject: [AccessD] Rotate label in report design Message-ID: <12712096533.20040713115258@cactus.dk> Hi all If you set property Vertical to True, text is written up-down. Can it somehow be rotated 180 degrees to be down-up? Stephen Lebans features a RotateText ocx but I would rather be without an ocx. /gustav From andy at minstersystems.co.uk Tue Jul 13 06:17:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 12:17:53 +0100 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <20040713111751.5E90424CB3F@smtp.nildram.co.uk> Oops sorry! -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] Scheduled Access task - URGENT Date: 13/07/04 07:14 > > On 13 Jul 2004 at 8:05, Andy Lacey wrote: > > > Kath > > Unless it's changed in A2K the command line in A97 would end ".... /x > > Autorun" not /cmd. > > > > "/cmd commands" is the correct syntax to pass command line arguments. > "/x macroname" is used to run the named macro on startup. > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From Mark.Mitsules at ngc.com Tue Jul 13 07:02:10 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 13 Jul 2004 08:02:10 -0400 Subject: [AccessD] Batch printing the .doc files from a folder Message-ID: Ervin, The quickest, simplest way I know of is to highlight them all, right-click, and choose print. They will each open, print, and close automatically. Mark -----Original Message----- From: Ervin Brindza [mailto:viner at eunet.yu] Sent: Tuesday, July 13, 2004 4:47 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Batch printing the .doc files from a folder Hi, there are a plenty of .doc files in a particular folder, and I want to print them without manually opening every single file. I'm interested in VBA or .bat or whatever solution! Many TIA's Ervin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KP at sdsonline.net Tue Jul 13 07:27:12 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 22:27:12 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <002101c468ac$767577d0$6501a8c0@user><40F43390.8329.3FD439A@lexacorp.com.pg> <7710425821.20040713112508@cactus.dk> Message-ID: <002d01c468d4$b9feb750$6501a8c0@user> Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From viner at eunet.yu Tue Jul 13 07:08:04 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 13 Jul 2004 14:08:04 +0200 Subject: [AccessD] Batch printing the .doc files from a folder References: Message-ID: <000201c468d6$f05e04c0$0100a8c0@razvoj> Mark, many thanks for the suggestion, but my customer want a single button push :-( Ervin ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 2:02 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Ervin, > > The quickest, simplest way I know of is to highlight them all, right-click, > and choose print. They will each open, print, and close automatically. > > > Mark > > > -----Original Message----- > From: Ervin Brindza [mailto:viner at eunet.yu] > Sent: Tuesday, July 13, 2004 4:47 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Batch printing the .doc files from a folder > > > Hi, > there are a plenty of .doc files in a particular folder, and I want to print > them without manually opening every single file. I'm interested in VBA or > .bat or whatever solution! > Many TIA's > Ervin > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Tue Jul 13 07:55:14 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 13 Jul 2004 08:55:14 -0400 Subject: [AccessD] Linked Table Permissions Message-ID: I need someone to refresh my memory. I have db 'A' in a folder 'A', secured using NTFS folder permissions. If I place db 'B' in a unrestricted folder 'B' and "link" to the tables in db 'A'...who can open these linked tables or run queries based on these linked tables? 1. Only those with permissions to folder 'A'. 2. All those with permissions to folder 'B'. Mark From stuart at lexacorp.com.pg Tue Jul 13 08:12:17 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 23:12:17 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002d01c468d4$b9feb750$6501a8c0@user> Message-ID: <40F46C51.29911.4DAF67C@lexacorp.com.pg> On 13 Jul 2004 at 22:27, Kath Pelletti wrote: > Hi Gustav / Stuart / Andy - thanks for suggestions - > > I can't get it to work with or without the quotes around the Autorun parameter. > > This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. > > My syntax works as a shortcut, but simply does not run as a scheduled task. > > To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? > With the attached test.mdb (not attached to list reply) in C:\ I've just run a scheduled task with the comand line "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmd Test Argument It works fine (opens the mdb and displays two message boxes, once from a function called in the Autoexec macro and a second one called from the startup forms on_open. Having just set up the task, the thought struck me that you may not have set the run permissions for the task properly. You need to set the "Run as" and password for the task. Attachments: C:\test.mdb -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From andy at minstersystems.co.uk Tue Jul 13 09:23:16 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 15:23:16 +0100 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <20040713142313.2B58925198F@smtp.nildram.co.uk> Kath You haven't got an Autoexec macro that's interfering have you? That'll always get called first. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From paul.hartland at fsmail.net Tue Jul 13 09:38:27 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 16:38:27 +0200 (CEST) Subject: [AccessD] DateDiff or other function Message-ID: <16697945.1089729507920.JavaMail.www@wwinf3002> To all, Our financial year starts at 1st April and all I?m trying to do is get the number of weeks between 1st April and any date a user types in. I have just played with datediff for around 30 minutes using something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I used 12/07/04 for the me.txtDate which is around 16 weeks but I?m getting 28. Can someone tell me where I can find the answer or send me an example of how to do this please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Tue Jul 13 09:54:44 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jul 2004 00:54:44 +1000 Subject: [AccessD] DateDiff or other function In-Reply-To: <16697945.1089729507920.JavaMail.www@wwinf3002> Message-ID: <40F48454.20605.538C0BD@lexacorp.com.pg> On 13 Jul 2004 at 16:38, paul.hartland at fsmail.net wrote: > To all, Our financial year starts at 1st April and all I?m trying to do > is get the number of weeks between 1st April and any date a user types > in. I have just played with datediff for around 30 minutes using > something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I > used 12/07/04 for the me.txtDate which is around 16 weeks but I?m > getting 28. Can someone tell me where I can find the answer or send > me an example of how to do this please. Thanks in advance for any help. Looks like an internationalisation issue. Is 01/04/04 1 April or 4 January 04? Try using an unambigous form like Datediff("ww","1 apr 04",me.txtdate) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mikedorism at adelphia.net Tue Jul 13 10:14:57 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jul 2004 11:14:57 -0400 Subject: [AccessD] Linked Table Permissions In-Reply-To: Message-ID: <000001c468ec$28d51400$cc0aa845@hargrove.internal> Combination of the two... All those with permissions to folder 'B' who have permissions to folder 'A' Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Tuesday, July 13, 2004 8:55 AM To: [AccessD] Subject: [AccessD] Linked Table Permissions I need someone to refresh my memory. I have db 'A' in a folder 'A', secured using NTFS folder permissions. If I place db 'B' in a unrestricted folder 'B' and "link" to the tables in db 'A'...who can open these linked tables or run queries based on these linked tables? 1. Only those with permissions to folder 'A'. 2. All those with permissions to folder 'B'. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Tue Jul 13 10:14:01 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 17:14:01 +0200 (CEST) Subject: [AccessD] DateDiff or other function Message-ID: <19763086.1089731641991.JavaMail.www@wwinf3002> Thanks, works perfect like that..... Message date : Jul 13 2004, 03:56 PM >From : "Stuart McLachlan" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] DateDiff or other function On 13 Jul 2004 at 16:38, paul.hartland at fsmail.net wrote: > To all, Our financial year starts at 1st April and all I?m trying to do > is get the number of weeks between 1st April and any date a user types > in. I have just played with datediff for around 30 minutes using > something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I > used 12/07/04 for the me.txtDate which is around 16 weeks but I?m > getting 28. Can someone tell me where I can find the answer or send > me an example of how to do this please. Thanks in advance for any help. Looks like an internationalisation issue. Is 01/04/04 1 April or 4 January 04? Try using an unambigous form like Datediff("ww","1 apr 04",me.txtdate) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Tue Jul 13 10:17:48 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 08:17:48 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <00ff01c468ec$8e96baf0$6601a8c0@HAL9002> Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is From mikedorism at adelphia.net Tue Jul 13 10:21:47 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jul 2004 11:21:47 -0400 Subject: [AccessD] DateDiff or other function In-Reply-To: <16697945.1089729507920.JavaMail.www@wwinf3002> Message-ID: <000101c468ed$1cf5dfb0$cc0aa845@hargrove.internal> You need to specify the FirstWeekOfYear...A constant that specifies the first week of the year. If not specified, the first week is assumed to be the week in which January 1 occurs. DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Tuesday, July 13, 2004 10:38 AM To: accessd Subject: [AccessD] DateDiff or other function To all, Our financial year starts at 1st April and all I'm trying to do is get the number of weeks between 1st April and any date a user types in. I have just played with datediff for around 30 minutes using something similar to intWeeks = Datediff("ww",01/04/04,Me.txtDate) I used 12/07/04 for the me.txtDate which is around 16 weeks but I'm getting 28. Can someone tell me where I can find the answer or send me an example of how to do this please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From chris at piasd.org Tue Jul 13 10:23:24 2004 From: chris at piasd.org (Chris Kettenbach) Date: Tue, 13 Jul 2004 08:23:24 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <2F7BA03C93D17D48B13C42228C8FDAF2785276@server.domain.local> I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mgauk at btconnect.com Tue Jul 13 10:25:05 2004 From: mgauk at btconnect.com (mgauk at btconnect.com) Date: Tue, 13 Jul 2004 16:25:05 +0100 Subject: [AccessD] Batch printing the .doc files from a folder In-Reply-To: <000201c468d6$f05e04c0$0100a8c0@razvoj> Message-ID: <200407131526.i6DFQLQ23813@databaseadvisors.com> Try This: Create a Button on a form call ButPrintAllDocFiles and put this code behind the form Option Compare Database Option Explicit Private Sub ButPrintWordDocs_Click() Call fPrintAllDocFiles End Sub Private Function fPrintAllDocFiles() ' FileDialog require a Reference to Microsoft Office 11 Object Library ' and we also need a reference to Microsoft Word 11 Object Library ' in HELP, search under 'system' in the index Dim fs, f, f1, fc, sDocs, folderspec As String, iResponse As Integer Dim sFN As String Dim objWord As Word.Application Set fs = CreateObject("Scripting.FileSystemObject") Set objWord = New Word.Application folderspec = pfGetSingleFolder("C:\") If Len(folderspec) = 0 Then GoTo exithere Set f = fs.GetFolder(folderspec) Set fc = f.Files For Each f1 In fc If Right(f1.Name, 4) = ".doc" And Not Left(f1.Name, 1) = "~" Then sFN = folderspec & "\" & f1.Name ' comment out the next 2 lines for autoprinting and the corresponding 'End If' iResponse = MsgBox("Print This File:-" & vbCrLf & vbCrLf & sFN, vbYesNo + vbQuestion, "Print All") If iResponse = vbYes Then objWord.Documents.Add Template:=sFN, NewTemplate:=False objWord.Options.PrintBackground = True objWord.ActiveDocument.PrintOut objWord.ActiveDocument.Close End If End If Next exithere: Set objWord = Nothing MsgBox "Finished" Exit Function End Function Public Function pfGetSingleFolder(Optional strStartFolder As String) As Variant ' FileDialog require a Reference to Microsoft Office 11 Object Library On Error GoTo errhandler Dim fd As FileDialog Set fd = FileDialog(msoFileDialogFolderPicker) fd.AllowMultiSelect = False fd.Title = "Select a Folder to Auto-Print ALL Word documents in that Folder" fd.ButtonName = "Select Folder" fd.InitialFileName = strStartFolder fd.Show pfGetSingleFolder = fd.SelectedItems.Item(1) ' only 1 allowed 'MsgBox pfGetSingleFolder exithere: Set fd = Nothing Exit Function errhandler: Select Case Err.Number Case 5 ' user cancelled pfGetSingleFolder = "" Case Else MsgBox Err.Number & vbCrLf & Err.Description End Select Resume exithere End Function Max Sherman -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ervin Brindza Sent: 13 July 2004 13:08 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Batch printing the .doc files from a folder Mark, many thanks for the suggestion, but my customer want a single button push :-( Ervin ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 2:02 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Ervin, > > The quickest, simplest way I know of is to highlight them all, right-click, > and choose print. They will each open, print, and close automatically. > > > Mark > > > -----Original Message----- > From: Ervin Brindza [mailto:viner at eunet.yu] > Sent: Tuesday, July 13, 2004 4:47 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Batch printing the .doc files from a folder > > > Hi, > there are a plenty of .doc files in a particular folder, and I want to print > them without manually opening every single file. I'm interested in VBA > or .bat or whatever solution! > Many TIA's > Ervin > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 From paul.hartland at fsmail.net Tue Jul 13 10:32:20 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 17:32:20 +0200 (CEST) Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <15655739.1089732740871.JavaMail.www@wwinf3002> I use the vbSendMail.dll with the problem being it goes straight to the SMTP server and you need to know the name of the SMTP server. Apparently I think there's something out there called Outlook Redemption (or similar) which you can use. Think both are free to download, not sure about other costs though Paul Hartland Message date : Jul 13 2004, 04:28 PM >From : "Chris Kettenbach" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From rl_stewart at highstream.net Tue Jul 13 10:40:25 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 13 Jul 2004 10:40:25 -0500 Subject: [AccessD] Re: Rotate label in report design In-Reply-To: <200407131120.i6DBKsQ08394@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> Gustav, StrReverse(YourString) will reverse the string then you can se the property to vertical. Robert At 06:20 AM 13/07/2004 -0500, you wrote: >Date: Tue, 13 Jul 2004 11:52:58 +0200 >From: Gustav Brock >Subject: [AccessD] Rotate label in report design >To: Access Developer >Message-ID: <12712096533.20040713115258 at cactus.dk> >Content-Type: text/plain; charset=us-ascii > >Hi all > >If you set property Vertical to True, text is written up-down. >Can it somehow be rotated 180 degrees to be down-up? > >Stephen Lebans features a RotateText ocx but I would rather be without >an ocx. > >/gustav From CMackin at Quiznos.com Tue Jul 13 10:43:59 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 13 Jul 2004 09:43:59 -0600 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: Rocky, See the archives on Outlook and the Security patch that is causing this. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 9:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 10:52:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 17:52:03 +0200 Subject: [AccessD] Re: Rotate label in report design In-Reply-To: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> References: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> Message-ID: <8533641363.20040713175203@cactus.dk> Hi Robert > StrReverse(YourString) > will reverse the string then you can se the property to vertical. Hey, very creative Robert! That was not what I meant; it will give me treboR for Robert but I do need Robert - only rotated 180 degrees (not mirrored or sort of). /gustav >>If you set property Vertical to True, text is written up-down. >>Can it somehow be rotated 180 degrees to be down-up? >> >>Stephen Lebans features a RotateText ocx but I would rather be without >>an ocx. From dwaters at usinternet.com Tue Jul 13 10:55:59 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 13 Jul 2004 10:55:59 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <20972704.1089733242688.JavaMail.root@sniper2.usinternet.com> Message-ID: <001401c468f1$e48adf90$de1811d8@danwaters> Paul, If you want to use SMTP email, vbSendMail is a good choice. You can get the SMTP Server name from the network administrator. They have to know it. Or, if you're using this at home, you can use your ISP's name, like 'mail.usinternet.com' Best of Luck! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Tuesday, July 13, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] Outlook Asks Too Many Questions I use the vbSendMail.dll with the problem being it goes straight to the SMTP server and you need to know the name of the SMTP server. Apparently I think there's something out there called Outlook Redemption (or similar) which you can use. Think both are free to download, not sure about other costs though Paul Hartland Message date : Jul 13 2004, 04:28 PM >From : "Chris Kettenbach" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pharold at proftesting.com Tue Jul 13 10:59:29 2004 From: pharold at proftesting.com (Perry Harold) Date: Tue, 13 Jul 2004 11:59:29 -0400 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <00ff01c468ec$8e96baf0$6601a8c0@HAL9002> Message-ID: <003601c468f2$612b79b0$082da8c0@D58BT131> Try using ClickYes http://www.contextmagic.com/express-clickyes/ Can be called programmatically as well I believe. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 11:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From liz at symphonyinfo.com Tue Jul 13 11:21:40 2004 From: liz at symphonyinfo.com (Liz Doering) Date: Tue, 13 Jul 2004 11:21:40 -0500 Subject: [AccessD] Advantage Database Message-ID: Is anyone aware of any tools or tips for extracting .adt files to any other format? My boss has promised that we can do this magic.... Thanks, Liz Doering Symphony Information Services liz at symphonyinfo.com www.symphonyinfo.com From cfoust at infostatsystems.com Tue Jul 13 11:26:56 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:26:56 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust From cfoust at infostatsystems.com Tue Jul 13 11:27:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:27:58 -0700 Subject: [AccessD] Advantage Database Message-ID: You could look at DataJunction, but be prepared to pay up for it. Charlotte Foust -----Original Message----- From: Liz Doering [mailto:liz at symphonyinfo.com] Sent: Tuesday, July 13, 2004 8:22 AM To: accessd at databaseadvisors.com Subject: [AccessD] Advantage Database Is anyone aware of any tools or tips for extracting .adt files to any other format? My boss has promised that we can do this magic.... Thanks, Liz Doering Symphony Information Services liz at symphonyinfo.com www.symphonyinfo.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 11:29:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:29:33 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 11:29:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 18:29:48 +0200 Subject: [AccessD] Advantage Database In-Reply-To: References: Message-ID: <035906120.20040713182948@cactus.dk> Hi Liz As far as I know that's a proprietary format. You would probably need to do that from within Advantage or use their ODBC driver if you have that at hand. /gustav > Is anyone aware of any tools or tips for extracting .adt files to any other > format? My boss has promised that we can do this magic.... From Developer at UltraDNT.com Tue Jul 13 11:32:43 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Tue, 13 Jul 2004 12:32:43 -0400 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002d01c468d4$b9feb750$6501a8c0@user> Message-ID: <000901c468f7$08b1fe30$6401a8c0@COA3> Does the Windows user id have a password? In my experience, WinXP won't run a Scheduled Task for a user id that does not have one. hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kath Pelletti Sent: Tuesday, July 13, 2004 8:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 11:38:33 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 18:38:33 +0200 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: References: Message-ID: <13736430744.20040713183833@cactus.dk> Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We have > an app that simply sits there and distributes reports, either by email, > to a printer or to PDF files. It operates on a timer and checks to see > if new data has been received. If it has, it checks the distributions > configured and sends the reports. The baffling thing is that at some > point, we get a "not enough memory" error that brings it to a halt. The > brute force method is to shut the thing down and restart it. We could > even do that automatically, but the trouble is we can't figure out what > causes it. It does not appear to be memory leak and we've tried > everything we can think of: tweaking the virtual memory, turning off > file indexing, changing the interval, updating the jet service pack to > 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and the > slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the > machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 > adapters. The best performance is coming from the 256 MB RAM machine > with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust From JColby at dispec.com Tue Jul 13 11:41:16 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 13 Jul 2004 12:41:16 -0400 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD2D@DISABILITYINS01> Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 12:03:13 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 10:03:13 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: Yep. It spikes at the time we get the message, but it doesn't look like a leak, since it isn't crawling up gradually. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 12:08:16 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 10:08:16 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Tue Jul 13 12:47:28 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Tue, 13 Jul 2004 10:47:28 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: Message-ID: Charlotte: Your right it is definitely not a leak more like a flood. Sorry but it has been a long night/day so far. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 10:03 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Yep. It spikes at the time we get the message, but it doesn't look like a leak, since it isn't crawling up gradually. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jul 13 13:56:29 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 13 Jul 2004 13:56:29 -0500 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: <18447350.1089743241138.JavaMail.root@sniper3.usinternet.com> Message-ID: <000001c4690b$1bb28ea0$de1811d8@danwaters> Charlotte, I remember that when an application is opened by automation it is sometimes not visible. For example if I open Excel from Access and I want to see the spreadsheet on screen, I have to explicitly set a visible property to true. Could your code be recursively opening objects but not closing them? I guess this would apply to applications, recordsets, queries, and other things too. I'm just trying to save the wall ;-) Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 13 14:44:45 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 13 Jul 2004 15:44:45 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD67@DISABILITYINS01> I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC From BBarabash at TappeConstruction.com Tue Jul 13 15:02:44 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 13 Jul 2004 15:02:44 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <100F91B31300334B89EC531C9DCB086506580A@tccexch01.tappeconstruction.net> Hi John, Try xlApp.DisplayAlerts = False (it's the equivalent of DoCmd.SetWarnings False) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From CMackin at Quiznos.com Tue Jul 13 15:10:09 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 13 Jul 2004 14:10:09 -0600 Subject: [AccessD] Preventing user prompts from Excel Message-ID: Try, xlApp.DisplayAlerts False This is off the top of my head so it may nee some minor tweaking, but I think the DisplayAlerts property is what you're after. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 1:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 15:12:48 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 13:12:48 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: I'm pretty careful about that. Some of our previous developers relied on the built-in garbage collection (LOL) but I don't ever assume objects will go out of scope when they should. I always destroy them explicitly. Every place I find something like that, I fix it, so I don't think that's the problem. Besides, I don't think that would cause a *sudden* memory spike. We aren't automating another application, we call into dlls for extended functionality like creating the PDF files. The only recursive code in the whole blasted app is some callbacks to populate comboboxes, so I don't think that's it either. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, July 13, 2004 10:56 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Charlotte, I remember that when an application is opened by automation it is sometimes not visible. For example if I open Excel from Access and I want to see the spreadsheet on screen, I have to explicitly set a visible property to true. Could your code be recursively opening objects but not closing them? I guess this would apply to applications, recordsets, queries, and other things too. I'm just trying to save the wall ;-) Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Tue Jul 13 15:16:26 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Tue, 13 Jul 2004 22:16:26 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD67@DISABILITYINS01> Message-ID: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Tue Jul 13 15:25:32 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Tue, 13 Jul 2004 22:25:32 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> Message-ID: <20040713202359.A81405AD7F@smtp8.wanadoo.nl> That is if the setwarnings false mentioned in earlier mail does not work..;-) Pffff -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens StaRKeY Verzonden: dinsdag 13 juli 2004 22:16 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:25:32 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Jim.Hale at FleetPride.com Tue Jul 13 15:33:05 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 13 Jul 2004 15:33:05 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDA0@corp-es01.fleetpride.com> try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Tue Jul 13 16:23:12 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 13 Jul 2004 23:23:12 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ References: <004001c46676$9ecee5f0$0501a8c0@colbyws> Message-ID: <001f01c4691f$c1c71950$fac581d5@pedro> Thanks to all that responded on my question. I wil try all options on test front-ends and i'll hope that they wil properly be compiled / compacted. Pedro Janssen ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Saturday, July 10, 2004 2:08 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > Pedro, > > Just remember that if you run a split database, i.e. FE/BE, doing a compact > on exit will only compact the FE, not the BE. Compacting the FE may not > even be necessary depending on whether you get a new copy daily (as I do) or > what you do with the FE. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of pedro at plex.nl > Sent: Friday, July 09, 2004 9:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and indeed > its a permissions protected database. > So i can delete these db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the fact > that in this way the database several times a day wil be compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of thing > when the database attempted to compact but for some reason (often > permissions), it couldn't delete the original and rename the db1.mdb, etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates temporary?? > databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different > filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DaveSharpe2 at cox.net Tue Jul 13 17:24:47 2004 From: DaveSharpe2 at cox.net (Dave Sharpe) Date: Tue, 13 Jul 2004 18:24:47 -0400 Subject: [AccessD] New MS Demonstration Databases Available Message-ID: <008101c46928$34c153f0$dd2f0a44@bcsrkeext6137> Applies to Microsoft Office Access 2003 Microsoft Access 2000 and 2002 One of the best ways to put Access to work is to adapt an existing database or database object (database objects: An Access database contains objects such as tables, queries, forms, reports, pages, macros, and modules. An Access project contains objects such as forms, reports, pages, macros, and modules.) to suit your needs. To help you be more productive, the Access team provides a number of databases that you can download and adapt for your own use. http://www.office.microsoft.com/assistance/preview.aspx?AssetID=HA011201381033 From KP at sdsonline.net Tue Jul 13 18:00:03 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Wed, 14 Jul 2004 09:00:03 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <40F46C51.29911.4DAF67C@lexacorp.com.pg> Message-ID: <002f01c4692d$22c754b0$6501a8c0@user> Thanks very much Stuart - it's always great to have a version that someone has working! You were right about the run permissions - I had checked them but as I do not have a password for user Win I didn't enter one - I had no idea that that was required (which still strikes me as odd) Brilliant - thanks all. Kath ----- Original Message ----- From: Stuart McLachlan To: access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 11:12 PM Subject: Re: [AccessD] Scheduled Access task - URGENT On 13 Jul 2004 at 22:27, Kath Pelletti wrote: > Hi Gustav / Stuart / Andy - thanks for suggestions - > > I can't get it to work with or without the quotes around the Autorun parameter. > > This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. > > My syntax works as a shortcut, but simply does not run as a scheduled task. > > To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? > With the attached test.mdb (not attached to list reply) in C:\ I've just run a scheduled task with the comand line "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmd Test Argument It works fine (opens the mdb and displays two message boxes, once from a function called in the Autoexec macro and a second one called from the startup forms on_open. Having just set up the task, the thought struck me that you may not have set the run permissions for the task properly. You need to set the "Run as" and password for the task. Attachments: C:\test.mdb -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KP at sdsonline.net Tue Jul 13 18:02:19 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Wed, 14 Jul 2004 09:02:19 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <000901c468f7$08b1fe30$6401a8c0@COA3> Message-ID: <003901c4692d$737e0520$6501a8c0@user> Thanks Steve - that was it. Glad to have this one in the archives. Kath ----- Original Message ----- From: Steve Conklin (Developer at UltraDNT) To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 14, 2004 2:32 AM Subject: RE: [AccessD] Scheduled Access task - URGENT Does the Windows user id have a password? In my experience, WinXP won't run a Scheduled Task for a user id that does not have one. hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kath Pelletti Sent: Tuesday, July 13, 2004 8:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From glen_mcwilliams at msn.com Tue Jul 13 20:14:32 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Tue, 13 Jul 2004 18:14:32 -0700 Subject: [AccessD] more on early versus late binding Message-ID: John Excelent description of referencing and binding, both early and late. No mud at all. Very, very clear. Glen McWilliams glen at creativehightek.com >From: "jwcolby" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] more on early versus late binding >Date: Mon, 12 Jul 2004 21:28:34 -0400 > >Nope, early is not that, and late is not that. > >Early is dimensioning a variable as a specific object type - for example as >an excel object or a word object or a command control etc. then referencing >the object properties directly. > >Dim cbo as combo > debug.print cbo.Name > >Late is dimensioning a variable as an OBJECT data type, then referencing >the >property but using the "object object". > >Dim cbo as object > debug.print cbo.name > >The reason it is called early and late is simply that early binding: > >Dim cbo as combo > >Causes the compiler (interpreter actually) to find and set a reference to >the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > >Late binding causes the interpreter to "discover" what the object is by >what >is stored in the variable AT RUN TIME and look up the properties and stuff >in the actual object (library, ocx etc) at run time. > >Thus the early binding causes the map of dim to real thing without ever >even >running the code. Late binding simply cannot discover what to do with the >dimensioned variable until the variable is set = to something. > >This is very often used to pass in different things to a function for >example. > >Function MyObject(obj as object) > debug.print object.name >End function > >Function TestObjects() > MyObject MyCbo > MyObject MyForm >End function > >MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word >document, a combo box. What happens inside of MyObject may or may not be >legal depending on what you pass in to the function, but you can pass in >ANY >OBJECT AT ALL because the compiler does not check the dimensioned type >against the passed in type (other than to determine that it is an object). > >Function MyControl(txt As TextBox) > Debug.Print txt.Name >End Function > >Function TestControls() >Dim MyCbo As ComboBox >Dim MyTextBox As TextBox >Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox >End Function > >Test control will correctly pass in controls but won't run since MyForm is >dimensioned as a form and at RUN TIME the interpreter checks all calls to >MyControl to see if what is being passed in is a variable of type control. > >With early binding, since you dimension an object specifically to its >object >type, you can use intellisense because the compiler knows how to find the >object information. With late binding, the object type isn't determined >until something is actually passed in so how can intellisense help you out. > >Hope this helps explain what early and late binding are really all about. > >Now... Setting the reference really has nothing to do with any of this >OTHER >THAN allowing some specific object type to be found in a library, and thus >be dimensioned to a specific object type. IOW, If I don't reference the >excel library, I can STILL USE EXCEL, but I have to late bind, dim as an >object, then store an Excel object (spreadsheet, cell etc) in the variable. >If I reference the excel library, now I can early bind and dimension a >variable as a spreadsheet, or a cell, or whatever I want since those things >can be found in a referenced library. > >So setting the reference is neither early binding nor late binding. It >ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY >EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel >in any way whatsoever. However I cannot reference an excel object type >(dim >a variable as a cell or spreadsheet etc) unless I reference the Excel >library. > >Referencing a library does nothing more than load (before compiling) a >table >of objects inside that library into a table of all possible objects for the >compiler to use to look up dimension statement datatypes in. If a >dimension >statement datatype is not found in the table of all possible datatypes, >then >a compile error is thrown on the dim statement. > >Clear as mud? > >John W. Colby >www.ColbyConsulting.com > From connie.kamrowski at agric.nsw.gov.au Tue Jul 13 20:56:34 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Wed, 14 Jul 2004 11:56:34 +1000 Subject: [AccessD] Invalid reference to the property Form/Report Message-ID: Hi All I notice Susan had this problem in the Archives with no solve but was hoping someone had further ideas. I have completed my database and testing the new release and suddenly getting an error in a place where I did not get one in an older version. I'm not getting it on the development machine, only on test machines, and them only on some of the test machines. The code is called when my form opens and is as follows: Private Sub Species_RowSource() 'Species are required on Approval (non Schedule 2 Species only) and Permit (Schedule 2 Species only) type Authorities only On Error GoTo Failure If gfSpeciesRequired = True Then 'Species is required Me.sfrDAuthoritySpecies.Visible = True If gfSchedule2Only = True Then 'Only Schedule 2 Required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to schedule 2 only Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpecies2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery Else 'gfSchedule2Only = False 'Species other than 2 required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to nonSchedule 2 Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpeciesNon2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery End If Else 'Species is not required at all - Licence type Authority Me.sfrDAuthoritySpecies.Visible = False End If ExitRoutine: Exit Sub Failure: Call ErrorHandler(lngErrorNumber:=Err.Number, strErrorDescription:=Err.Description, strErrorSource:=Err.Source) Resume ExitRoutine End Sub The code runs through and throws to the error handler - crashes with error 2455 you have entered an expression with an invalid reference to the property Form/Report Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From michael.broesdorf at web.de Tue Jul 13 21:25:41 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Wed, 14 Jul 2004 04:25:41 +0200 Subject: AW: [AccessD] Invalid reference to the property Form/Report In-Reply-To: Message-ID: A while ago I had a strange problem like this too. There seems to be a problem if you have a couple of subforms on tab-controls. If I remember this correctly, the solution was to bring the subform to the foreground in design view (no joke!). If that might be the case with your app I can dig out the details. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von connie.kamrowski at agric.nsw.gov.au Gesendet: Mittwoch, 14. Juli 2004 03:57 An: accessd at databaseadvisors.com Betreff: [AccessD] Invalid reference to the property Form/Report Hi All I notice Susan had this problem in the Archives with no solve but was hoping someone had further ideas. I have completed my database and testing the new release and suddenly getting an error in a place where I did not get one in an older version. I'm not getting it on the development machine, only on test machines, and them only on some of the test machines. The code is called when my form opens and is as follows: Private Sub Species_RowSource() 'Species are required on Approval (non Schedule 2 Species only) and Permit (Schedule 2 Species only) type Authorities only On Error GoTo Failure If gfSpeciesRequired = True Then 'Species is required Me.sfrDAuthoritySpecies.Visible = True If gfSchedule2Only = True Then 'Only Schedule 2 Required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to schedule 2 only Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpecies2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery Else 'gfSchedule2Only = False 'Species other than 2 required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to nonSchedule 2 Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpeciesNon2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery End If Else 'Species is not required at all - Licence type Authority Me.sfrDAuthoritySpecies.Visible = False End If ExitRoutine: Exit Sub Failure: Call ErrorHandler(lngErrorNumber:=Err.Number, strErrorDescription:=Err.Description, strErrorSource:=Err.Source) Resume ExitRoutine End Sub The code runs through and throws to the error handler - crashes with error 2455 you have entered an expression with an invalid reference to the property Form/Report Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jul 13 21:40:25 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jul 2004 12:40:25 +1000 Subject: [AccessD] Invalid reference to the property Form/Report In-Reply-To: Message-ID: <40F529B9.30877.833BF2@lexacorp.com.pg> On 14 Jul 2004 at 11:56, connie.kamrowski at agric.nsw.go wrote: > > The code is called when my form opens and is as follows: > .... > > The code runs through and throws to the error handler - crashes with error > 2455 you have entered an expression with an invalid reference to the > property Form/Report > If you take the error handler out, what line does the function break on? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Tue Jul 13 21:56:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 22:56:56 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713202359.A81405AD7F@smtp8.wanadoo.nl> Message-ID: <001801c4694e$39bb7a90$0501a8c0@colbyws> Setwarnings does NOT work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:26 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel That is if the setwarnings false mentioned in earlier mail does not work..;-) Pffff -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens StaRKeY Verzonden: dinsdag 13 juli 2004 22:16 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:25:32 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 21:56:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 22:56:56 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> Message-ID: <001901c4694e$3a4f5620$0501a8c0@colbyws> That's what I like, a man with multiple valid suggestions. The answers in all cases is simply that I have always just opened the damned spreadsheet and renamed the sheet to what I wanted. I guess I could open the sheet, close it, open the link and edit that. I am getting a spreadsheet from a client, attached to an email. I use outlook (withevents) to copy the email to a specific email folder (using a rule) then raise an event for each attachment. My code in another class figures out what to do with the attachment including just using the messages .save method to put it in a folder on the disk. I then take that saved email and copy it to another location with a common name (always the same), open the spreadsheet (if it is a spreadsheet, some aren't) and rename the interior sheet since clients can NEVER be expected to name the sheets the same thing from day to day). Having done all that I have a spreadsheet of a given name with an interior sheet of a given name and the link just works. The alternative is to (and I have done this also) save the sheet, get the interior sheet name, open the table def, and edit the filename and sheet name portions and save the tabledef back again. Both do work, both require Excel automation to open the sheet. Anyway, thanks for the suggestions. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 22:02:00 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 23:02:00 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <100F91B31300334B89EC531C9DCB086506580A@tccexch01.tappeconstruction.net> Message-ID: <001a01c4694e$eee4bcb0$0501a8c0@colbyws> Thanks, that is probably what I am looking for. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Brett Barabash Sent: Tuesday, July 13, 2004 4:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Preventing user prompts from Excel Hi John, Try xlApp.DisplayAlerts = False (it's the equivalent of DoCmd.SetWarnings False) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 22:07:33 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 23:07:33 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <001b01c4694f$b57abff0$0501a8c0@colbyws> :) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Glen McWilliams Sent: Tuesday, July 13, 2004 9:15 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] more on early versus late binding John Excelent description of referencing and binding, both early and late. No mud at all. Very, very clear. Glen McWilliams glen at creativehightek.com >From: "jwcolby" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] more on early versus late binding >Date: Mon, 12 Jul 2004 21:28:34 -0400 > >Nope, early is not that, and late is not that. > >Early is dimensioning a variable as a specific object type - for >example as an excel object or a word object or a command control etc. >then referencing the object properties directly. > >Dim cbo as combo > debug.print cbo.Name > >Late is dimensioning a variable as an OBJECT data type, then >referencing >the >property but using the "object object". > >Dim cbo as object > debug.print cbo.name > >The reason it is called early and late is simply that early binding: > >Dim cbo as combo > >Causes the compiler (interpreter actually) to find and set a reference >to the actual object (class, ocx etc) that the cbo truly is AT COMPILE >TIME. > >Late binding causes the interpreter to "discover" what the object is by >what >is stored in the variable AT RUN TIME and look up the properties and stuff >in the actual object (library, ocx etc) at run time. > >Thus the early binding causes the map of dim to real thing without ever >even >running the code. Late binding simply cannot discover what to do with the >dimensioned variable until the variable is set = to something. > >This is very often used to pass in different things to a function for >example. > >Function MyObject(obj as object) > debug.print object.name >End function > >Function TestObjects() > MyObject MyCbo > MyObject MyForm >End function > >MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word >document, a combo box. What happens inside of MyObject may or may not >be legal depending on what you pass in to the function, but you can >pass in ANY OBJECT AT ALL because the compiler does not check the >dimensioned type against the passed in type (other than to determine >that it is an object). > >Function MyControl(txt As TextBox) > Debug.Print txt.Name >End Function > >Function TestControls() >Dim MyCbo As ComboBox >Dim MyTextBox As TextBox >Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox >End Function > >Test control will correctly pass in controls but won't run since MyForm >is dimensioned as a form and at RUN TIME the interpreter checks all >calls to MyControl to see if what is being passed in is a variable of >type control. > >With early binding, since you dimension an object specifically to its >object >type, you can use intellisense because the compiler knows how to find the >object information. With late binding, the object type isn't determined >until something is actually passed in so how can intellisense help you out. > >Hope this helps explain what early and late binding are really all >about. > >Now... Setting the reference really has nothing to do with any of this >OTHER >THAN allowing some specific object type to be found in a library, and thus >be dimensioned to a specific object type. IOW, If I don't reference the >excel library, I can STILL USE EXCEL, but I have to late bind, dim as an >object, then store an Excel object (spreadsheet, cell etc) in the variable. >If I reference the excel library, now I can early bind and dimension a >variable as a spreadsheet, or a cell, or whatever I want since those things >can be found in a referenced library. > >So setting the reference is neither early binding nor late binding. It >ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY >EXCEL CODE... I haven't early or late bound to Excel - I haven't used >Excel in any way whatsoever. However I cannot reference an excel >object type (dim a variable as a cell or spreadsheet etc) unless I >reference the Excel library. > >Referencing a library does nothing more than load (before compiling) a >table >of objects inside that library into a table of all possible objects for the >compiler to use to look up dimension statement datatypes in. If a >dimension >statement datatype is not found in the table of all possible datatypes, >then >a compile error is thrown on the dim statement. > >Clear as mud? > >John W. Colby >www.ColbyConsulting.com > From bchacc at san.rr.com Tue Jul 13 22:46:51 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 20:46:51 -0700 Subject: [AccessD] more on early versus late binding References: <000a01c46878$b7138310$0501a8c0@colbyws> Message-ID: <032f01c46955$33113980$6601a8c0@HAL9002> John: Re: speed, after the object is late binded, is there any difference in execution speed? Rocky ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 12, 2004 6:28 PM Subject: RE: [AccessD] more on early versus late binding > Nope, early is not that, and late is not that. > > Early is dimensioning a variable as a specific object type - for example as > an excel object or a word object or a command control etc. then referencing > the object properties directly. > > Dim cbo as combo > debug.print cbo.Name > > Late is dimensioning a variable as an OBJECT data type, then referencing the > property but using the "object object". > > Dim cbo as object > debug.print cbo.name > > The reason it is called early and late is simply that early binding: > > Dim cbo as combo > > Causes the compiler (interpreter actually) to find and set a reference to > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > Late binding causes the interpreter to "discover" what the object is by what > is stored in the variable AT RUN TIME and look up the properties and stuff > in the actual object (library, ocx etc) at run time. > > Thus the early binding causes the map of dim to real thing without ever even > running the code. Late binding simply cannot discover what to do with the > dimensioned variable until the variable is set = to something. > > This is very often used to pass in different things to a function for > example. > > Function MyObject(obj as object) > debug.print object.name > End function > > Function TestObjects() > MyObject MyCbo > MyObject MyForm > End function > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > document, a combo box. What happens inside of MyObject may or may not be > legal depending on what you pass in to the function, but you can pass in ANY > OBJECT AT ALL because the compiler does not check the dimensioned type > against the passed in type (other than to determine that it is an object). > > Function MyControl(txt As TextBox) > Debug.Print txt.Name > End Function > > Function TestControls() > Dim MyCbo As ComboBox > Dim MyTextBox As TextBox > Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox > End Function > > Test control will correctly pass in controls but won't run since MyForm is > dimensioned as a form and at RUN TIME the interpreter checks all calls to > MyControl to see if what is being passed in is a variable of type control. > > With early binding, since you dimension an object specifically to its object > type, you can use intellisense because the compiler knows how to find the > object information. With late binding, the object type isn't determined > until something is actually passed in so how can intellisense help you out. > > Hope this helps explain what early and late binding are really all about. > > Now... Setting the reference really has nothing to do with any of this OTHER > THAN allowing some specific object type to be found in a library, and thus > be dimensioned to a specific object type. IOW, If I don't reference the > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > object, then store an Excel object (spreadsheet, cell etc) in the variable. > If I reference the excel library, now I can early bind and dimension a > variable as a spreadsheet, or a cell, or whatever I want since those things > can be found in a referenced library. > > So setting the reference is neither early binding nor late binding. It > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel > in any way whatsoever. However I cannot reference an excel object type (dim > a variable as a cell or spreadsheet etc) unless I reference the Excel > library. > > Referencing a library does nothing more than load (before compiling) a table > of objects inside that library into a table of all possible objects for the > compiler to use to look up dimension statement datatypes in. If a dimension > statement datatype is not found in the table of all possible datatypes, then > a compile error is thrown on the dim statement. > > Clear as mud? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Monday, July 12, 2004 2:50 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] more on early versus late binding > > > I kind of see the terms early and late -- in Access -- a bit differently > than the way most documentation wants to define them. To me, early just > means the library is referenced, hence the objects are instantiated, but not > being used -- late, the object is instantiated at the time it's needed -- > the reference is implicit. > > I see a lot of documentation that refer to setting references manually via > the References dialog box as "early" binding, but using the References > collection and object are never mentioned -- however... > > Seems to me you're setting the reference and instantiating the objects > without using them, so, to my mind, it's early. > > Susan H. > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Tue Jul 13 22:51:56 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 20:51:56 -0700 Subject: [AccessD] Outlook Asks Too Many Questions References: <003601c468f2$612b79b0$082da8c0@D58BT131> Message-ID: <038601c46955$e875fe00$6601a8c0@HAL9002> Perry: That looks like precisely what is needed. Thank you. Thank you. Thank you. Rocky ----- Original Message ----- From: "Perry Harold" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 13, 2004 8:59 AM Subject: RE: [AccessD] Outlook Asks Too Many Questions > Try using ClickYes > > http://www.contextmagic.com/express-clickyes/ > > Can be called programmatically as well I believe. > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - > Beach Access Software > Sent: Tuesday, July 13, 2004 11:18 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Outlook Asks Too Many Questions > > > Dear List: > > I have a program which send out batches of emails. I'm now, thanks to the > list, using late binding, and the Outlook object model. Recently the client > upgraded to Office XP from O2K. Now when she sends a batch of emails she > gets a message that says "A program is trying to automatically send e-mail > on your behalf. Do you want to allow this?" (yes, no, help). > > Help says it is because I'm using the VBA command .Send (which is true). So > helpful and yet so annoying. Thank you MS for watching over me and my apps. > > Is there a way to suppress this message? If she sends 100 e-mails, she has > to answer this question 100 times. > > MTIA > > is > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From viner at eunet.yu Wed Jul 14 00:53:37 2004 From: viner at eunet.yu (Ervin Brindza) Date: Wed, 14 Jul 2004 07:53:37 +0200 Subject: [AccessD] Batch printing the .doc files from a folder References: <200407131526.i6DFQLQ23813@databaseadvisors.com> Message-ID: <00b401c46969$32d1a860$0100a8c0@razvoj> Max, It's perfect!!! Many thanks for the code. I need it for Access97 too(forgot to mention), but you helped me a lot! Have a nice day, Ervin ----- Original Message ----- From: To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 5:25 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Try This: Create a Button on a form call ButPrintAllDocFiles and put this > code behind the form > > Option Compare Database > Option Explicit > > Private Sub ButPrintWordDocs_Click() > Call fPrintAllDocFiles > End Sub > Private Function fPrintAllDocFiles() > ' FileDialog require a Reference to Microsoft Office 11 Object Library > ' and we also need a reference to Microsoft Word 11 Object Library > ' in HELP, search under 'system' in the index > Dim fs, f, f1, fc, sDocs, folderspec As String, iResponse As Integer > Dim sFN As String > Dim objWord As Word.Application > Set fs = CreateObject("Scripting.FileSystemObject") > Set objWord = New Word.Application > folderspec = pfGetSingleFolder("C:\") > If Len(folderspec) = 0 Then GoTo exithere > Set f = fs.GetFolder(folderspec) > Set fc = f.Files > For Each f1 In fc > If Right(f1.Name, 4) = ".doc" And Not Left(f1.Name, 1) = "~" Then > sFN = folderspec & "\" & f1.Name > ' comment out the next 2 lines for autoprinting and the corresponding > 'End If' > iResponse = MsgBox("Print This File:-" & vbCrLf & vbCrLf & sFN, > vbYesNo + vbQuestion, "Print All") > If iResponse = vbYes Then > objWord.Documents.Add Template:=sFN, NewTemplate:=False > objWord.Options.PrintBackground = True > objWord.ActiveDocument.PrintOut > objWord.ActiveDocument.Close > End If > End If > Next > exithere: > Set objWord = Nothing > MsgBox "Finished" > Exit Function > End Function > Public Function pfGetSingleFolder(Optional strStartFolder As String) As > Variant > ' FileDialog require a Reference to Microsoft Office 11 Object Library > On Error GoTo errhandler > Dim fd As FileDialog > Set fd = FileDialog(msoFileDialogFolderPicker) > fd.AllowMultiSelect = False > fd.Title = "Select a Folder to Auto-Print ALL Word documents in that > Folder" > fd.ButtonName = "Select Folder" > fd.InitialFileName = strStartFolder > fd.Show > pfGetSingleFolder = fd.SelectedItems.Item(1) ' only 1 allowed > 'MsgBox pfGetSingleFolder > exithere: > Set fd = Nothing > Exit Function > errhandler: > Select Case Err.Number > Case 5 ' user cancelled > pfGetSingleFolder = "" > Case Else > MsgBox Err.Number & vbCrLf & Err.Description > End Select > Resume exithere > End Function > > Max Sherman > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ervin Brindza > Sent: 13 July 2004 13:08 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Batch printing the .doc files from a folder > > Mark, > many thanks for the suggestion, but my customer want a single button push > :-( Ervin > ----- Original Message ----- > From: "Mitsules, Mark S. (Newport News)" > To: "'Access Developers discussion and problem solving'" > > Sent: 13 July, 2004 2:02 PM > Subject: RE: [AccessD] Batch printing the .doc files from a folder > > > > Ervin, > > > > The quickest, simplest way I know of is to highlight them all, > right-click, > > and choose print. They will each open, print, and close automatically. > > > > > > Mark > > > > > > -----Original Message----- > > From: Ervin Brindza [mailto:viner at eunet.yu] > > Sent: Tuesday, July 13, 2004 4:47 AM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Batch printing the .doc files from a folder > > > > > > Hi, > > there are a plenty of .doc files in a particular folder, and I want to > print > > them without manually opening every single file. I'm interested in VBA > > or .bat or whatever solution! > > Many TIA's > > Ervin > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > --- > Incoming mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Wed Jul 14 08:11:14 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 09:11:14 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <032f01c46955$33113980$6601a8c0@HAL9002> Message-ID: <20040714131109.PCEE1705.imf16aec.mail.bellsouth.net@SUSANONE> And I'm curious if it's enough with today's systems to really matter. Susan H. John: Re: speed, after the object is late binded, is there any difference in execution speed? From gustav at cactus.dk Wed Jul 14 08:57:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 15:57:48 +0200 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <32007103843568110723d0567@global.net.pg> References: <2F8793082E00D4119A1700B0D0216BF8017A1F98@main2.marlow.com> <32007103843568110723d0567@global.net.pg> Message-ID: <11525103216.20040714155748@cactus.dk> Hi all This topic popped up in all its glory in the recent issue of "Woody's Access Watch" where Helen Feddema is goofing around trying to parse date/time strings to figure out time zones. Of course, this dirty deroute is paved with traps so it doesn't work outside the US where other regional settings are used. Just in case anyone should have a need for dealing with time zones, here are a couple of functions we use. You'll quickly notice that essentially it is nothing more than a little clean up and one single line of code: datRemote = DateAdd("n", lngBias, datLocal) If you have nothing to do Friday you may wish to browse Helen's demo: ftp://ftp.helenfeddema.com/pub/accarch121.zip Public Function TimeZoneBiasDiff( _ ByVal lngLocalTimeBias As Long, _ ByVal lngRemoteTimeBias As Long) _ As Long ' Calculates the difference in minutes between two time zones, ' typically the local time zone and a remote time zone. ' Both time zones must be expressed by their bias relative to ' UTC (Coordinated Universal Time) which is measured in minutes. ' ' 2000-05-30. Cactus Data ApS, CPH. ' Minimum amount of minutes for a time zone bias. Const clngTimeZoneBiasMin As Long = 15 Dim lngTimeZoneBiasDiff As Long ' Round off time zone bias by minimum time zone difference. lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin ' Calculate difference in time zone bias. lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias TimeZoneBiasDiff = lngTimeZoneBiasDiff End Function Public Function DateAddTimeZoneDiff( _ ByVal datLocal As Date, _ ByVal lngLocalBias, _ ByVal lngRemoteBias) _ As Date ' Calculates the date/time of datLocal in a remote time zone. ' The difference in minutes will be the difference between the ' local time zone bias and the remote time zone bias where the ' bias are relative to UTC. ' ' Examples: ' ' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) ' will return datRemote as eleven hours behind local time. ' ' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) ' will return datRemote as eleven hours ahead of local time. ' ' 2000-05-30. Cactus Data ApS, CPH. Dim datRemote As Date Dim lngBias As Long ' Get difference (in minutes) in time zone bias. lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) ' Calculate remote date/time. datRemote = DateAdd("n", lngBias, datLocal) DateAddTimeZoneDiff = datRemote End Function Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. /gustav > On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> Hi Drew >> >> > Thanks. Next version I'll incorporate that. >> >> OK. >> >> > Time zones are pretty easy. In fact, all of this date stuff is too. The >> > only real monster is Arizona, which decreed to ignore daylight savings time. >> >> So how DO you deal with the time zones? >> >> I have seen no options in Access for this contrary to Oracle which can >> record date/time including the time zone. >> >> My thought was to use a byte field with a shifted value similar to how >> MySQL can store a year value in a byte field ... >> > You could get the Bias member of the Time_Zone_Information structure > retrieved with the GetTimeZoneInformation API function and either > apply it to the time in question or store it in another field as a > long (or integer if space is critical) > > Stuart From artful at rogers.com Wed Jul 14 09:17:49 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 14 Jul 2004 10:17:49 -0400 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <2F7BA03C93D17D48B13C42228C8FDAF2785276@server.domain.local> Message-ID: <010a01c469ad$57facf10$6601a8c0@rock> Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:22:45 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:22:45 -0400 Subject: [AccessD] Time zones (was: internationalization) Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> >Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. Are you seriously suggesting that the British Empire is not the center of the Universe anymore? ;-) So what is UTC (for us internationally challenged individuals). JWC -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, July 14, 2004 9:58 AM To: AccessD at databaseadvisors.com Subject: Re: [AccessD] Time zones (was: internationalization) Hi all This topic popped up in all its glory in the recent issue of "Woody's Access Watch" where Helen Feddema is goofing around trying to parse date/time strings to figure out time zones. Of course, this dirty deroute is paved with traps so it doesn't work outside the US where other regional settings are used. Just in case anyone should have a need for dealing with time zones, here are a couple of functions we use. You'll quickly notice that essentially it is nothing more than a little clean up and one single line of code: datRemote = DateAdd("n", lngBias, datLocal) If you have nothing to do Friday you may wish to browse Helen's demo: ftp://ftp.helenfeddema.com/pub/accarch121.zip Public Function TimeZoneBiasDiff( _ ByVal lngLocalTimeBias As Long, _ ByVal lngRemoteTimeBias As Long) _ As Long ' Calculates the difference in minutes between two time zones, ' typically the local time zone and a remote time zone. ' Both time zones must be expressed by their bias relative to ' UTC (Coordinated Universal Time) which is measured in minutes. ' ' 2000-05-30. Cactus Data ApS, CPH. ' Minimum amount of minutes for a time zone bias. Const clngTimeZoneBiasMin As Long = 15 Dim lngTimeZoneBiasDiff As Long ' Round off time zone bias by minimum time zone difference. lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin ' Calculate difference in time zone bias. lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias TimeZoneBiasDiff = lngTimeZoneBiasDiff End Function Public Function DateAddTimeZoneDiff( _ ByVal datLocal As Date, _ ByVal lngLocalBias, _ ByVal lngRemoteBias) _ As Date ' Calculates the date/time of datLocal in a remote time zone. ' The difference in minutes will be the difference between the ' local time zone bias and the remote time zone bias where the ' bias are relative to UTC. ' ' Examples: ' ' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) ' will return datRemote as eleven hours behind local time. ' ' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) ' will return datRemote as eleven hours ahead of local time. ' ' 2000-05-30. Cactus Data ApS, CPH. Dim datRemote As Date Dim lngBias As Long ' Get difference (in minutes) in time zone bias. lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) ' Calculate remote date/time. datRemote = DateAdd("n", lngBias, datLocal) DateAddTimeZoneDiff = datRemote End Function Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. /gustav > On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> Hi Drew >> >> > Thanks. Next version I'll incorporate that. >> >> OK. >> >> > Time zones are pretty easy. In fact, all of this date stuff is too. The >> > only real monster is Arizona, which decreed to ignore daylight savings time. >> >> So how DO you deal with the time zones? >> >> I have seen no options in Access for this contrary to Oracle which can >> record date/time including the time zone. >> >> My thought was to use a byte field with a shifted value similar to how >> MySQL can store a year value in a byte field ... >> > You could get the Bias member of the Time_Zone_Information structure > retrieved with the GetTimeZoneInformation API function and either > apply it to the time in question or store it in another field as a > long (or integer if space is critical) > > Stuart -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:26:55 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:26:55 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6A@DISABILITYINS01> Rocky, The issue isn't that simple. No, after the object is bound the speed is the same. It's just that the object has to be looked up EVERY TIME it is bound. If you have a function that opens a spreadsheet, with early binding this is done ONCE at compile time. With late binding it is done every time the function is called. OTOH, you no longer have to worry about lib version / names. Tradeoffs. JWC -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 13, 2004 11:47 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] more on early versus late binding John: Re: speed, after the object is late binded, is there any difference in execution speed? Rocky ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 12, 2004 6:28 PM Subject: RE: [AccessD] more on early versus late binding > Nope, early is not that, and late is not that. > > Early is dimensioning a variable as a specific object type - for example as > an excel object or a word object or a command control etc. then referencing > the object properties directly. > > Dim cbo as combo > debug.print cbo.Name > > Late is dimensioning a variable as an OBJECT data type, then referencing the > property but using the "object object". > > Dim cbo as object > debug.print cbo.name > > The reason it is called early and late is simply that early binding: > > Dim cbo as combo > > Causes the compiler (interpreter actually) to find and set a reference to > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > Late binding causes the interpreter to "discover" what the object is by what > is stored in the variable AT RUN TIME and look up the properties and stuff > in the actual object (library, ocx etc) at run time. > > Thus the early binding causes the map of dim to real thing without ever even > running the code. Late binding simply cannot discover what to do with the > dimensioned variable until the variable is set = to something. > > This is very often used to pass in different things to a function for > example. > > Function MyObject(obj as object) > debug.print object.name > End function > > Function TestObjects() > MyObject MyCbo > MyObject MyForm > End function > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > document, a combo box. What happens inside of MyObject may or may not be > legal depending on what you pass in to the function, but you can pass in ANY > OBJECT AT ALL because the compiler does not check the dimensioned type > against the passed in type (other than to determine that it is an object). > > Function MyControl(txt As TextBox) > Debug.Print txt.Name > End Function > > Function TestControls() > Dim MyCbo As ComboBox > Dim MyTextBox As TextBox > Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox > End Function > > Test control will correctly pass in controls but won't run since MyForm is > dimensioned as a form and at RUN TIME the interpreter checks all calls to > MyControl to see if what is being passed in is a variable of type control. > > With early binding, since you dimension an object specifically to its object > type, you can use intellisense because the compiler knows how to find the > object information. With late binding, the object type isn't determined > until something is actually passed in so how can intellisense help you out. > > Hope this helps explain what early and late binding are really all about. > > Now... Setting the reference really has nothing to do with any of this OTHER > THAN allowing some specific object type to be found in a library, and thus > be dimensioned to a specific object type. IOW, If I don't reference the > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > object, then store an Excel object (spreadsheet, cell etc) in the variable. > If I reference the excel library, now I can early bind and dimension a > variable as a spreadsheet, or a cell, or whatever I want since those things > can be found in a referenced library. > > So setting the reference is neither early binding nor late binding. It > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel > in any way whatsoever. However I cannot reference an excel object type (dim > a variable as a cell or spreadsheet etc) unless I reference the Excel > library. > > Referencing a library does nothing more than load (before compiling) a table > of objects inside that library into a table of all possible objects for the > compiler to use to look up dimension statement datatypes in. If a dimension > statement datatype is not found in the table of all possible datatypes, then > a compile error is thrown on the dim statement. > > Clear as mud? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Monday, July 12, 2004 2:50 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] more on early versus late binding > > > I kind of see the terms early and late -- in Access -- a bit differently > than the way most documentation wants to define them. To me, early just > means the library is referenced, hence the objects are instantiated, but not > being used -- late, the object is instantiated at the time it's needed -- > the reference is implicit. > > I see a lot of documentation that refer to setting references manually via > the References dialog box as "early" binding, but using the References > collection and object are never mentioned -- however... > > Seems to me you're setting the reference and instantiating the objects > without using them, so, to my mind, it's early. > > 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 JColby at dispec.com Wed Jul 14 09:30:15 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:30:15 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6B@DISABILITYINS01> Nope, this didn't work either. 8-( JWC -----Original Message----- From: Mackin, Christopher [mailto:CMackin at quiznos.com] Sent: Tuesday, July 13, 2004 4:10 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Preventing user prompts from Excel Try, xlApp.DisplayAlerts False This is off the top of my head so it may nee some minor tweaking, but I think the DisplayAlerts property is what you're after. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 1:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 14 09:33:28 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 16:33:28 +0200 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> Message-ID: <3027243594.20040714163328@cactus.dk> Hi John Oh, it isn't me, but yes you are right. I guess the astronomers have had a big word here: http://wwp.greenwichmeantime.com/info/utc.htm /gustav > Also, note "GMT" has been considered obsolete for years and has for every > serious use been replaced with UTC. > Are you seriously suggesting that the British Empire is not the center of > the Universe anymore? ;-) > So what is UTC (for us internationally challenged individuals). From JColby at dispec.com Wed Jul 14 09:35:36 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:35:36 -0400 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6C@DISABILITYINS01> LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:37:58 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:37:58 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> >try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close I get a compile error on xlNormal JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 13, 2004 4:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC From JColby at dispec.com Wed Jul 14 09:43:17 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:43:17 -0400 Subject: Late binding - RE: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6E@DISABILITYINS01> LOL. Because I am using late binding, and the xlNormal is a constant in the excel library which I do NOT have referenced I cannot use that constant directly. I have to reference the library, look up that constant and see what it really is (the integer value), then either declare that constant in my own module or simply use that value as a "magic number". This is another value that you get from early binding - the constants defined in the lib are available to you to use in your programming. John W. Colby -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 13, 2004 4:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 14 09:44:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 16:44:22 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> Message-ID: <11327896893.20040714164422@cactus.dk> Hi John Try with the specific file format: .SaveAs FileName:=strPathFileName, FileFormat:=xlExcel5, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False .Close In addition to this you may need to set Application.DisplayAlerts to False as well. This works for me. /gustav >>try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal > before you close > I get a compile error on xlNormal From Jim.Hale at FleetPride.com Wed Jul 14 09:43:45 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Wed, 14 Jul 2004 09:43:45 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDA5@corp-es01.fleetpride.com> Since you are already in the spreadsheet when you rename it why not read the data into a table right then and there. No linking. In fact, you dont even need to rename the sheet because you can use appexcel.worksheet(1) syntax. Something like the code that follows. BTW I solved the problem from an earlier thread of how to force text "numbers" to be recognized by Excel as numbers if that is still a problem for you. Regards, Jim Hale .WorkSheets(1).Select 'erase old data strQry(1) = "DELETE tblOutPut_Data.*, tblOutPut_Data.DEPT, tblOutPut_Data.COMPY " _ & " FROM tblOutPut_Data WHERE (((tblOutPut_Data.DEPT)=" & intBusUnit & ") AND ((tblOutPut_Data.COMPY)=" & intCo & "));" DoCmd.RunSQL strQry(1) 'Read results into tblOutPut_Data table Set dbs = WhichDB("tblOutPut_Data") 'CurrentDb() 'opens the Plan table Set rstbase = dbs.OpenRecordset("tblOutPut_Data", dbOpenTable) On Error Resume Next .Range("A2").Select 'select first cell of first record to read Dim x As Integer Do While Not IsEmpty(ActiveCell) rstbase.AddNew 'create records in output table For x = 0 To 16 If x < 4 Then rstbase.Fields(x) = .ActiveCell.Offset(0, x) 'change sign on Jan-Dec revenue If x > 3 Then If rstbase.Fields("rptline") = 4100 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4110 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4120 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4130 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 15000 Then rstbase.Fields(x) = Round(.ActiveCell.Offset(0, x), 3) Else rstbase.Fields(x) = Round(.ActiveCell.Offset(0, x), 3) End If End If Next x If Not rstbase.Fields("rptline") = 0 Then rstbase.Update 'This error occurs if duplicate Business Unit are loaded into the table. 'Business Unit is a primary key so duplicates are not allowed If Err.Number = 3022 Then MsgBox "Error #: " & Err.Number & " This record is already in the Database!", 16, "Error" Err.Clear ' Clear Err object fields End If .ActiveCell.Offset(1, 0).Select 'find first cell of next record Loop -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, July 13, 2004 9:57 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel That's what I like, a man with multiple valid suggestions. The answers in all cases is simply that I have always just opened the damned spreadsheet and renamed the sheet to what I wanted. I guess I could open the sheet, close it, open the link and edit that. I am getting a spreadsheet from a client, attached to an email. I use outlook (withevents) to copy the email to a specific email folder (using a rule) then raise an event for each attachment. My code in another class figures out what to do with the attachment including just using the messages .save method to put it in a folder on the disk. I then take that saved email and copy it to another location with a common name (always the same), open the spreadsheet (if it is a spreadsheet, some aren't) and rename the interior sheet since clients can NEVER be expected to name the sheets the same thing from day to day). Having done all that I have a spreadsheet of a given name with an interior sheet of a given name and the link just works. The alternative is to (and I have done this also) save the sheet, get the interior sheet name, open the table def, and edit the filename and sheet name portions and save the tabledef back again. Both do work, both require Excel automation to open the sheet. Anyway, thanks for the suggestions. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:16 PM To: 'Access Developers discussion and problem solving' S From bchacc at san.rr.com Wed Jul 14 10:12:10 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 14 Jul 2004 08:12:10 -0700 Subject: [AccessD] more on early versus late binding References: <05C61C52D7CAD211A7830008C7DF6F1079BD6A@DISABILITYINS01> Message-ID: <00bc01c469b4$efb4a680$6601a8c0@HAL9002> John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 14, 2004 7:26 AM Subject: RE: [AccessD] more on early versus late binding > Rocky, > > The issue isn't that simple. No, after the object is bound the speed is the > same. It's just that the object has to be looked up EVERY TIME it is bound. > If you have a function that opens a spreadsheet, with early binding this is > done ONCE at compile time. With late binding it is done every time the > function is called. OTOH, you no longer have to worry about lib version / > names. > > Tradeoffs. > > JWC > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 13, 2004 11:47 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] more on early versus late binding > > > John: > > Re: speed, after the object is late binded, is there any difference in > execution speed? > > Rocky > > ----- Original Message ----- > From: "jwcolby" > To: "'Access Developers discussion and problem solving'" > > Sent: Monday, July 12, 2004 6:28 PM > Subject: RE: [AccessD] more on early versus late binding > > > > Nope, early is not that, and late is not that. > > > > Early is dimensioning a variable as a specific object type - for example > as > > an excel object or a word object or a command control etc. then > referencing > > the object properties directly. > > > > Dim cbo as combo > > debug.print cbo.Name > > > > Late is dimensioning a variable as an OBJECT data type, then referencing > the > > property but using the "object object". > > > > Dim cbo as object > > debug.print cbo.name > > > > The reason it is called early and late is simply that early binding: > > > > Dim cbo as combo > > > > Causes the compiler (interpreter actually) to find and set a reference to > > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > > > Late binding causes the interpreter to "discover" what the object is by > what > > is stored in the variable AT RUN TIME and look up the properties and stuff > > in the actual object (library, ocx etc) at run time. > > > > Thus the early binding causes the map of dim to real thing without ever > even > > running the code. Late binding simply cannot discover what to do with the > > dimensioned variable until the variable is set = to something. > > > > This is very often used to pass in different things to a function for > > example. > > > > Function MyObject(obj as object) > > debug.print object.name > > End function > > > > Function TestObjects() > > MyObject MyCbo > > MyObject MyForm > > End function > > > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > > document, a combo box. What happens inside of MyObject may or may not be > > legal depending on what you pass in to the function, but you can pass in > ANY > > OBJECT AT ALL because the compiler does not check the dimensioned type > > against the passed in type (other than to determine that it is an object). > > > > Function MyControl(txt As TextBox) > > Debug.Print txt.Name > > End Function > > > > Function TestControls() > > Dim MyCbo As ComboBox > > Dim MyTextBox As TextBox > > Dim MyForm As Form > > Set MyForm = New Form_Form1 > > MyControl MyForm '<<<<< ERROR AT RUN TIME > > MyControl MyCbo > > MyControl MyTextBox > > End Function > > > > Test control will correctly pass in controls but won't run since MyForm is > > dimensioned as a form and at RUN TIME the interpreter checks all calls to > > MyControl to see if what is being passed in is a variable of type control. > > > > With early binding, since you dimension an object specifically to its > object > > type, you can use intellisense because the compiler knows how to find the > > object information. With late binding, the object type isn't determined > > until something is actually passed in so how can intellisense help you > out. > > > > Hope this helps explain what early and late binding are really all about. > > > > Now... Setting the reference really has nothing to do with any of this > OTHER > > THAN allowing some specific object type to be found in a library, and thus > > be dimensioned to a specific object type. IOW, If I don't reference the > > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > > object, then store an Excel object (spreadsheet, cell etc) in the > variable. > > If I reference the excel library, now I can early bind and dimension a > > variable as a spreadsheet, or a cell, or whatever I want since those > things > > can be found in a referenced library. > > > > So setting the reference is neither early binding nor late binding. It > > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > > EXCEL CODE... I haven't early or late bound to Excel - I haven't used > Excel > > in any way whatsoever. However I cannot reference an excel object type > (dim > > a variable as a cell or spreadsheet etc) unless I reference the Excel > > library. > > > > Referencing a library does nothing more than load (before compiling) a > table > > of objects inside that library into a table of all possible objects for > the > > compiler to use to look up dimension statement datatypes in. If a > dimension > > statement datatype is not found in the table of all possible datatypes, > then > > a compile error is thrown on the dim statement. > > > > Clear as mud? > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > > Sent: Monday, July 12, 2004 2:50 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] more on early versus late binding > > > > > > I kind of see the terms early and late -- in Access -- a bit differently > > than the way most documentation wants to define them. To me, early just > > means the library is referenced, hence the objects are instantiated, but > not > > being used -- late, the object is instantiated at the time it's needed -- > > the reference is implicit. > > > > I see a lot of documentation that refer to setting references manually via > > the References dialog box as "early" binding, but using the References > > collection and object are never mentioned -- however... > > > > Seems to me you're setting the reference and instantiating the objects > > without using them, so, to my mind, it's early. > > > > 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 ssharkins at bellsouth.net Wed Jul 14 10:17:38 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 11:17:38 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <00bc01c469b4$efb4a680$6601a8c0@HAL9002> Message-ID: <20040714151738.OWPR1701.imf20aec.mail.bellsouth.net@SUSANONE> My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. From accessd at shaw.ca Wed Jul 14 10:20:16 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 14 Jul 2004 08:20:16 -0700 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> Message-ID: Just for information, the new center of the universe is now just outside of Victoria. http://www.hia-iha.nrc-cnrc.gc.ca/cu/main_e.html Jim > Are you seriously suggesting that the British Empire is not the center of > the Universe anymore? ;-) > JWC From GregSmith at starband.net Wed Jul 14 10:43:03 2004 From: GregSmith at starband.net (Greg Smith) Date: Wed, 14 Jul 2004 10:43:03 -0500 (CDT) Subject: [AccessD] Open a File Dialog Box In-Reply-To: <00b401c46969$32d1a860$0100a8c0@razvoj> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> Message-ID: <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net From JColby at dispec.com Wed Jul 14 10:50:43 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 11:50:43 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6F@DISABILITYINS01> Rocky, The Set objX = ... is the key. It is at that instant that the lookup is performed. Every object has stuff inside it that tells the compiler what it is. At that instant the compiler has to set it up such that it's properties and methods can be used. With early binding, that can occur at compile time (and thus one time) since you have specified: Dim xl as Excel.Application (or something similar) With late binding: Dim objX as object Doesn't DO anything except tell the compiler that sometime some OBJECT may be stored here - just hang out and wait for the set= statement. that Set Object= ... ACTUALLY RUNNING then triggers the compiler to look inside the object on the right side of the = for something that the compiler can look up in all of the DLLs and OCXs it has stored in System32 and other locations to see if it can find that something inside one of those DLLs or OCXs. Actually I suspect that it looks inside of each and every one of the objects that are NOT checked in that Reference dialog (until a match is found). THAT is why it is so slow... it has to do a brute force lookup. My guess (and it is just that) is that all of the objects inside all of the CHECKED references are actually loaded into a table when Access loads. These are "early bound", fast. All the unchecked objects have objects inside them as well but since they are not loaded in the table (to save memory and keep the Access load time up) if you late bind... well... we just start searching through each of these unchecked items looking for a match. But it is at the statement Set objX = ... that this lookup occurs. Once looked up, does Access keep the thing in the table? I.e. does doing the late bind act as if you had checked the reference at that instant? Does it load all the stuff from that lib into the lookup table at that instant? The things that keep me up at night. ;-) JWC -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, July 14, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] more on early versus late binding John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 14, 2004 7:26 AM Subject: RE: [AccessD] more on early versus late binding > Rocky, > > The issue isn't that simple. No, after the object is bound the speed is the > same. It's just that the object has to be looked up EVERY TIME it is bound. > If you have a function that opens a spreadsheet, with early binding this is > done ONCE at compile time. With late binding it is done every time the > function is called. OTOH, you no longer have to worry about lib version / > names. > > Tradeoffs. > > JWC > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 13, 2004 11:47 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] more on early versus late binding > > > John: > > Re: speed, after the object is late binded, is there any difference in > execution speed? > > Rocky > > ----- Original Message ----- > From: "jwcolby" > To: "'Access Developers discussion and problem solving'" > > Sent: Monday, July 12, 2004 6:28 PM > Subject: RE: [AccessD] more on early versus late binding > > > > Nope, early is not that, and late is not that. > > > > Early is dimensioning a variable as a specific object type - for example > as > > an excel object or a word object or a command control etc. then > referencing > > the object properties directly. > > > > Dim cbo as combo > > debug.print cbo.Name > > > > Late is dimensioning a variable as an OBJECT data type, then referencing > the > > property but using the "object object". > > > > Dim cbo as object > > debug.print cbo.name > > > > The reason it is called early and late is simply that early binding: > > > > Dim cbo as combo > > > > Causes the compiler (interpreter actually) to find and set a reference to > > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > > > Late binding causes the interpreter to "discover" what the object is by > what > > is stored in the variable AT RUN TIME and look up the properties and stuff > > in the actual object (library, ocx etc) at run time. > > > > Thus the early binding causes the map of dim to real thing without ever > even > > running the code. Late binding simply cannot discover what to do with the > > dimensioned variable until the variable is set = to something. > > > > This is very often used to pass in different things to a function for > > example. > > > > Function MyObject(obj as object) > > debug.print object.name > > End function > > > > Function TestObjects() > > MyObject MyCbo > > MyObject MyForm > > End function > > > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > > document, a combo box. What happens inside of MyObject may or may not be > > legal depending on what you pass in to the function, but you can pass in > ANY > > OBJECT AT ALL because the compiler does not check the dimensioned type > > against the passed in type (other than to determine that it is an object). > > > > Function MyControl(txt As TextBox) > > Debug.Print txt.Name > > End Function > > > > Function TestControls() > > Dim MyCbo As ComboBox > > Dim MyTextBox As TextBox > > Dim MyForm As Form > > Set MyForm = New Form_Form1 > > MyControl MyForm '<<<<< ERROR AT RUN TIME > > MyControl MyCbo > > MyControl MyTextBox > > End Function > > > > Test control will correctly pass in controls but won't run since MyForm is > > dimensioned as a form and at RUN TIME the interpreter checks all calls to > > MyControl to see if what is being passed in is a variable of type control. > > > > With early binding, since you dimension an object specifically to its > object > > type, you can use intellisense because the compiler knows how to find the > > object information. With late binding, the object type isn't determined > > until something is actually passed in so how can intellisense help you > out. > > > > Hope this helps explain what early and late binding are really all about. > > > > Now... Setting the reference really has nothing to do with any of this > OTHER > > THAN allowing some specific object type to be found in a library, and thus > > be dimensioned to a specific object type. IOW, If I don't reference the > > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > > object, then store an Excel object (spreadsheet, cell etc) in the > variable. > > If I reference the excel library, now I can early bind and dimension a > > variable as a spreadsheet, or a cell, or whatever I want since those > things > > can be found in a referenced library. > > > > So setting the reference is neither early binding nor late binding. It > > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > > EXCEL CODE... I haven't early or late bound to Excel - I haven't used > Excel > > in any way whatsoever. However I cannot reference an excel object type > (dim > > a variable as a cell or spreadsheet etc) unless I reference the Excel > > library. > > > > Referencing a library does nothing more than load (before compiling) a > table > > of objects inside that library into a table of all possible objects for > the > > compiler to use to look up dimension statement datatypes in. If a > dimension > > statement datatype is not found in the table of all possible datatypes, > then > > a compile error is thrown on the dim statement. > > > > Clear as mud? > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > > Sent: Monday, July 12, 2004 2:50 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] more on early versus late binding > > > > > > I kind of see the terms early and late -- in Access -- a bit differently > > than the way most documentation wants to define them. To me, early just > > means the library is referenced, hence the objects are instantiated, but > not > > being used -- late, the object is instantiated at the time it's needed -- > > the reference is implicit. > > > > I see a lot of documentation that refer to setting references manually via > > the References dialog box as "early" binding, but using the References > > collection and object are never mentioned -- however... > > > > Seems to me you're setting the reference and instantiating the objects > > without using them, so, to my mind, it's early. > > > > 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 cfoust at infostatsystems.com Wed Jul 14 10:56:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 08:56:20 -0700 Subject: [AccessD] Open a File Dialog Box Message-ID: You have to use API calls in 97. There are lots of examples of the code on the web and I know it's been posted here. Try searching the archives for "Open File Dialog". Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Wednesday, July 14, 2004 7:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 10:59:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 08:59:58 -0700 Subject: [AccessD] more on early versus late binding Message-ID: Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, July 14, 2004 7:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 11:02:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 09:02:41 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: Sure you can, John. You just have to do an end run on MAPI, which is where the security hole looms large. Microsoft poured concrete into the hole, which tends to get in the way when you want to use Outlook. Redemption works nicely because it uses Extended MAPI calls, which are concrete-free so far. ;-} Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Wednesday, July 14, 2004 6:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 14 11:10:49 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jul 2004 12:10:49 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040714151738.OWPR1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: Susan, I've always heard that it's in the 10-15% range, which the few times that I've bothered to check, seems to be about right. You do notice the difference. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Wednesday, July 14, 2004 11:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prodevmg at yahoo.com Wed Jul 14 11:23:20 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 14 Jul 2004 09:23:20 -0700 (PDT) Subject: [AccessD] Create Table of System Objects ** Free Tip ** Message-ID: <20040714162320.11382.qmail@web20411.mail.yahoo.com> Here is a snippit of code you can put into a module that will create a table of system objects if you would need such a thing. Public Sub CreateObjList() DoCmd.RunSQL "SELECT MSysObjects.DateCreate, MSysObjects.DateUpdate, MSysObjects.Name, GetobjType(MSysObjects.Type) AS ObjectType " _ & " INTO tblSystemObjects From MSysObjects " _ & " WHERE (MSysObjects.Type) In (1,5,6,-32768,-32764,-32761);" End Sub Public Function GetobjType(typeID As Integer) Select Case typeID Case Is = 1 GetobjType = "Table" Case Is = 5 GetobjType = "Query" Case Is = 6 GetobjType = "Attached Table" Case Is = -32768 GetobjType = "Form" Case Is = -32764 GetobjType = "Report" Case Is = -32761 GetobjType = "Module" End Select End Function Happy Coding!!! May God bless you beyond your imagination! Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From Mark.Mitsules at ngc.com Wed Jul 14 11:33:49 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 14 Jul 2004 12:33:49 -0400 Subject: [AccessD] Open a File Dialog Box Message-ID: Greg, Here is an example: http://www.mvps.org/access/api/api0001.htm Mark -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Wednesday, July 14, 2004 11:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jul 14 11:44:00 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 14 Jul 2004 09:44:00 -0700 Subject: [AccessD] Open a File Dialog Box References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Message-ID: <007801c469c1$c3f0a870$6601a8c0@HAL9002> Greg: I did it but I cribbed it right out of the ADH CD. That's the best place to get it. There's a bunch of constants they use, the Function declarations, and then the code itself. But it works real well. Rocky ----- Original Message ----- From: "Greg Smith" To: Sent: Wednesday, July 14, 2004 8:43 AM Subject: [AccessD] Open a File Dialog Box > Hello everyone! > > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. > > TIA! > Greg Smith > GregSmith at Starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From liz at symphonyinfo.com Wed Jul 14 11:59:21 2004 From: liz at symphonyinfo.com (Liz Doering) Date: Wed, 14 Jul 2004 11:59:21 -0500 Subject: [AccessD] Advantage Database In-Reply-To: <035906120.20040713182948@cactus.dk> Message-ID: Gustav, Thanks so much for the hint--I googled for their ODBC driver and found it as a free download. So I'm in! And able to extract what I need. Thanks to all who replied. Liz -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 13, 2004 11:30 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Advantage Database Hi Liz As far as I know that's a proprietary format. You would probably need to do that from within Advantage or use their ODBC driver if you have that at hand. /gustav > Is anyone aware of any tools or tips for extracting .adt files to any other > format? My boss has promised that we can do this magic.... -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jul 14 13:41:09 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jul 2004 11:41:09 -0700 Subject: [AccessD] Time zones (was: internationalization) References: <2F8793082E00D4119A1700B0D0216BF8017A1F98@main2.marlow.com> <32007103843568110723d0567@global.net.pg> <11525103216.20040714155748@cactus.dk> Message-ID: <40F57E45.3020504@shaw.ca> Here is a digital clock that handles the daylight savings time and standard time differences for time zones, also checks automatically when they switch. This info is carried in WinXP registry. Program uses SYSTEMTIME api's, which I believe won't run below Win2000. Pedro Gil's Clock From Around the World http://www.geocities.com/pmpg98_pt/CodeExamples.html Helen Feddema's program doesn't handle this, so areas that remain on standard time, year round are the wrong time. For example Saskatchewan, this time of year should be same time as Edmonton, I always get it mixed up. They are both in GMT +6 zone but Alberta has DST in winter. Gustav Brock wrote: >Hi all > >This topic popped up in all its glory in the recent issue of "Woody's >Access Watch" where Helen Feddema is goofing around trying to parse >date/time strings to figure out time zones. Of course, this dirty >deroute is paved with traps so it doesn't work outside the US where >other regional settings are used. > >Just in case anyone should have a need for dealing with time zones, >here are a couple of functions we use. You'll quickly notice that >essentially it is nothing more than a little clean up and one single >line of code: > > datRemote = DateAdd("n", lngBias, datLocal) > >If you have nothing to do Friday you may wish to browse Helen's demo: > > ftp://ftp.helenfeddema.com/pub/accarch121.zip > > > > >Public Function TimeZoneBiasDiff( _ > ByVal lngLocalTimeBias As Long, _ > ByVal lngRemoteTimeBias As Long) _ > As Long > >' Calculates the difference in minutes between two time zones, >' typically the local time zone and a remote time zone. >' Both time zones must be expressed by their bias relative to >' UTC (Coordinated Universal Time) which is measured in minutes. >' >' 2000-05-30. Cactus Data ApS, CPH. > > ' Minimum amount of minutes for a time zone bias. > Const clngTimeZoneBiasMin As Long = 15 > > Dim lngTimeZoneBiasDiff As Long > > ' Round off time zone bias by minimum time zone difference. > lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin > lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin > lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin > lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin > > ' Calculate difference in time zone bias. > lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias > > TimeZoneBiasDiff = lngTimeZoneBiasDiff > >End Function > >Public Function DateAddTimeZoneDiff( _ > ByVal datLocal As Date, _ > ByVal lngLocalBias, _ > ByVal lngRemoteBias) _ > As Date > >' Calculates the date/time of datLocal in a remote time zone. >' The difference in minutes will be the difference between the >' local time zone bias and the remote time zone bias where the >' bias are relative to UTC. >' >' Examples: >' >' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) >' will return datRemote as eleven hours behind local time. >' >' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) >' will return datRemote as eleven hours ahead of local time. >' >' 2000-05-30. Cactus Data ApS, CPH. > > Dim datRemote As Date > Dim lngBias As Long > > ' Get difference (in minutes) in time zone bias. > lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) > ' Calculate remote date/time. > datRemote = DateAdd("n", lngBias, datLocal) > > DateAddTimeZoneDiff = datRemote > >End Function > > > >Also, note "GMT" has been considered obsolete for years and has for >every serious use been replaced with UTC. > >/gustav > > > > >>On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> >> > > > >>>Hi Drew >>> >>> >>> >>>>Thanks. Next version I'll incorporate that. >>>> >>>> >>>OK. >>> >>> >>> >>>>Time zones are pretty easy. In fact, all of this date stuff is too. The >>>>only real monster is Arizona, which decreed to ignore daylight savings time. >>>> >>>> >>>So how DO you deal with the time zones? >>> >>>I have seen no options in Access for this contrary to Oracle which can >>>record date/time including the time zone. >>> >>>My thought was to use a byte field with a shifted value similar to how >>>MySQL can store a year value in a byte field ... >>> >>> >>> > > > >>You could get the Bias member of the Time_Zone_Information structure >>retrieved with the GetTimeZoneInformation API function and either >>apply it to the time in question or store it in another field as a >>long (or integer if space is critical) >> >>Stuart >> >> > > > -- Marty Connelly Victoria, B.C. Canada From dwaters at usinternet.com Wed Jul 14 13:53:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 13:53:28 -0500 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <21312683.1089820438290.JavaMail.root@sniper2.usinternet.com> Message-ID: <000001c469d3$d9cf8b90$de1811d8@danwaters> Greg, I use a downloaded example from Candace Tripp's site. She has versions for A97 and for A2K and up. Works great! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Wednesday, July 14, 2004 10:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 13:53:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 13:53:28 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <23859127.1089815973824.JavaMail.root@sniper2.usinternet.com> Message-ID: <000101c469d3$da9329b0$de1811d8@danwaters> Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 14:12:06 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 15:12:06 -0400 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD70@DISABILITYINS01> Isn't that an exchange thing though? JWC -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 14, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 14 14:31:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 14 Jul 2004 13:31:39 -0600 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: <271270-22004731419313953@christopherhawkins.com> Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com From DWUTKA at marlow.com Wed Jul 14 14:53:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 14 Jul 2004 14:53:30 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Support at CorporateDataDesign.com Wed Jul 14 14:58:46 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 15:58:46 -0400 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <02ca01c469dc$fc1d3270$0501a8c0@OFFICEXP1> I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits From jmhla at earthlink.net Wed Jul 14 14:59:09 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Wed, 14 Jul 2004 12:59:09 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 ATTN Jim Lawrence In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: <002501c469dd$0a387ea0$6501a8c0@delllaptop> Need your e address Would like same link. JOE HECHT LOS ANGELES CA jmhla at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 15:12:43 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 13:12:43 -0700 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: Define connections. Are you using ADO or DAO recordsets, and are you talking about concurrent users or concurrent connections (not the same thing). You can get info on current users by using the ADO OpenSchema method to get a Jet User Roster. It simply reports on the specific machines connected to the database and will also return logins if Access security is being used. I think Susan did an article on this for some publication, and I've used an elaboration of it in a utility we built for our customers. Charlotte Foust -----Original Message----- From: Christopher Hawkins [mailto:clh at christopherhawkins.com] Sent: Wednesday, July 14, 2004 11:32 AM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Wed Jul 14 15:20:34 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:20:34 +0200 Subject: [AccessD] Binding form/subform to ADO recordset Message-ID: <20040714201859.DFDDC5B294@smtp8.wanadoo.nl> Hi all, I am still working on my ADP and slowly moving on to ADO wisdom:-) However I've run into the following situation and I hope someone knows the solution... Situation: A2K3 - ADP - SQL server 2000 Two forms, Main and sub (datasheet) on main, relation one-to-many The Mainform as well as the subForm get bound on the 'OnOpen' event of the mainform using ADO recordsets which are closed and set to nothing once bound to the form/datasheet. This works great.. editing records no problem BUT adding a new record to the sub datasheet results in an error: "Key value for this row was changed or deleted at the datastore. The local row is now deleted" I have been snooping the internet and I should probably make somehow use of the 'Uniquetable' property and the 'Resync Command' but does anybody know how and where? (form or code or both, what event?) I've seen code from MS (http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com :80/support/kb/articles/Q251/0/21.ASP &NoWebContent=1) which uses a recordset addnew - update though my records are bound to this datasheet and my recordset is long gone... now I wonder if I'll be able to get this to work? Tia, Eric Starkenburg _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:20:34 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:24:43 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:24:43 +0200 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <02ca01c469dc$fc1d3270$0501a8c0@OFFICEXP1> Message-ID: <20040714202308.83FE45B37F@smtp8.wanadoo.nl> Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:27:39 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:27:39 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <20040714202604.412D05AFE1@smtp8.wanadoo.nl> Yes, Microsoft has some code which makes use of ADO and some sort of specific schema and is able to tell you what connections are made to the MDB (BE) you refer to... They also have a tool I believe and there are ways to read LDB's also... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Christopher Hawkins Verzonden: woensdag 14 juli 2004 21:32 Aan: accessd at databaseadvisors.com Onderwerp: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:27:39 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:32:33 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:32:33 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <20040714203058.339E55A67C@smtp8.wanadoo.nl> Here's the code I once used... Hope this works for you too: Dim cn As New ADODB.Connection, rs As New ADODB.Recordset Dim i As Integer cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & GetBEpath & ";Jet OLEDB:Database Password=" & YourPassword ' The user roster is exposed as a provider-specific schema rowset ' in the Jet 4 OLE DB provider. You have to use a GUID to ' reference the schema, as provider-specific schemas are not ' listed in ADO's type library for schema rowsets Set rs = cn.OpenSchema(adSchemaProviderSpecific, , "{947bb102-5d43-11d1-bdbf-00c04fb92675}") 'Output the list of all users in the current database. 'Debug.Print rs.Fields(0).Name, "", rs.Fields(1).Name, _ '"", rs.Fields(2).Name, rs.Fields(3).Name While Not rs.EOF ' Debug.Print rs.Fields(0), rs.Fields(1), _ ' rs.Fields(2), rs.Fields(3) i = i + 1 rs.MoveNext Wend cn.Close ShowUserRosterMultipleUsers = i - 1 '1e row is fieldnames G_Exit: Set cn = Nothing Set rs = Nothing Exit Function -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Christopher Hawkins Verzonden: woensdag 14 juli 2004 21:32 Aan: accessd at databaseadvisors.com Onderwerp: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:32:33 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Support at CorporateDataDesign.com Wed Jul 14 15:31:21 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 16:31:21 -0400 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <20040714202308.83FE45B37F@smtp8.wanadoo.nl> Message-ID: <02d801c469e1$8981a6b0$0501a8c0@OFFICEXP1> Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 15:35:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 15:35:46 -0500 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <16441981.1089834005989.JavaMail.root@sniper5.usinternet.com> Message-ID: <000001c469e2$24d4aea0$de1811d8@danwaters> Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 15:35:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 15:35:46 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <18654129.1089833246967.JavaMail.root@sniper3.usinternet.com> Message-ID: <000101c469e2$254bda70$de1811d8@danwaters> Right! It doesn't do individual users any good. ;-( Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 2:12 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Isn't that an exchange thing though? JWC -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 14, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 14 15:45:56 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jul 2004 16:45:56 -0400 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: Christopher, <> As Charlotte pointed out, you can used the JET roster to get the list of users, or if DAO, there are the functions built into MSLDBUSR.DLL lib, or you can monitor the number of connections to the MDB through the server <> That is pushing it for a JET based app, mostly for stability reasons, but a well written app running on a solid network would not freeze. <> If that's going on, then the MDB is corrupt. You should create a new backend. <> 1. Make sure everyone is using JET SP 8.0 2. Set the FE to maintain an open connection to the backend for the life of the app (ie. open a hidden form bound to a table at startup and close at exit) 3. Turn off sub datasheets on all tables. 4. Turn off name autocorrect 5. If NT/Win 2K server for the BE, turn off opportunistic locking. 6. Make sure the FE's and BE are not being virus scanned. Those are the biggies. See: HOW TO: Keep a Jet 4.0 Database in Top Working Condition http://support.microsoft.com/default.aspx?scid=kb;EN-US;300216 for additional pointers. Note however that using ADO is *slower* then DAO on a JET MDB. The article implies that your better off, but what it really means is that your better to use the OLEDB provider instead of ODBC if using ADO. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 3:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Wed Jul 14 15:49:27 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:49:27 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <000001c469e2$24d4aea0$de1811d8@danwaters> Message-ID: <20040714204752.185D55B317@smtp8.wanadoo.nl> Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. From clh at christopherhawkins.com Wed Jul 14 15:52:36 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 14 Jul 2004 14:52:36 -0600 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: <122190-220047314205236569@christopherhawkins.com> Connections might not have been the best word to use. Everything is being done with bound forms; the hobbyist hwo built it does not know how to use recordsets. I'm trying to figure out how many people are actually doing CRUD operations against the database at a given time. -C- ---- Original Message ---- From: cfoust at infostatsystems.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Date: Wed, 14 Jul 2004 13:12:43 -0700 >Define connections. Are you using ADO or DAO recordsets, and are you >talking about concurrent users or concurrent connections (not the >same >thing). You can get info on current users by using the ADO >OpenSchema >method to get a Jet User Roster. It simply reports on the specific >machines connected to the database and will also return logins if >Access >security is being used. I think Susan did an article on this for >some >publication, and I've used an elaboration of it in a utility we built >for our customers. > >Charlotte Foust > >-----Original Message----- >From: Christopher Hawkins [mailto:clh at christopherhawkins.com] >Sent: Wednesday, July 14, 2004 11:32 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Monitoring concurrent connactions to the BE? > > >Hello, all. I've got a client who's running a homegrown Access app. >I probably don't even need to continue, you KNOW it's going to end up >badly. ;) > >I'll ask my main question up front: is there a utility that will >allow >me to track the number of concurrent connections that are being made >to >a .mdb back-end? I need to know what the peak number of concurrent >connections is for a given file, and I need to know what time frame >that >peak takes place in. > >Now, those of you who enjoy case studies can read the rest. > >THE PROBLEM: The FE's are locking up, forcing users to exit and >re-enter >the app. Records that were being viewed, added or edited at the >time of >the lock-up sometimes disappear and have to be re-keyed. >Sometimes a record that was keyed in successfully will turn up >missing >later. > >THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in >size. >Yes, even after compressing. The front-end is an Access 2003 .mde >file >with links directly to the back-end. > >THE INSTALL BASE: The FE is installed on 40-ish desktops locally, >with >another 40-ish users accessing the app via Terminal Services. >All in all, there are 80-ish potential connections to the back-end. >And frankly, this is where I think the problem is. > >THE USAGE PATTERN: The proscribed method of use is to add or update >records as one works during the day. > >What is actually happening is that nobody uses the app at all until >about 4pm, when EVERYONE logs in to do all their CRUD operations for >the >day. On Friday, it is 4pm all day long as people hammer the system >to >get things into the db that they blew off during the week. > >MY TAKE: The idea that 80 concurrent connections would slow or >outright >freeze an Access app makes sense. The idea that if you'd lose your >record if Access froze in the middle of keying it makes sense, if >less >so; they're using bound forms, so I'd expect that whatever portion of >the record was keyed pre-freeze would be saved. >The idea that successfully keyed-in records would disappear at some >unknown time between now and (for example) next week makes NO sense >to >me, however. If it's in, it's in, right? Even 255 concurrent >connections won't cause data to be deleted. Someone has to >explicitly >delete it (even if they don't know they're deleting it), correct? > >WHAT I'M CHECKING: For the 'records get keyed in then disappear' >issue >I have made sure that warnings are turned on, and that there isn't >any >code turning them off without turning them back on. That eliminates >the >possibility that people are fat-fingering the Del key and killing >records without knowing it. I have also checked their settings; >Default >Record Locking is set to No Locks. > >WHAT I WANT: I want a utility that will let me track the number of >concurrent connections that are being made to the back-end at any >given >time. In addition to knowing what the peak number of connections >is, I >want a way to know at what time that peak is hit. >I want to see the connection count increasing, up the peak, and >decreasing as people log off. I need to pinpoint the period of >heaviest >load. > >Now, before anyone suggests it, I have already counseled the client >to >move to SQL Server and to their credit, that project is on the >schedule! >My immediate concern is to keep their Access app alive and useful >until >the transition to SQL takes place - the app is absolutely >mission-critical. > >NOTE: a discussion of why my client deployed a hobbyist's first app >in >a mission-critical role is best left for a different day (although I >suspect it's a matter of stepping over dollars to pick up dimes). > >-Christopher Hawkins- >www.christopherhawkins.com > > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > From lists at theopg.com Wed Jul 14 16:06:00 2004 From: lists at theopg.com (MarkH) Date: Wed, 14 Jul 2004 22:06:00 +0100 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <20040714201859.DFDDC5B294@smtp8.wanadoo.nl> Message-ID: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> Hi Folks This is a question I've been meaning to ask for a while and never got round to it... Is there a simple one line way to erase / clear a UDT after its finished with, as opposed to clearing the variables within it individually? Cheers Mark From ssharkins at bellsouth.net Wed Jul 14 16:30:21 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 17:30:21 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040714213016.EKLW1776.imf21aec.mail.bellsouth.net@SUSANONE> That's exactly the problem -- it just isn't slow enough for me to bother with -- but I can see how several spots like this would annoy a user. Susan H. Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. From Support at CorporateDataDesign.com Wed Jul 14 16:30:54 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 17:30:54 -0400 Subject: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" In-Reply-To: <02d801c469e1$8981a6b0$0501a8c0@OFFICEXP1> Message-ID: <000001c469e9$db0a5380$0501a8c0@OFFICEXP1> I really wanted to do a linking but not all the fields are available. But If is Use code and use Dim c As Outlook.ContactItem You can get the user field by using c.UserProperties(i). Where "i" is the enumerated value of the fields you created. I created 2 fields so they are: c.UserProperties(1) and c.UserProperties(2). C .UserProperties(1).NAME will give your field name. So I guess I'll just run an import routine on startup and load everyone into my database that way. John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Skolits Sent: Wednesday, July 14, 2004 4:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jul 14 17:37:35 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 14 Jul 2004 15:37:35 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: Hi Drew: Sorry about not getting the message to you but I did check to see whether the message was created as a reply to you off-line email, it was, checked to see whether the message was actually sent, it was and checked to see whether an undelivered error message was returned from my ISP, it was not, so I had assumed everything went through. Please send me an off-line message again and I will send you the file coordinates ASAP. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Wed Jul 14 17:58:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 17:58:27 -0500 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <30232278.1089838774504.JavaMail.root@sniper6.usinternet.com> Message-ID: <000001c469f6$13b35e50$de1811d8@danwaters> Eric, The article does limit itself to A02. But I have read or heard somewhere that the bloating problem experienced by A02 also occurs in A03. If that's wrong then someone please speak up. I would suggest that Christopher take a copy of the BE he has, change it to A2K format, and then compact it. If it reduces in size a significant amount, then most likely the bloating problem was affecting it. In any case, if it does reduce in size then that's a better BE. I know of no issues/problems with setting a BE format to A2K format rather than A02 or A03. Again, if that not correct then someone please speak up. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 3:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 18:10:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 16:10:14 -0700 Subject: [AccessD] more on early versus late binding Message-ID: That depends on the class of machine the app runs on. A momentary delay on a fast machine is no big deal, but if your form has a LOT of combos and listboxes populated that way, it can be a noticeable annoyance. I dealt with a situation like this by creating several stored queries and swapping them out as the rowsource of a combobox in code to avoid the delay that otherwise occured when loading an unbound form. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, July 14, 2004 1:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding That's exactly the problem -- it just isn't slow enough for me to bother with -- but I can see how several spots like this would annoy a user. Susan H. Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jul 14 21:22:58 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jul 2004 19:22:58 -0700 Subject: [AccessD] Monitoring concurrent connactions to the BE? References: <122190-220047314205236569@christopherhawkins.com> Message-ID: <40F5EA82.40301@shaw.ca> You could run a Replica farm on the server. I seem to remember Arthur advocating something like this. So that the first 20 user who logon get directed to one replica mdb, the next 20 to another etc. Just keep one backend mdb that tracks a user table of who is on. Then shovel them to the appropriate replica backend. Then consolidate the replicas once a day to the master. It might be faster to convert to SQL than create the replicas if you are not familar with it.. Christopher Hawkins wrote: >Connections might not have been the best word to use. Everything is >being done with bound forms; the hobbyist hwo built it does not know >how to use recordsets. I'm trying to figure out how many people are >actually doing CRUD operations against the database at a given time. > >-C- > >---- Original Message ---- >From: cfoust at infostatsystems.com >To: accessd at databaseadvisors.com, >Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? >Date: Wed, 14 Jul 2004 13:12:43 -0700 > > > >>Define connections. Are you using ADO or DAO recordsets, and are you >>talking about concurrent users or concurrent connections (not the >>same >>thing). You can get info on current users by using the ADO >>OpenSchema >>method to get a Jet User Roster. It simply reports on the specific >>machines connected to the database and will also return logins if >>Access >>security is being used. I think Susan did an article on this for >>some >>publication, and I've used an elaboration of it in a utility we built >>for our customers. >> >>Charlotte Foust >> >>-----Original Message----- >>From: Christopher Hawkins [mailto:clh at christopherhawkins.com] >>Sent: Wednesday, July 14, 2004 11:32 AM >>To: accessd at databaseadvisors.com >>Subject: [AccessD] Monitoring concurrent connactions to the BE? >> >> >>Hello, all. I've got a client who's running a homegrown Access app. >>I probably don't even need to continue, you KNOW it's going to end up >>badly. ;) >> >>I'll ask my main question up front: is there a utility that will >>allow >>me to track the number of concurrent connections that are being made >>to >>a .mdb back-end? I need to know what the peak number of concurrent >>connections is for a given file, and I need to know what time frame >>that >>peak takes place in. >> >>Now, those of you who enjoy case studies can read the rest. >> >>THE PROBLEM: The FE's are locking up, forcing users to exit and >>re-enter >>the app. Records that were being viewed, added or edited at the >>time of >>the lock-up sometimes disappear and have to be re-keyed. >>Sometimes a record that was keyed in successfully will turn up >>missing >>later. >> >>THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in >>size. >>Yes, even after compressing. The front-end is an Access 2003 .mde >>file >>with links directly to the back-end. >> >>THE INSTALL BASE: The FE is installed on 40-ish desktops locally, >>with >>another 40-ish users accessing the app via Terminal Services. >>All in all, there are 80-ish potential connections to the back-end. >>And frankly, this is where I think the problem is. >> >>THE USAGE PATTERN: The proscribed method of use is to add or update >>records as one works during the day. >> >>What is actually happening is that nobody uses the app at all until >>about 4pm, when EVERYONE logs in to do all their CRUD operations for >>the >>day. On Friday, it is 4pm all day long as people hammer the system >>to >>get things into the db that they blew off during the week. >> >>MY TAKE: The idea that 80 concurrent connections would slow or >>outright >>freeze an Access app makes sense. The idea that if you'd lose your >>record if Access froze in the middle of keying it makes sense, if >>less >>so; they're using bound forms, so I'd expect that whatever portion of >>the record was keyed pre-freeze would be saved. >>The idea that successfully keyed-in records would disappear at some >>unknown time between now and (for example) next week makes NO sense >>to >>me, however. If it's in, it's in, right? Even 255 concurrent >>connections won't cause data to be deleted. Someone has to >>explicitly >>delete it (even if they don't know they're deleting it), correct? >> >>WHAT I'M CHECKING: For the 'records get keyed in then disappear' >>issue >>I have made sure that warnings are turned on, and that there isn't >>any >>code turning them off without turning them back on. That eliminates >>the >>possibility that people are fat-fingering the Del key and killing >>records without knowing it. I have also checked their settings; >>Default >>Record Locking is set to No Locks. >> >>WHAT I WANT: I want a utility that will let me track the number of >>concurrent connections that are being made to the back-end at any >>given >>time. In addition to knowing what the peak number of connections >>is, I >>want a way to know at what time that peak is hit. >>I want to see the connection count increasing, up the peak, and >>decreasing as people log off. I need to pinpoint the period of >>heaviest >>load. >> >>Now, before anyone suggests it, I have already counseled the client >>to >>move to SQL Server and to their credit, that project is on the >>schedule! >>My immediate concern is to keep their Access app alive and useful >>until >>the transition to SQL takes place - the app is absolutely >>mission-critical. >> >>NOTE: a discussion of why my client deployed a hobbyist's first app >>in >>a mission-critical role is best left for a different day (although I >>suspect it's a matter of stepping over dollars to pick up dimes). >> >>-Christopher Hawkins- >>www.christopherhawkins.com >> >> >> >> >> Marty Connelly Victoria, B.C. Canada From connie.kamrowski at agric.nsw.gov.au Wed Jul 14 21:36:00 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 15 Jul 2004 12:36:00 +1000 Subject: [AccessD] Re: Invalid reference to the property Form/Report Message-ID: Thanks for the help. I restored a previous copy, redid all changes and started over. Incedentally, this morning I opened the old database in error on a test machine and it works, the problem has disappeared as mysteriously as it appeared. Microsoft! Where are Mulder and Scully when you need them! Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From mgauk at btconnect.com Thu Jul 15 02:47:30 2004 From: mgauk at btconnect.com (mgauk at btconnect.com) Date: Thu, 15 Jul 2004 08:47:30 +0100 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <007801c469c1$c3f0a870$6601a8c0@HAL9002> Message-ID: <200407150747.i6F7lUQ16159@databaseadvisors.com> You could easily adapt the coding I sent in reply to printing DOC files. See subject ref: Re: [AccessD] Batch printing the .doc files from a folder Posted a couple of days ago Max Sherman -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: 14 July 2004 17:44 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Open a File Dialog Box Greg: I did it but I cribbed it right out of the ADH CD. That's the best place to get it. There's a bunch of constants they use, the Function declarations, and then the code itself. But it works real well. Rocky ----- Original Message ----- From: "Greg Smith" To: Sent: Wednesday, July 14, 2004 8:43 AM Subject: [AccessD] Open a File Dialog Box > Hello everyone! > > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. > > TIA! > Greg Smith > GregSmith at Starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 From gustav at cactus.dk Thu Jul 15 02:27:51 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 09:27:51 +0200 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> References: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> Message-ID: <1212580550.20040715092751@cactus.dk> Hi Mark > This is a question I've been meaning to ask for a while and never got > round to it... Is there a simple one line way to erase / clear a UDT > after its finished with, as opposed to clearing the variables within it > individually? Not that I know of. But you define a global variable as your UDT. This will, of course, be empty. Then, when you need to "reset" your local variable, set it to the global variable: Dim tLocal As MARK tLocal = tEmpty /gustav From gustav at cactus.dk Thu Jul 15 02:51:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 09:51:03 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> References: <271270-22004731419313953@christopherhawkins.com> Message-ID: <173972271.20040715095103@cactus.dk> Hi Christopher > I'll ask my main question up front: is there a utility that will > allow me to track the number of concurrent connections that are being > made to a .mdb back-end? I need to know what the peak number of > concurrent connections is for a given file, and I need to know what > time frame that peak takes place in. You could have a look at Gary's Access Workbench: http://www.vb123.com/workbench/ ".. It will allow you to see the users/computers using your database, lock out new users so that you can make do maintenance .." "If you have a lot of users or trouble getting everyone to log off, you may need the internal logging database. This logs Windows User IDs and even allows you to schedule shutdowns of your database. This database comes with full Access source code and objects." It's a USD 90 purchase. I haven't used it so I cannot tell more. /gustav From starkey at wanadoo.nl Thu Jul 15 07:02:02 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Thu, 15 Jul 2004 14:02:02 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <000001c469f6$13b35e50$de1811d8@danwaters> Message-ID: <20040715120016.AE4C352F0D@smtp4.wanadoo.nl> I was just wondering since I hadn't heard of this problem yet, interesting to know though. Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: donderdag 15 juli 2004 00:58 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Eric, The article does limit itself to A02. But I have read or heard somewhere that the bloating problem experienced by A02 also occurs in A03. If that's wrong then someone please speak up. I would suggest that Christopher take a copy of the BE he has, change it to A2K format, and then compact it. If it reduces in size a significant amount, then most likely the bloating problem was affecting it. In any case, if it does reduce in size then that's a better BE. I know of no issues/problems with setting a BE format to A2K format rather than A02 or A03. Again, if that not correct then someone please speak up. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 3:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 15-7-2004 14:02:02 avast! auteursrecht (c) 2000-2004 ALWIL Software. From paul.hartland at fsmail.net Thu Jul 15 07:39:35 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 15 Jul 2004 14:39:35 +0200 (CEST) Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <9557318.1089895175124.JavaMail.www@wwinf3004> To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From HollisVJ at pgdp.usec.com Thu Jul 15 07:58:36 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 15 Jul 2004 07:58:36 -0500 Subject: [AccessD] Set Outlook Properties in Access Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> I am trying to send automated emails through Outlook from Access. I found this link from Microsoft that tells how to do this. http://msdn.microsoft.com/office/understanding/access/codesamples/default.as px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp I run into the problem with the security settings - where it pops up the message about a potential virus and if you want to do this and for how long. I figure this just 'may' scare off users - imagine that. Anyway, is there a way to set the Outlook security settings (Tools, Macros, Security) through Access code, to Low, send the email and then reset their security to High or Medium again? I figure there should be a way to do this for Outlook similar to setting the startup properties, etc in Access when it opens. Virginia From JRojas at tnco-inc.com Thu Jul 15 08:03:50 2004 From: JRojas at tnco-inc.com (Joe Rojas) Date: Thu, 15 Jul 2004 09:03:50 -0400 Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <0CC84C9461AE6445AD5A602001C41C4B059D93@mercury.tnco-inc.com> I believe it is because the OptUpdateAvailability_Click is private. Private Subs are not visible to other forms and may only be called from the form that "owns" the sub. Try making Public sub on the Personnel form that only calls the OptUpdateAvailability_Click sub. Public Sub UpdateAvailability() OptUpdateAvailability_Click() End Sub JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. From JRojas at tnco-inc.com Thu Jul 15 08:05:42 2004 From: JRojas at tnco-inc.com (Joe Rojas) Date: Thu, 15 Jul 2004 09:05:42 -0400 Subject: [AccessD] OT-Call Click Routine From Form Behind - part 2 Message-ID: <0CC84C9461AE6445AD5A602001C41C4B059D94@mercury.tnco-inc.com> Opps, Then call the sub from the form that appears in front of the personnel form with frmOrrPersonnel.UpdateAvailability JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. From paul.hartland at fsmail.net Thu Jul 15 08:11:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 15 Jul 2004 15:11:17 +0200 (CEST) Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <3637326.1089897077152.JavaMail.www@wwinf3004> thanks, I owe you one.....can't believe I never thought of that... Paul Message date : Jul 15 2004, 02:06 PM >From : "Joe Rojas" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] OT-Call Click Routine From Form Behind I believe it is because the OptUpdateAvailability_Click is private. Private Subs are not visible to other forms and may only be called from the form that "owns" the sub. Try making Public sub on the Personnel form that only calls the OptUpdateAvailability_Click sub. Public Sub UpdateAvailability() OptUpdateAvailability_Click() End Sub JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From dkalsow at yahoo.com Thu Jul 15 09:03:21 2004 From: dkalsow at yahoo.com (Dale Kalsow) Date: Thu, 15 Jul 2004 07:03:21 -0700 (PDT) Subject: [AccessD] Treeview Controls In-Reply-To: <3637326.1089897077152.JavaMail.www@wwinf3004> Message-ID: <20040715140321.13242.qmail@web50405.mail.yahoo.com> Does anyone know if Acess 2003 has a treeview control? Thanks! Dale --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! From bchacc at san.rr.com Thu Jul 15 09:25:14 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 07:25:14 -0700 Subject: [AccessD] Set Outlook Properties in Access References: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> Message-ID: <00b001c46a77$8b536f50$6601a8c0@HAL9002> Virginia: I was just struggling with this and I didn't find a VBA answer but the list gave me two good leads for solving the problem outside of Access: http://www.dimastr.com/redemption/ and http://www.contextmagic.com/express-clickyes/ Also recommended by Dan Waters was: Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. HTH Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Hollis,Virginia" To: Sent: Thursday, July 15, 2004 5:58 AM Subject: [AccessD] Set Outlook Properties in Access > I am trying to send automated emails through Outlook from Access. I found > this link from Microsoft that tells how to do this. > > http://msdn.microsoft.com/office/understanding/access/codesamples/default.as > px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp > spx?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp> > > > > I run into the problem with the security settings - where it pops up the > message about a potential virus and if you want to do this and for how long. > I figure this just 'may' scare off users - imagine that. Anyway, is there a > way to set the Outlook security settings (Tools, Macros, Security) through > Access code, to Low, send the email and then reset their security to High or > Medium again? > > > > I figure there should be a way to do this for Outlook similar to setting the > startup properties, etc in Access when it opens. > > > > Virginia > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jul 15 09:45:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 16:45:44 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Message-ID: <16528853238.20040715164544@cactus.dk> Hi Greg This calls for a class module. Karsten Pries, a German fellow, has one for download at: http://www.karstenpries.de/access It contains a ShowFolder too. Comments are mostly in German but you can easily find out. We recently brushed it up a bit. It works very nicely and is very easy to implement. /gustav > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. From mwhittinghill at symphonyinfo.com Thu Jul 15 10:48:42 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Thu, 15 Jul 2004 10:48:42 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <000e01c46a83$3562bd60$2201a8c0@PASCAL> I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com From my.lists at verizon.net Thu Jul 15 10:52:37 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 15 Jul 2004 08:52:37 -0700 Subject: [AccessD] OT: VB listbox with checkboxes In-Reply-To: <000e01c46a83$3562bd60$2201a8c0@PASCAL> References: <000e01c46a83$3562bd60$2201a8c0@PASCAL> Message-ID: <40F6A845.4000602@verizon.net> That's the ListView Control, and the Checkboxes are gonna be images.. Mark Whittinghill wrote On 7/15/2004 8:48 AM: >I am building a VB app, and I need to include the listbox control that has >checkboxes, like the column selector in Outlook. What control is that, and >what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > > > -- -Francisco From mwhittinghill at symphonyinfo.com Thu Jul 15 11:12:54 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Thu, 15 Jul 2004 11:12:54 -0500 Subject: [AccessD] OT: VB listbox with checkboxes References: <000e01c46a83$3562bd60$2201a8c0@PASCAL> <40F6A845.4000602@verizon.net> Message-ID: <000801c46a86$96c596b0$2201a8c0@PASCAL> Thanks, Can you point me to any examples of how to do this? Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com ----- Original Message ----- From: "Francisco H Tapia" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 10:52 AM Subject: Re: [AccessD] OT: VB listbox with checkboxes > That's the ListView Control, and the Checkboxes are gonna be images.. > > Mark Whittinghill wrote On 7/15/2004 8:48 AM: > > >I am building a VB app, and I need to include the listbox control that has > >checkboxes, like the column selector in Outlook. What control is that, and > >what component do I need to include in my project to get it? > > > >Thanks, > > > >Mark Whittinghill > >Symphony Information Services > >763-391-7400 > >mwhittinghill at symphonyinfo.com > > > > > > > > > > > -- > -Francisco > > > -- > _______________________________________________ > 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 Thu Jul 15 10:59:59 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 15 Jul 2004 16:59:59 +0100 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: Hi Mark You need a standard vb listbox (on the toolbox) with the style property set to 'checkbox'. Richard -----Original Message----- From: Mark Whittinghill [mailto:mwhittinghill at symphonyinfo.com] Sent: 15 July 2004 16:49 To: accessd at databaseadvisors.com Subject: [AccessD] OT: VB listbox with checkboxes I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Thu Jul 15 11:01:07 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 15 Jul 2004 11:01:07 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> Mark, The built-in VB listbox control has this functionality. In the Properties window, set Style = Checkbox. There are dozens of 3rd party OCX controls that do the same thing as well if you want to spend the money. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark Whittinghill Sent: Thursday, July 15, 2004 10:49 AM To: accessd at databaseadvisors.com Subject: [AccessD] OT: VB listbox with checkboxes I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From mkahelin at gorskibulk.com Thu Jul 15 11:01:25 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 12:01:25 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB3B@gbtmain.gorskibulk.local> I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. From cfoust at infostatsystems.com Thu Jul 15 11:15:40 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jul 2004 09:15:40 -0700 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: Not in a query. You can't logically enable an interface-level connection to a database where the user has no permissions on the other database. Why are you using two workgroups, and what is it you're actually trying to accomplish? Charlotte Foust -----Original Message----- From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] Sent: Thursday, July 15, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: [AccessD] Connect to db with different wrkgroup I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 15 11:39:26 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 12:39:26 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB3F@gbtmain.gorskibulk.local> I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 15 12:34:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jul 2004 10:34:20 -0700 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: You can, but only in code, not in a query. Charlotte Foust -----Original Message----- From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] Sent: Thursday, July 15, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 15 12:37:33 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 10:37:33 -0700 Subject: [AccessD] Connect to db with different wrkgroup In-Reply-To: <0D2D1FEE52F53B46987A44B2EBF284D626AB3F@gbtmain.gorskibulk.local> Message-ID: Hi Martin: Have you tried to link the data. Go into the new database and select link (File/Get External data/Link Tables...) to attach the tables from the older database. You should be able to actually copy the old tables, with data, into new tables, into the new database. Later, when the SQL DB is up and running you can just pull the tables and data, into the DB using the DTS import/export wizard, in the EM. This should be a very easy process...but you will have to have full permissions. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 9:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Thu Jul 15 13:48:55 2004 From: lists at theopg.com (MarkH) Date: Thu, 15 Jul 2004 19:48:55 +0100 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <1212580550.20040715092751@cactus.dk> Message-ID: <001001c46a9c$61bfd1e0$2f0d6bd5@netboxxp> Cheers Gustav... I was worried I was missing something there :@) Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 15 July 2004 08:28 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Erasing / clearing a user defined type Hi Mark > This is a question I've been meaning to ask for a while and never got > round to it... Is there a simple one line way to erase / clear a UDT > after its finished with, as opposed to clearing the variables within > it individually? Not that I know of. But you define a global variable as your UDT. This will, of course, be empty. Then, when you need to "reset" your local variable, set it to the global variable: Dim tLocal As MARK tLocal = tEmpty /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 15 13:47:50 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 14:47:50 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB51@gbtmain.gorskibulk.local> Thanks Jim - that would be ok except the data is live and is being updated. If I move it to a new table (v.2000) then the data isn't accessible to the 2.0 app. Oh well, nobody ever told me this stuff was supposed to be easy. > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 1:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Martin: > > Have you tried to link the data. Go into the new database and > select link (File/Get External data/Link Tables...) to attach > the tables from the older database. You should be able to > actually copy the old tables, with data, into new tables, > into the new database. Later, when the SQL DB is up and > running you can just pull the tables and data, into the DB > using the DTS import/export wizard, in the EM. > > This should be a very easy process...but you will have to > have full permissions. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 9:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > I'm currently using Access 2003 with a 'new' mdw workgroup > file. I need to lookup data from the 'old' Access database > (v.2.0 format with mda workgroup file) until I can port the > old application and data over to new database with data in > SQL tables. -connecting to a SQL database I can specify > userid, password - I was hoping I can do the same to connect > to another Access db/table. > > > -----Original Message----- > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > Sent: Thursday, July 15, 2004 12:16 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Not in a query. You can't logically enable an interface-level > > connection to a database where the user has no permissions on the > > other database. Why are you using two workgroups, and what is it > > you're actually trying to accomplish? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > Sent: Thursday, July 15, 2004 8:01 AM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > tables and need help to bridge the transition. With two Access > > databases (db) having two workgroup (wg) files; Is there a way to > > establish a query connection from db/wg A to db/wg B? i.e. can I > > establish a sourcedatabase connection from a query and specify mdb, > > mdw, user and password -link doesn't work since the > logged-in user or > > owner does not have access to the other db. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From GregSmith at starband.net Thu Jul 15 13:54:05 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 15 Jul 2004 13:54:05 -0500 (CDT) Subject: [AccessD] Delete an external file from within Access vb In-Reply-To: <200407150747.i6F7lUQ16159@databaseadvisors.com> References: <007801c469c1$c3f0a870$6601a8c0@HAL9002> <200407150747.i6F7lUQ16159@databaseadvisors.com> Message-ID: <2323.216.43.21.235.1089917645.squirrel@cetus.email.starband.net> Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net From lists at theopg.com Thu Jul 15 14:01:37 2004 From: lists at theopg.com (MarkH) Date: Thu, 15 Jul 2004 20:01:37 +0100 Subject: [AccessD] Treeview Controls In-Reply-To: <20040715140321.13242.qmail@web50405.mail.yahoo.com> Message-ID: <001101c46a9e$27c73440$2f0d6bd5@netboxxp> The treeview is part of mscomctl.ocx so all you need to do to use it is create a reference to it and it'll show up on the activex menu... Hth mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow Sent: 15 July 2004 15:03 To: Access Developers discussion and problem solving Subject: [AccessD] Treeview Controls Does anyone know if Acess 2003 has a treeview control? Thanks! Dale --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 15 14:13:22 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 15 Jul 2004 15:13:22 -0400 Subject: [AccessD] Delete an external file from within Access vb Message-ID: Greg, You can use the Kill statement. or You can use the DeleteFile Method of the FileSystemObject. Mark -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 15, 2004 2:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Delete an external file from within Access vb Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jul 15 14:20:03 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jul 2004 14:20:03 -0500 Subject: [AccessD] Delete an external file from within Access vb Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> is this what you are looking for? Kill strFileName Jim hale -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 15, 2004 1:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Delete an external file from within Access vb Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Thu Jul 15 15:01:05 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 15 Jul 2004 15:01:05 -0500 (CDT) Subject: [AccessD] Delete an external file from within Access vb (SOLVED) In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> References: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> Message-ID: <2600.216.43.21.235.1089921665.squirrel@cetus.email.starband.net> Thank you Jim and Mark....it's exactly what I needed. Now...does anyone know someone looking for two brain cells? I'm gonna fire mine...I knew they weren't paying attention...;) Thanks again! Greg > is this what you are looking for? > Kill strFileName > > Jim hale > > -----Original Message----- > From: Greg Smith [mailto:GregSmith at starband.net] > Sent: Thursday, July 15, 2004 1:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Delete an external file from within Access vb > > > Hello again. > > Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help > on the "open file dialog" box issue. It works! > > Now, I want to delete the file that 'we' used after selecting it from > the file dialog box. I don't want to delete it right after selecting > it, but later, after I've imported the data that was in it. > > But I can't remember how to do it. I know I've done this before but I > can't find the code nor the brain cell that contains that > information...it might be on vacation at the moment. Or it's fighting > with the only other one I've got. Or they're both out playing HALO and > I'm toast. > > Any help would & is greatly appreciated. > > Thanks! > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 15 15:36:47 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 15 Jul 2004 13:36:47 -0700 Subject: [AccessD] OT: VB listbox with checkboxes In-Reply-To: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> Message-ID: <40F6EADF.8060205@verizon.net> I didn't realize this, is the checkbox column customizable? Brett Barabash wrote On 7/15/2004 9:01 AM: >Mark, > >The built-in VB listbox control has this functionality. In the >Properties window, set Style = Checkbox. There are dozens of 3rd party >OCX controls that do the same thing as well if you want to spend the >money. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark >Whittinghill >Sent: Thursday, July 15, 2004 10:49 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: VB listbox with checkboxes > >I am building a VB app, and I need to include the listbox control that >has checkboxes, like the column selector in Outlook. What control is >that, and what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > >-------------------------------------------------------------------------------------------------------------------- >The information in this email may contain confidential information that >is legally privileged. The information is only for the use of the intended >recipient(s) named above. If you are not the intended recipient(s), you >are hereby notified that any disclosure, copying, distribution, or the taking >of any action in regard to the content of this email is strictly prohibited. If >transmission is incorrect, unclear, or incomplete, please notify the sender >immediately. The authorized recipient(s) of this information is/are prohibited >from disclosing this information to any other party and is/are required to >destroy the information after its stated need has been fulfilled. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >This footer also confirms that this email message has been scanned >for the presence of computer viruses.Scanning of this message and >addition of this footer is performed by SurfControl E-mail Filter software >in conjunction with virus detection software. > > > -- -Francisco From BBarabash at TappeConstruction.com Thu Jul 15 16:07:37 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 15 Jul 2004 16:07:37 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <100F91B31300334B89EC531C9DCB0865065821@tccexch01.tappeconstruction.net> Not really. It just adds a simple 3D box to the left of the list item, with a checkmark if selected. Not quite like Outlook's list view that provides its own column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 15, 2004 3:37 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: VB listbox with checkboxes I didn't realize this, is the checkbox column customizable? Brett Barabash wrote On 7/15/2004 9:01 AM: >Mark, > >The built-in VB listbox control has this functionality. In the >Properties window, set Style = Checkbox. There are dozens of 3rd party >OCX controls that do the same thing as well if you want to spend the >money. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark >Whittinghill >Sent: Thursday, July 15, 2004 10:49 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: VB listbox with checkboxes > >I am building a VB app, and I need to include the listbox control that >has checkboxes, like the column selector in Outlook. What control is >that, and what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From accessd at shaw.ca Thu Jul 15 16:08:59 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 14:08:59 -0700 Subject: [AccessD] Connect to db with different wrkgroup In-Reply-To: <0D2D1FEE52F53B46987A44B2EBF284D626AB51@gbtmain.gorskibulk.local> Message-ID: Hi Marty: Well, I have one suggestion and I will be having to do a similar task, next week. Can you make the switch before or after hours? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 11:48 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup Thanks Jim - that would be ok except the data is live and is being updated. If I move it to a new table (v.2000) then the data isn't accessible to the 2.0 app. Oh well, nobody ever told me this stuff was supposed to be easy. > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 1:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Martin: > > Have you tried to link the data. Go into the new database and > select link (File/Get External data/Link Tables...) to attach > the tables from the older database. You should be able to > actually copy the old tables, with data, into new tables, > into the new database. Later, when the SQL DB is up and > running you can just pull the tables and data, into the DB > using the DTS import/export wizard, in the EM. > > This should be a very easy process...but you will have to > have full permissions. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 9:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > I'm currently using Access 2003 with a 'new' mdw workgroup > file. I need to lookup data from the 'old' Access database > (v.2.0 format with mda workgroup file) until I can port the > old application and data over to new database with data in > SQL tables. -connecting to a SQL database I can specify > userid, password - I was hoping I can do the same to connect > to another Access db/table. > > > -----Original Message----- > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > Sent: Thursday, July 15, 2004 12:16 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Not in a query. You can't logically enable an interface-level > > connection to a database where the user has no permissions on the > > other database. Why are you using two workgroups, and what is it > > you're actually trying to accomplish? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > Sent: Thursday, July 15, 2004 8:01 AM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > tables and need help to bridge the transition. With two Access > > databases (db) having two workgroup (wg) files; Is there a way to > > establish a query connection from db/wg A to db/wg B? i.e. can I > > establish a sourcedatabase connection from a query and specify mdb, > > mdw, user and password -link doesn't work since the > logged-in user or > > owner does not have access to the other db. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Thu Jul 15 19:40:10 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jul 2004 10:40:10 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server Message-ID: <00ab01c46acd$738f2f20$48619a89@DDICK> Hello all I have a FE/BE app setup. When I install the FE on my local DEV machine and put the BE in another directory on the same DEV machine - all is OK the app works fine BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the usual screens that work finer when it's all local I get the error msg Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. Any suggestions? Many thanks Darren From stuart at lexacorp.com.pg Thu Jul 15 19:59:30 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jul 2004 10:59:30 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server In-Reply-To: <00ab01c46acd$738f2f20$48619a89@DDICK> Message-ID: <40F7B512.19412.585F95B@lexacorp.com.pg> On 16 Jul 2004 at 10:40, Darren DICK wrote: > Hello all > I have a FE/BE app setup. > When I install the FE on my local DEV machine and put the BE in another > directory on the same DEV machine - all is OK the app works fine > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > usual screens that work finer when it's all local I get the error msg > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > Any suggestions? > I'd guess you have done a Compact on the BE database. Took me a while to work it out when I first came across this one :-( I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 "SYMPTOMS After you compact a Microsoft Access database or an Access project that exists in a folder in an NTFS file system partition, you may notice that the custom NTFS permissions for the Access database file (.mdb) or for the Access project file (.adp) are reset unexpectedly." ...... "CAUSE The compact process always compacts the source Access database file or the Access project file to a new file. The newly created file inherits NTFS permissions that are different from the source file. The inheritance of the NTFS permissions is based on the version of Access that is used to compact the file." -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From martyconnelly at shaw.ca Thu Jul 15 20:32:03 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 18:32:03 -0700 Subject: [AccessD] Time zones (was: internationalization) References: Message-ID: <40F73013.3010508@shaw.ca> I can see it from my house, well almost, if I climb a little hill. Jim Lawrence (AccessD) wrote: >Just for information, the new center of the universe is now just outside of >Victoria. > >http://www.hia-iha.nrc-cnrc.gc.ca/cu/main_e.html > >Jim > > > >>Are you seriously suggesting that the British Empire is not the center of >>the Universe anymore? ;-) >> >> > > > >>JWC >> >> > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jul 15 20:40:01 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 18:40:01 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> Message-ID: <40F731F1.60209@shaw.ca> I came across this today under the Access ORK.You might be able to hide the design this way. http://www.microsoft.com/office/ork/2000/three/65t3_9.htm Using the RunPermissions Property with User-Level Security In order for Microsoft Access to display a table or query, it must read the design of that table or query. As a result, in order for a user to read and display the data in a table or query, that user must also have permission to read the design of the table or query. If you dont want your users to see the design of your table or query, you can create a query and set its RunPermissions property to restrict their access to this information. Set it up and test against one of the access reengineering case tools like Sparxs or EZDesign. Rocky Smolin - Beach Access Software wrote: >One of the great advantages of Access is that the user can work with the >data apart from the front end app. It's transparency is a real marketing >plus. So I'd like to leave the back end open. I think it will be >beneficial. > >Rocky > >----- Original Message ----- >From: "Andy Lacey" >To: "'Access Developers discussion and problem solving'" > >Sent: Wednesday, June 23, 2004 11:36 AM >Subject: RE: [AccessD] Hiding Back End Design > > > > >>I'm going to sound a dissenting voice here. I don't understand why Rocky, >>who's no doubt sweat blood to develop his vertical app, should in effect >>give his system away? Because surely that's what he'd be doing? The only >> >> >way > > >>doing a development like this makes sense is to get economies of scale by >>selling lots of copies. Without that incentive vertical apps would never >> >> >get > > >>developed at all because, in the main, a single customer can't stand all >> >> >the > > >>development costs. And if you're going to put in the graft why shouldn't >> >> >you > > >>dream of making money on it, and why should you open yourself to being >>ripped-off by people who can't be arsed to do the hard work themselves? >>Sorry, don't understand. >> >>-- Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>DWUTKA at marlow.com >>>Sent: 23 June 2004 18:30 >>>To: accessd at databaseadvisors.com >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>>'Open source' should pervade into all areas of the >>>information age. Music, programming, videos, etc. >>>Unfortunately it will take a complete change in humanity's >>>driving force....the accumulation of wealth. As long as >>>people are trying to make a buck, it will be virtually >>>impossible to get them to do stuff simply for the betterment >>>of society. >>> >>>Drew >>> >>> >>> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Thu Jul 15 21:41:32 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 21:41:32 -0500 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12C@main2.marlow.com> WG files? In 97 and 2000, workgroup files are mdw's, did that change in 2003? One approach you might take is to 'merge' the security systems. Workgroup files only store 'login' information, the permissions are stored in the .mdb itself. If you use the same UserName and/or Group name, in both workgroup files, they should be interchangeable. Of course, you also have to use the same 'ID' when you create them. I honestly don't know how well it works across versions. I would assume that going from a newer version to an older version wouldn't be an issue. If you have the security matched, I don't think you would have a problem putting a 'outside' database as a source in a query. I'm guessing here, but it's a well educated guess. Access User Level security is very similar to NT security, and when a process in NT has a specific security account, the 'credentials' carry over to whatever that process is using. I wouldn't be at all surprised if Jet does the same thing. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 11:01 AM To: Access Developers discussion and problem solving Subject: [AccessD] Connect to db with different wrkgroup I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Thu Jul 15 21:46:24 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jul 2004 12:46:24 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server References: <40F7B512.19412.585F95B@lexacorp.com.pg> Message-ID: <00c301c46adf$15bc26c0$48619a89@DDICK> HI Stuart Thanks for this I have read and re-read the blurb from M$ I still don't get it. I have set the permissions on the TEMP folder on my DEV machine to anyone can do anything they like from anywhere withany logon :-)) Compiled - decompiled and compacted and repaired the DEV version of the back end whilst it was on my DEV machine Then I copy this local DEV version of the BE to the server - drop it into the expected place then try and perform some tasks and now I get Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at that file at all. The KB section of MS was useless. Any suggestions?? I'm starting to get desperate this will halt the deployment of the app due this Monday Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 10:59 AM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 10:40, Darren DICK wrote: > > > Hello all > > I have a FE/BE app setup. > > When I install the FE on my local DEV machine and put the BE in another > > directory on the same DEV machine - all is OK the app works fine > > > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > > usual screens that work finer when it's all local I get the error msg > > > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > > > Any suggestions? > > > > I'd guess you have done a Compact on the BE database. Took me a while to work > it out when I first came across this one :-( > > I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 > > "SYMPTOMS > After you compact a Microsoft Access database or an Access project that exists > in a folder in an NTFS file system partition, you may notice that the custom > NTFS permissions for the Access database file (.mdb) or for the Access project > file (.adp) are reset unexpectedly." > ...... > "CAUSE > The compact process always compacts the source Access database file or the > Access project file to a new file. The newly created file inherits NTFS > permissions that are different from the source file. The inheritance of the > NTFS permissions is based on the version of Access that is used to compact the > file." > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 15 22:02:10 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 22:02:10 -0500 Subject: [AccessD] A2K: Error 3343 When I install Backend on server Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12D@main2.marlow.com> What are the file permissions of the .mdb when you copy it? Then, what are the file permissions when you compact it? With NT security, when a new file is created, it gets it's permissions from one of two places. It either inherits it's permissions from an original copy, or it inherits the permissions of the folder it is in. Actually, there are a few variations on that, it all depends on how you have the NTFS security setup. So, if you copy an .mdb that you have permissions for, to the server, then compact it on the server, when it compacts, it creates a brand new file, not a copy, so it is going to inherit the security settings of the folder containing the .mdb. If those folder settings aren't correct, you are going to mess up your permissions. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Thursday, July 15, 2004 9:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server HI Stuart Thanks for this I have read and re-read the blurb from M$ I still don't get it. I have set the permissions on the TEMP folder on my DEV machine to anyone can do anything they like from anywhere withany logon :-)) Compiled - decompiled and compacted and repaired the DEV version of the back end whilst it was on my DEV machine Then I copy this local DEV version of the BE to the server - drop it into the expected place then try and perform some tasks and now I get Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at that file at all. The KB section of MS was useless. Any suggestions?? I'm starting to get desperate this will halt the deployment of the app due this Monday Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 10:59 AM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 10:40, Darren DICK wrote: > > > Hello all > > I have a FE/BE app setup. > > When I install the FE on my local DEV machine and put the BE in another > > directory on the same DEV machine - all is OK the app works fine > > > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > > usual screens that work finer when it's all local I get the error msg > > > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > > > Any suggestions? > > > > I'd guess you have done a Compact on the BE database. Took me a while to work > it out when I first came across this one :-( > > I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 > > "SYMPTOMS > After you compact a Microsoft Access database or an Access project that exists > in a folder in an NTFS file system partition, you may notice that the custom > NTFS permissions for the Access database file (.mdb) or for the Access project > file (.adp) are reset unexpectedly." > ...... > "CAUSE > The compact process always compacts the source Access database file or the > Access project file to a new file. The newly created file inherits NTFS > permissions that are different from the source file. The inheritance of the > NTFS permissions is based on the version of Access that is used to compact the > file." > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 15 22:17:12 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 15 Jul 2004 23:17:12 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <000201c46ae3$6395f930$0501a8c0@colbyws> Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com From accessd at shaw.ca Thu Jul 15 22:37:47 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 20:37:47 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: Hi Drew: The information has been sent to you replying to your off-line request. Did you receive it, earlier today? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 15 22:43:00 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 20:43:00 -0700 Subject: [AccessD] Jumpdrive encrypted volume References: <000201c46ae3$6395f930$0501a8c0@colbyws> Message-ID: <020201c46ae6$fdcc1810$6601a8c0@HAL9002> Trip to Fry's? (Sounds like it might be fried.) This is going back on the same box it came off of? If so, probably failed and the encryption doesn't have anything to do with it. Why do you encrypt? Rocky ----- Original Message ----- From: "jwcolby" To: "AccessD" Sent: Thursday, July 15, 2004 8:17 PM Subject: [AccessD] Jumpdrive encrypted volume > Anyone here using one of these? I have a 256mb model that I have been using > for weeks. It was working this morning. Turned off my laptop, removed the > drive. This evening, I cannot mount the encrypted volume. Win2K says > simply cannot mount drive (after entering password). XP does a page fault > and offers to send a report to MS. > > Any words of wisdom? > > John W. Colby > www.ColbyConsulting.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Thu Jul 15 22:44:21 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 20:44:21 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> Message-ID: <020a01c46ae7$2e245860$6601a8c0@HAL9002> Marty: Why couldn't they just go directly into the back end and open the table in design view? Rocky ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 6:40 PM Subject: Re: [AccessD] Hiding Back End Design > I came across this today under the Access ORK.You might be able to hide > the design this way. > http://www.microsoft.com/office/ork/2000/three/65t3_9.htm > > Using the RunPermissions Property with User-Level Security > In order for Microsoft Access to display a table or query, it must read > the design of that table or query. As a result, in order for a user to > read and display the data in a table or query, that user must also have > permission to read the design of the table or query. > If you dont want your users to see the design of your table or query, > you can create a query and set its RunPermissions property to restrict > their access to this information. > Set it up and test against one of the access reengineering case tools > like Sparxs or EZDesign. > > Rocky Smolin - Beach Access Software wrote: > > >One of the great advantages of Access is that the user can work with the > >data apart from the front end app. It's transparency is a real marketing > >plus. So I'd like to leave the back end open. I think it will be > >beneficial. > > > >Rocky > > > >----- Original Message ----- > >From: "Andy Lacey" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 23, 2004 11:36 AM > >Subject: RE: [AccessD] Hiding Back End Design > > > > > > > > > >>I'm going to sound a dissenting voice here. I don't understand why Rocky, > >>who's no doubt sweat blood to develop his vertical app, should in effect > >>give his system away? Because surely that's what he'd be doing? The only > >> > >> > >way > > > > > >>doing a development like this makes sense is to get economies of scale by > >>selling lots of copies. Without that incentive vertical apps would never > >> > >> > >get > > > > > >>developed at all because, in the main, a single customer can't stand all > >> > >> > >the > > > > > >>development costs. And if you're going to put in the graft why shouldn't > >> > >> > >you > > > > > >>dream of making money on it, and why should you open yourself to being > >>ripped-off by people who can't be arsed to do the hard work themselves? > >>Sorry, don't understand. > >> > >>-- Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>DWUTKA at marlow.com > >>>Sent: 23 June 2004 18:30 > >>>To: accessd at databaseadvisors.com > >>>Subject: RE: [AccessD] Hiding Back End Design > >>> > >>> > >>>'Open source' should pervade into all areas of the > >>>information age. Music, programming, videos, etc. > >>>Unfortunately it will take a complete change in humanity's > >>>driving force....the accumulation of wealth. As long as > >>>people are trying to make a buck, it will be virtually > >>>impossible to get them to do stuff simply for the betterment > >>>of society. > >>> > >>>Drew > >>> > >>> > >>> > >>-- > >>_______________________________________________ > >>AccessD mailing list > >>AccessD at databaseadvisors.com > >>http://databaseadvisors.com/mailman/listinfo/accessd > >>Website: http://www.databaseadvisors.com > >> > >> > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 15 22:49:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 22:49:21 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12E@main2.marlow.com> Yep, sorry, didn't reply to it yet....we actually removed our black list completely, because it literally refused the email connection, essentially dropping the email into a void. So I've been a little busy dealing with that issue...LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 15, 2004 10:38 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: The information has been sent to you replying to your off-line request. Did you receive it, earlier today? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 15 23:50:06 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 21:50:06 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> Message-ID: <40F75E7E.2090505@shaw.ca> Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table in >design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to hide >>the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must read >>the design of that table or query. As a result, in order for a user to >>read and display the data in a table or query, that user must also have >>permission to read the design of the table or query. >>If you dont want your users to see the design of your table or query, >>you can create a query and set its RunPermissions property to restrict >>their access to this information. >>Set it up and test against one of the access reengineering case tools >>like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with the >>>data apart from the front end app. It's transparency is a real marketing >>>plus. So I'd like to leave the back end open. I think it will be >>>beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect >>>>give his system away? Because surely that's what he'd be doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to being >>>>ripped-off by people who can't be arsed to do the hard work themselves? >>>>Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the >>>>>information age. Music, programming, videos, etc. >>>>>Unfortunately it will take a complete change in humanity's >>>>>driving force....the accumulation of wealth. As long as >>>>>people are trying to make a buck, it will be virtually >>>>>impossible to get them to do stuff simply for the betterment >>>>>of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From stuart at lexacorp.com.pg Fri Jul 16 02:05:28 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jul 2004 17:05:28 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server In-Reply-To: <00c301c46adf$15bc26c0$48619a89@DDICK> Message-ID: <40F80AD8.18919.6D50350@lexacorp.com.pg> On 16 Jul 2004 at 12:46, Darren DICK wrote: > HI Stuart > Thanks for this > I have read and re-read the blurb from M$ > I still don't get it. > I have set the permissions on the TEMP folder on my DEV machine to > anyone can do anything they like from anywhere withany logon :-)) > Compiled - decompiled and compacted and repaired the DEV version of the > back end whilst it was on my DEV machine > > Then I copy this local DEV version of the BE to the server - drop it into > the expected place then try and perform some tasks and now I get > Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " > It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at > that file at all. > The KB section of MS was useless. > Any suggestions?? > I'm starting to get desperate this will halt the deployment of the app due this Monday > I'd say it's definitely a rights thing. You need to look at the Share permissions as well as direct access rights to find out who can really do what on a file. Do you have Admin rights through the Share you are using? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Fri Jul 16 04:37:16 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 11:37:16 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <16528853238.20040715164544@cactus.dk> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> <16528853238.20040715164544@cactus.dk> Message-ID: <539185107.20040716113716@cactus.dk> Hi Greg et all Also noted this code for the Browse Folder dialog which can display files as well: http://vbnet.mvps.org/index.html?code/browse/browsenetwork.htm /gustav >> I need to have a 'browse' button on a form that will allow the users to >> open the File Dialog Box (the normal Windows one) so they can browse to >> the file the program needs if necessary. Normally they will not have to >> do this, but, things will not always be 'normal' in real life. This gives >> them the option to go find the file using a familiar interface. From gustav at cactus.dk Fri Jul 16 05:04:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 12:04:41 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <539185107.20040716113716@cactus.dk> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> <16528853238.20040715164544@cactus.dk> <539185107.20040716113716@cactus.dk> Message-ID: <4810830162.20040716120441@cactus.dk> > Also noted this code for the Browse Folder dialog which can display > files as well: > http://vbnet.mvps.org/index.html?code/browse/browsenetwork.htm Note, however, that should you ever get the idea to open Browse Folder with a preselected folder, this is very convoluted: http://vbnet.mvps.org/code/callback/browsecallback.htm /gustav >>> I need to have a 'browse' button on a form that will allow the users to >>> open the File Dialog Box (the normal Windows one) so they can browse to >>> the file the program needs if necessary. Normally they will not have to >>> do this, but, things will not always be 'normal' in real life. This gives >>> them the option to go find the file using a familiar interface. From Jdemarco at hudsonhealthplan.org Fri Jul 16 07:39:48 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Fri, 16 Jul 2004 08:39:48 -0400 Subject: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99037409E6@TTNEXCHSRV1.hshhp.com> Thanks for this timely post John. We've been getting a lot of requests for custom Outlook forms lately which means it's only a matter of time before the form data will need to be analyzed or summarized. Have you tried c.UserProperties("FieldName") to access your custom field data? Does anyone know offhand if custom form fields act the same as adding a field to an existing form (in terms of data access)? Thanks, Jim DeMarco Director Application Development Hudson Health Plan -----Original Message----- From: John Skolits [mailto:Support at CorporateDataDesign.com] Sent: Wednesday, July 14, 2004 5:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" I really wanted to do a linking but not all the fields are available. But If is Use code and use Dim c As Outlook.ContactItem You can get the user field by using c.UserProperties(i). Where "i" is the enumerated value of the fields you created. I created 2 fields so they are: c.UserProperties(1) and c.UserProperties(2). C .UserProperties(1).NAME will give your field name. So I guess I'll just run an import routine on startup and load everyone into my database that way. John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Skolits Sent: Wednesday, July 14, 2004 4:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From Mark.Mitsules at ngc.com Fri Jul 16 08:31:37 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 09:31:37 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 08:41:32 2004 From: michael.broesdorf at web.de (=?Windows-1252?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 15:41:32 +0200 Subject: AW: [AccessD] Hiding Back End Design In-Reply-To: <40F75E7E.2090505@shaw.ca> Message-ID: Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table in >design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to hide >>the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must read >>the design of that table or query. As a result, in order for a user to >>read and display the data in a table or query, that user must also have >>permission to read the design of the table or query. >>If you dont want your users to see the design of your table or query, >>you can create a query and set its RunPermissions property to restrict >>their access to this information. >>Set it up and test against one of the access reengineering case tools >>like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with the >>>data apart from the front end app. It's transparency is a real marketing >>>plus. So I'd like to leave the back end open. I think it will be >>>beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect >>>>give his system away? Because surely that's what he'd be doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to being >>>>ripped-off by people who can't be arsed to do the hard work themselves? >>>>Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the >>>>>information age. Music, programming, videos, etc. >>>>>Unfortunately it will take a complete change in humanity's >>>>>driving force....the accumulation of wealth. As long as >>>>>people are trying to make a buck, it will be virtually >>>>>impossible to get them to do stuff simply for the betterment >>>>>of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Fri Jul 16 08:47:54 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 09:47:54 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD73@DISABILITYINS01> I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 16 09:23:45 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 10:23:45 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 09:45:19 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 07:45:19 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" number Message-ID: <20040716144519.72926.qmail@web53910.mail.yahoo.com> I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy From JColby at dispec.com Fri Jul 16 09:51:13 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 10:51:13 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD74@DISABILITYINS01> Mark, I have not read any documentation that says anything about any of this stuff. Further in doing a google looking for people having problems I didn't really find anything. Lexar has a 24 hour chat tech support. He was useless, basically telling me to rma it and they would attempt data recovery. I have had a problem getting the encrypted volume to mount once before. I ended up just manually shutting down the volume then the media, rebooting and it came back up. I think I will NOT power down the machine without manually unmounting both the encrypted volume and the media. It is reasonably easy to do that, and I haven't ever had any problems where I did dismount everything. I have only used this thing for about a month, but I have been using it pretty much daily since I have my billing on it. I also put customer databases in the encrypted volume so that if it is lost, sensitive stuff doesn't get out. I am going to move my billing into a secure volume on my notebook. I purchased a license for DriveCrypt which is a very good program for building encrypted volumes out of files, or encrypting entire partitions. The license is reasonably cheap at $60 / machine, but the license only works on a single machine and I was using the license on my desktop. I am making my laptop my "desktop replacement" so when I get the time I will just move the license to the laptop and be done with it. I will end up just backing up the container file off the laptop to make sure I don't end up with lost data. Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. JWC -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 10:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 09:56:58 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 16:56:58 +0200 Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD73@DISABILITYINS01> Message-ID: Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael From JColby at dispec.com Fri Jul 16 09:57:52 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 10:57:52 -0400 Subject: [AccessD] Take a formatted number and turn it into a "real" n umber Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD75@DISABILITYINS01> Once merged what happens? Will each coast continuing using their copy or is something in the works to have them all use one database? JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 10:45 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 10:01:38 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Fri, 16 Jul 2004 17:01:38 +0200 Subject: AW: [AccessD] Take a formatted number and turn it into a "real" number In-Reply-To: <20040716144519.72926.qmail@web53910.mail.yahoo.com> Message-ID: Hi Nancy, 1. Create a new database with the same tables as your production db's 2. Do not use autonumbering for the pk columns - make them long integers instead 3. Import all data from database A, multiplying the pk and fk values by 10, adding 1 4. Import all data from database A, multiplying the pk an fk values by 10, adding 2 5. Convert the pk-columns to autonumber fields This way, all pk-values from db A will have a 1 at the end, all pk-values from db B will have a 2, keeping all related data together. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Nancy Lytle Gesendet: Freitag, 16. Juli 2004 16:45 An: AccessD at databaseadvisors.com Betreff: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 10:12:00 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 08:12:00 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" n umber In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD75@DISABILITYINS01> Message-ID: <20040716151200.97704.qmail@web53907.mail.yahoo.com> Yes, they will be using either the same backend or we will set up replica with an eye towards upsizing to Oracle later. Nancy --- "Colby, John" wrote: > Once merged what happens? Will each coast > continuing using their copy or is > something in the works to have them all use one > database? > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 10:45 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Take a formatted number and turn > it into a "real" > number > > > I just got handed a database of about 30 tables > (about > half are lookups), there are about 10 tables with > varying relationships that are fairly well defined. > There is an identical - but unconnected - version of > the database at our West Coast location. > I have now been tasked with merging the two. At > first > I thought it would be easy because it appeared they > were using two different numbers schemes for the > PK's > turns out they just formatted them to "look > different" > but the matching tables use the same Autonumber - > start from 1 - field type. So now I have to figure > out a way to merge them without messing up all the > relationships. > Does anyone have any ideas? Both databases are > still > being used so I have to come up with a way I can do > it > with the least down time possible. > TIA, > Nancy > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Fri Jul 16 10:13:52 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 11:13:52 -0400 Subject: [AccessD] Take a formatted number and turn it into a "real" n umber Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD76@DISABILITYINS01> Nancy, You are lucky it is just 10 tables. It is possible to do this by: 1) Create a NEW database for the migration 2) Link all of the tables from DB1 3) link all of the tables from DB2 4) Create queries that append one table in DB1 to it's matching table in DB2 5) Start by creating SELECT queries (so you can see the data). In these queries, take the PK of the table in DB1 and alias it, adding a large number to it (at least the quantity of records in DB2). IOW if DB2 has 2000 records in the matching table then the aliased PK in db1 should look like: PK: [RealPKFldName]+2000 6) Once you are comfortable you have this right, turn the SELECT into an append query and append the data into the table What you have done is simply "bumped" the PK up enough that they will append in to DB2 without colliding with any existing PKs. NOW... any tables that use the PK of that table as a FK... You have to "Bump" the FK by that same number (2000 in my example). You get the idea? Build a system of queries that do this in order from parent to child table. Build macros that sequence the queries in the correct order. Using TEST database copies of DB1 and DB2 run the macros. Test that the migration worked. Fix problems. Do it again until it works Once you know that everything is working... BACKUP the real DB1 and DB2 Run the macro. You are done. Doing it this way allows you to do the migration in just the time required for the update / append queries to work. JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 10:45 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 10:38:16 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 08:38:16 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" n umber In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD76@DISABILITYINS01> Message-ID: <20040716153816.83898.qmail@web53910.mail.yahoo.com> Thank you, I was afraid this was what I was going to have to so since the tables do have parent child relationships down the line. Because they are taking material that we have ordered and that is received and they have to be able to track it all the way as it is assembled with other parts, until it is finished and placed in as part of a larger project, say a piece to go on an airplane. So I guess really they want to be able to also "backtrack" if necessary from the finished part to the Lot it came in. Again, thanks for the assistance. Now I need to map all this out. Nancy --- "Colby, John" wrote: > Nancy, > > You are lucky it is just 10 tables. It is possible > to do this by: > > 1) Create a NEW database for the migration > 2) Link all of the tables from DB1 > 3) link all of the tables from DB2 > 4) Create queries that append one table in DB1 to > it's matching table in DB2 > 5) Start by creating SELECT queries (so you can see > the data). In these > queries, take the PK of the table in DB1 and alias > it, adding a large number > to it (at least the quantity of records in DB2). > IOW if DB2 has 2000 > records in the matching table then the aliased PK in > db1 should look like: > PK: [RealPKFldName]+2000 > 6) Once you are comfortable you have this right, > turn the SELECT into an > append query and append the data into the table > > What you have done is simply "bumped" the PK up > enough that they will append > in to DB2 without colliding with any existing PKs. > > > NOW... any tables that use the PK of that table as a > FK... > > You have to "Bump" the FK by that same number (2000 > in my example). > > You get the idea? > > Build a system of queries that do this in order from > parent to child table. > Build macros that sequence the queries in the > correct order. > Using TEST database copies of DB1 and DB2 run the > macros. > Test that the migration worked. > Fix problems. > Do it again until it works > > Once you know that everything is working... > > BACKUP the real DB1 and DB2 > Run the macro. > > You are done. > > Doing it this way allows you to do the migration in > just the time required > for the update / append queries to work. > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 10:45 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Take a formatted number and turn > it into a "real" > number > > > I just got handed a database of about 30 tables > (about > half are lookups), there are about 10 tables with > varying relationships that are fairly well defined. > There is an identical - but unconnected - version of > the database at our West Coast location. > I have now been tasked with merging the two. At > first > I thought it would be easy because it appeared they > were using two different numbers schemes for the > PK's > turns out they just formatted them to "look > different" > but the matching tables use the same Autonumber - > start from 1 - field type. So now I have to figure > out a way to merge them without messing up all the > relationships. > Does anyone have any ideas? Both databases are > still > being used so I have to come up with a way I can do > it > with the least down time possible. > TIA, > Nancy > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Mark.Mitsules at ngc.com Fri Jul 16 10:56:44 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 11:56:44 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: >> Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. << Now you're making me nervous;) Perhaps I should consider encrypting the data on my USB drives. Thanks again for sharing your experiences. Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 10:51 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume Mark, I have not read any documentation that says anything about any of this stuff. Further in doing a google looking for people having problems I didn't really find anything. Lexar has a 24 hour chat tech support. He was useless, basically telling me to rma it and they would attempt data recovery. I have had a problem getting the encrypted volume to mount once before. I ended up just manually shutting down the volume then the media, rebooting and it came back up. I think I will NOT power down the machine without manually unmounting both the encrypted volume and the media. It is reasonably easy to do that, and I haven't ever had any problems where I did dismount everything. I have only used this thing for about a month, but I have been using it pretty much daily since I have my billing on it. I also put customer databases in the encrypted volume so that if it is lost, sensitive stuff doesn't get out. I am going to move my billing into a secure volume on my notebook. I purchased a license for DriveCrypt which is a very good program for building encrypted volumes out of files, or encrypting entire partitions. The license is reasonably cheap at $60 / machine, but the license only works on a single machine and I was using the license on my desktop. I am making my laptop my "desktop replacement" so when I get the time I will just move the license to the laptop and be done with it. I will end up just backing up the container file off the laptop to make sure I don't end up with lost data. Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. JWC -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 10:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rusty.hammond at cpiqpc.com Fri Jul 16 10:58:31 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Fri, 16 Jul 2004 10:58:31 -0500 Subject: [AccessD] Corrupt A97 database Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811ABAD@cpixchng-1.cpiqpc.net> I've tried to search the archives on this but I can't get to the site. We have an Access 97 database that has become corrupt. I think our file server went down during a compact. Anyway, we have tried jetcomp and have tried AccessFix database recovery software from cimaware software. The best we've gotten so far is it recovers the file but the table we really need comes up with zero records. We have a backup from the night before but have lost a whole days worth of work. To spend four or five hundred dollars wouldn't bother us if we could get our data recovered several hours of people's time to get the data reentered. Can anyone recommend data recovery software that they have used? TIA Rusty Hammond From accessd at shaw.ca Fri Jul 16 11:17:58 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 16 Jul 2004 09:17:58 -0700 Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: Message-ID: Hi Michael: Assuming that the time-stamp value is recorded in SQL and you have a key in the record in question and you are using ADO then: ... Set objCmd = New ADODB.Command With objCmd .ActiveConnection = gstrConnection .CommandText = "CheckRecord" .CommandType = adCmdStoredProc .Parameters.Append .CreateParameter("@intEmployeeNumber", adInteger, adParamInput, , Employeenumber) End With Set rs1 = New ADODB.Recordset With rs1 .Open objCmd, , adOpenStatic, adLockReadOnly If .BOF = False And .EOF = False Then .MoveLast If ![TimestampNumber] = glTimestampNumber Then SaveRecord = True Else SaveRecord = False End If Else SaveRecord = True End If End With ... ...but you should not have to be using the timestamp method to track whether a record on the SQL server was updated on client station. There are three considerations: 1. The initial recordset that retrieved the data from the server should have locked the record. ... rsEmployee.Open objCmd, , adOpenDynamic, adLockOptimistic ... 2. Setting transaction lock, when updating the record and responding to any error, by rolling the transaction back and notify the station user can catch record conflicts. On Error GoTo Err_UpDateRecord ... objConn.BeginTrans ... objConn.Execute strSQL Exit_UpdateRecord: Exit Function Err_UpdateRecord: objConn.RollbackTrans ShowConflictMsg ("SaveEmployee") Resume Exit_UpdateRecord ... 3. The SQL server has methods for handling/buffering record conflicts built into it. Even though the previous code samples are not complete I hope there is sufficient information to make the snippets useful and informative. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 7:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 12:17:42 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:17:42 -0700 (PDT) Subject: [AccessD] Looping through control names Message-ID: <20040716171742.82330.qmail@web53909.mail.yahoo.com> I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control From JColby at dispec.com Fri Jul 16 12:26:43 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 13:26:43 -0400 Subject: [AccessD] Looping through control names Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> if isnull(somevalue) then do something JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:18 PM To: Access Developers discussion and problem Solving Subject: [AccessD] Looping through control names I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Fri Jul 16 12:41:47 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 16 Jul 2004 13:41:47 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> Message-ID: Nancy Two schools of thought: 1) Let the user complete the form, and then validate it. PROS: User allowed to input all data at one time, then validate entire form at end (during [Save] action or when leaving record?). CONS: During validation, user receives error for EACH empty field, corrects it, then validation routine must cycle through all controls again. 2) Validate each field as completed using BeforeUpdate(). PROS: User stopped immediately and required to input data in empty field before advancing. CONS: More coding required. Must account for user clicking around form, so may also need validation during OnBlur event. Regards, Bob Gajewski -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:18 PM To: Access Developers discussion and problem Solving Subject: [AccessD] Looping through control names I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 12:43:17 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:43:17 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> Message-ID: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Fri Jul 16 12:47:37 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jul 2004 10:47:37 -0700 Subject: [AccessD] ALERT: AXP-SpeedFerret-PestPatrol problem Message-ID: The latest update of PestPatrol on my machine identified some files inappropriately, including two Infragistics ocx files used by SpeedFerret and some registry keys installed by it. Needless to say, it broke SpeedFerret when those files and keys were removed. When I reinstalled SpeedFerret, the files and keys were recreated and PestPatrol again identified them as pests. This time, I excluded them figuring that would take care of the problem. It didn't. PestPatrol ignores those items for now, and SpeedFerret runs but Access XP no longer recognizes the SpeedFerret Add-in key, so there isn't any connection and SF searches fail. I had a long conversation about this with support at Black Mosannon and we discovered that even uninstalling and then reinstalling SpeedFerret didn't correct the problem. I was told that another customer had had a similar experience with a spyware remover and could NOT get SpeedFerret to run properly again on that machine, even after reinstalling Office, all the updates, etc. I'm bloody-minded enough to keep trying to fix it, but I'd be happy for any help. Charlotte Foust From ssharkins at bellsouth.net Fri Jul 16 12:47:44 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 16 Jul 2004 13:47:44 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Message-ID: <20040716174739.SDZA1775.imf19aec.mail.bellsouth.net@SUSANONE> Nancy, you did declare ctl as some type of control object, didn't you? Susan H. If IsNull(ctl.Name.Value) Then it still errors on "Object Required". From lytlenj at yahoo.com Fri Jul 16 12:47:40 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:47:40 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: Message-ID: <20040716174740.43589.qmail@web53904.mail.yahoo.com> Thanks for the tips, actually I would like to combine the two and have the validation at the end of the form, listing all the fields that must be entered into and those fields would have the background color changed, ie Unfilled required fields would be yellow, corrected field would again become transparent. That way one warning, and they can see all of their "mistakes" at once. Thanks for the ideas, Nancy --- Bob Gajewski wrote: > Nancy > > > Two schools of thought: > > 1) Let the user complete the form, and then validate > it. > > PROS: User allowed to input all data at one time, > then > validate entire form at end (during [Save] action > or when leaving record?). > > CONS: During validation, user receives error for > EACH > empty field, corrects it, then validation routine > must cycle through all controls again. > > 2) Validate each field as completed using > BeforeUpdate(). > > PROS: User stopped immediately and required to input > data in empty field before advancing. > > CONS: More coding required. Must account for user > clicking > around form, so may also need validation during > OnBlur event. > > > Regards, > > Bob Gajewski > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Fri Jul 16 12:53:48 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 13:53:48 -0400 Subject: [AccessD] Looping through control names Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD78@DISABILITYINS01> >It should be "thinking" Is the value held in the control mndCmdCutomer null? if you meant to say CMDCustomer then you are in trouble anyway since a command button has no value property. JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:43 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Fri Jul 16 12:55:07 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 16 Jul 2004 13:55:07 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174740.43589.qmail@web53904.mail.yahoo.com> Message-ID: Nancy Then you need a few steps: 1) Create a variable to hold whether ANY mandatory fields are empty. 2) Loop through all controls. If any are empty, set the BackColor for that field to your desired color, and set the variable to TRUE. 3) After looping through all fields (outside the For...Next), repaint the form so the user can see all of the fields missing data. Understand that they will now have to either TAB through all fields to get to each 'bad' field click on each one at a time. Unless you want to dynamically change the tab controls or tags to allow direct jumping from bad field to next bad field. Alternatively, you could execute the loop twice. Once to set the BackColor on all 'bad' fields, and then again to SetFocus. Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Nancy Lytle Sent: Friday, July 16, 2004 13:48 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the tips, actually I would like to combine the two and have the validation at the end of the form, listing all the fields that must be entered into and those fields would have the background color changed, ie Unfilled required fields would be yellow, corrected field would again become transparent. That way one warning, and they can see all of their "mistakes" at once. Thanks for the ideas, Nancy --- Bob Gajewski wrote: > Nancy > > > Two schools of thought: > > 1) Let the user complete the form, and then validate > it. > > PROS: User allowed to input all data at one time, > then > validate entire form at end (during [Save] action > or when leaving record?). > > CONS: During validation, user receives error for > EACH > empty field, corrects it, then validation routine > must cycle through all controls again. > > 2) Validate each field as completed using > BeforeUpdate(). > > PROS: User stopped immediately and required to input > data in empty field before advancing. > > CONS: More coding required. Must account for user > clicking > around form, so may also need validation during > OnBlur event. > > > Regards, > > Bob Gajewski > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Fri Jul 16 12:58:27 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 16 Jul 2004 13:58:27 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Message-ID: <000001c46b5e$7f774fc0$cc0aa845@hargrove.internal> If IsNull(ctl.Value) Then Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Nancy Lytle Sent: Friday, July 16, 2004 1:43 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Fri Jul 16 13:04:32 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 16 Jul 2004 14:04:32 -0400 Subject: [AccessD] ALERT: AXP-SpeedFerret-PestPatrol problem In-Reply-To: Message-ID: <20040716180429.FNPN1779.imf23aec.mail.bellsouth.net@SUSANONE> Charlotte, spyware busted my Ebay toolbar -- jumped through all the loops but have never gotten it to work again. :( My loss is irrelevant -- doesn't really hurt me, so I'm not comparing the two in any way -- other than to just mention that it happened to me too. I've uninstalled, reinstalled -- everything I can think of -- simply can't get it back. Susan H. The latest update of PestPatrol on my machine identified some files inappropriately, including two Infragistics ocx files used by SpeedFerret and some registry keys installed by it. Needless to say, it broke SpeedFerret when those files and keys were removed. When I reinstalled SpeedFerret, the files and keys were recreated and PestPatrol again identified them as pests. This time, I excluded them figuring that would take care of the problem. It didn't. PestPatrol ignores those items for now, and SpeedFerret runs but Access XP no longer recognizes the SpeedFerret Add-in key, so there isn't any connection and SF searches fail. I had a long conversation about this with support at Black Mosannon and we discovered that even uninstalling and then reinstalling SpeedFerret didn't correct the problem. I was told that another customer had had a similar experience with a spyware remover and could NOT get SpeedFerret to run properly again on that machine, even after reinstalling Office, all the updates, etc. I'm bloody-minded enough to keep trying to fix it, but I'd be happy for any help. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 16 12:57:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 16 Jul 2004 10:57:51 -0700 Subject: [AccessD] Corrupt A97 database References: <8301C8A868251E4C8ECD3D4FFEA40F8A0811ABAD@cpixchng-1.cpiqpc.net> Message-ID: <40F8171F.1050707@shaw.ca> You could try Peter Miller's PK solutions. You only pay if they can recover. They also need a table structure only mdb to help recovery If over 500 MB they need physical media for data transfer. http://www.pksolutions.com/services.htm rusty.hammond at cpiqpc.com wrote: >I've tried to search the archives on this but I can't get to the site. > >We have an Access 97 database that has become corrupt. I think our file >server went down during a compact. Anyway, we have tried jetcomp and have >tried AccessFix database recovery software from cimaware software. The best >we've gotten so far is it recovers the file but the table we really need >comes up with zero records. We have a backup from the night before but have >lost a whole days worth of work. To spend four or five hundred dollars >wouldn't bother us if we could get our data recovered several hours of >people's time to get the data reentered. > >Can anyone recommend data recovery software that they have used? > >TIA > >Rusty Hammond > > > -- Marty Connelly Victoria, B.C. Canada From lytlenj at yahoo.com Fri Jul 16 13:23:14 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 11:23:14 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: <000001c46b5e$7f774fc0$cc0aa845@hargrove.internal> Message-ID: <20040716182314.51586.qmail@web53904.mail.yahoo.com> Thank you to all who replied, I am not there 100% but with that last bit from Doris (how's it going?), I am on my way to a very nice solution that will highlight the fields that need to be addressed all at once. I might even see about rearranged the tab order or something to make it a little easier on the data entry people. Again many thanks, I dreaded the idea of having to go into a ton of forms and write code for each field in that form. I think this will work fine. When I get it working the way I want I will post it back. Again, Many Thanks, Nancy --- Mike & Doris Manning wrote: > If IsNull(ctl.Value) Then > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Nancy Lytle > Sent: Friday, July 16, 2004 1:43 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Looping through control names > > > Thanks for the idea but even if I change that line > to > > If IsNull(ctl.Name.Value) Then > > it still errors on "Object Required". > > It should be "thinking" > Is the value held in the control mndCmdCutomer null? > > Instead it is thinking > Is "null" (ctl.name.value) null > > TIA > Nancy > > > --- "Colby, John" wrote: > > if isnull(somevalue) then > > do something > > > > JWC > > > > -----Original Message----- > > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > > Sent: Friday, July 16, 2004 1:18 PM > > To: Access Developers discussion and problem > Solving > > Subject: [AccessD] Looping through control names > > > > > > I am trying to make the users fill in a whole set > of > > fields when they do data entry - almost all fields > > in > > the form must be filled in - this is a new > > requirement. > > I thought the easiest way would be to loop through > > the > > controls that are mandatory (prefixed with mnd) > and > > if > > there is one that is null or an empty string to > > require them to go back and fill it in. > > Where I am stuck is on checking the value of the > > data > > in the control. It doesn't like my code below. > > > > I know I must be missing something simple but I > > can't > > quite get it. > > Any help appreciated. > > Nancy > > > > CODE: > > > > Dim ctl As Control > > For Each ctl In Forms!LCN1 > > 'Find the mandatory fields > > If left(ctl.Name, 3) = "mnd" Then > > 'Check to see if the mandatory field is null > > > > PROBLEM:"object required> > > If ctl.Name.Value Is Null Then > > END PROBLEM (I hope:)) > > > > 'Tell them to go back and fill it in > > MsgBox "You must enter a value for the > > field: " & ctl.Name > > ' ctl.Name.SetFocus > > Exit Sub > > Else > > 'If it is not null then end > > End If > > Else > > 'if it is not mandatory > > End If > > Next > > 'Check next control > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From garykjos at hotmail.com Fri Jul 16 13:41:13 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jul 2004 13:41:13 -0500 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: This message from Brenda got "autorejected " Not sure WHY. But here it is...... Gary Kjos garykjos at hotmail.com From: Reische, Brenda L. To: "'Access Developers discussion and problem solving'" Subject: RE: [AccessD] Jumpdrive encrypted volume Sent: Friday, July 16, 2004 1:16 PM Actually, I have a similar problem. What I discovered is that I have full access to the public portion on my desktop. I have no access to it at all on my laptop, and I have access to the public and encrypted areas both on a different laptop at work. I was able to get the info off the encrypted portion with that second laptop. I bought a new one, and it is recognized in all of the devices. I wonder how well tested these are and if we'll start seeing more of this as they become more heavily used. I used mine almost daily for around a month and a half. The instructions for removing the jumpdrive say, "Close all files stored on the jumpdrive. To avaoid loss of data, do not remove the jumpdrive while the light is blinking." It doesn't require you to stop and start the hardware, per se. Perhaps I will with the new one to see if that makes a difference, but I WILL keep it backed up on my home pc. Brenda Reische Application Support Analyst McDonough District Hospital www.mdh.org (309) 833-4101 -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com From mkahelin at gorskibulk.com Fri Jul 16 13:46:34 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Fri, 16 Jul 2004 14:46:34 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AC13@gbtmain.gorskibulk.local> Some neat-freak cleaned out the safe and threw out the notes on the .mda keys so I should not be able to re-create the file - conspiracy to have me committed. > -----Original Message----- > From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] > Sent: Thursday, July 15, 2004 10:42 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > WG files? In 97 and 2000, workgroup files are mdw's, did > that change in 2003? > > One approach you might take is to 'merge' the security > systems. Workgroup files only store 'login' information, the > permissions are stored in the .mdb itself. If you use the > same UserName and/or Group name, in both workgroup files, > they should be interchangeable. Of course, you also have to > use the same 'ID' when you create them. > > I honestly don't know how well it works across versions. I > would assume that going from a newer version to an older > version wouldn't be an issue. > > If you have the security matched, I don't think you would > have a problem putting a 'outside' database as a source in a > query. I'm guessing here, but it's a well educated guess. > Access User Level security is very similar to NT security, > and when a process in NT has a specific security account, the > 'credentials' carry over to whatever that process is using. > I wouldn't be at all surprised if Jet does the same thing. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mkahelin at gorskibulk.com Fri Jul 16 13:48:38 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Fri, 16 Jul 2004 14:48:38 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AC14@gbtmain.gorskibulk.local> We all live for the priviledge to work after-hours - don't we? Jim, what do you have in mind? > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 5:09 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Marty: > > Well, I have one suggestion and I will be having to do a > similar task, next week. Can you make the switch before or > after hours? > > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:48 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Thanks Jim - that would be ok except the data is live and is > being updated. If I move it to a new table (v.2000) then the > data isn't accessible to the 2.0 app. Oh well, nobody ever > told me this stuff was supposed to be easy. > > > -----Original Message----- > > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > > Sent: Thursday, July 15, 2004 1:38 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Hi Martin: > > > > Have you tried to link the data. Go into the new database > and select > > link (File/Get External data/Link Tables...) to attach the > tables from > > the older database. You should be able to actually copy the old > > tables, with data, into new tables, into the new database. > Later, when > > the SQL DB is up and running you can just pull the tables and data, > > into the DB using the DTS import/export wizard, in the EM. > > > > This should be a very easy process...but you will have to have full > > permissions. > > > > HTH > > Jim > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin > > Kahelin > > Sent: Thursday, July 15, 2004 9:39 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > I'm currently using Access 2003 with a 'new' mdw workgroup file. I > > need to lookup data from the 'old' Access database (v.2.0 > format with > > mda workgroup file) until I can port the old application > and data over > > to new database with data in SQL tables. -connecting to a > SQL database > > I can specify userid, password - I was hoping I can do the same to > > connect to another Access db/table. > > > > > -----Original Message----- > > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > > Sent: Thursday, July 15, 2004 12:16 PM > > > To: Access Developers discussion and problem solving > > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > > > > Not in a query. You can't logically enable an interface-level > > > connection to a database where the user has no permissions on the > > > other database. Why are you using two workgroups, and what is it > > > you're actually trying to accomplish? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > > Sent: Thursday, July 15, 2004 8:01 AM > > > To: Access Developers discussion and problem solving > > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > > tables and need help to bridge the transition. With two Access > > > databases (db) having two workgroup (wg) files; Is there a way to > > > establish a query connection from db/wg A to db/wg B? i.e. can I > > > establish a sourcedatabase connection from a query and > specify mdb, > > > mdw, user and password -link doesn't work since the > > logged-in user or > > > owner does not have access to the other db. > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Fri Jul 16 13:28:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 20:28:39 +0200 Subject: [AccessD] Custom MsgBox Message-ID: <897858690.20040716202839@cactus.dk> Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav From michael.broesdorf at web.de Fri Jul 16 14:13:35 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 21:13:35 +0200 Subject: AW: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: Message-ID: Hi Jim, thank you for the code sample! But the question still is: how do I declare/set glTimestampNumber? If I assign the timestamp value to a variant, comparing does not work as expected. Vartype(rst!timestampnumber) tells me that it is an array of byte values, but assigning it to a byte array gives me a type conflict. (The app uses a grid control that works unbound, so all of the methods of locking/transactions etc. you mentioned will not work here) Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Jim Lawrence (AccessD) Gesendet: Freitag, 16. Juli 2004 18:18 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Working with TSQL Timestamp values in Access VBA? Hi Michael: Assuming that the time-stamp value is recorded in SQL and you have a key in the record in question and you are using ADO then: ... Set objCmd = New ADODB.Command With objCmd .ActiveConnection = gstrConnection .CommandText = "CheckRecord" .CommandType = adCmdStoredProc .Parameters.Append .CreateParameter("@intEmployeeNumber", adInteger, adParamInput, , Employeenumber) End With Set rs1 = New ADODB.Recordset With rs1 .Open objCmd, , adOpenStatic, adLockReadOnly If .BOF = False And .EOF = False Then .MoveLast If ![TimestampNumber] = glTimestampNumber Then SaveRecord = True Else SaveRecord = False End If Else SaveRecord = True End If End With ... ...but you should not have to be using the timestamp method to track whether a record on the SQL server was updated on client station. There are three considerations: 1. The initial recordset that retrieved the data from the server should have locked the record. ... rsEmployee.Open objCmd, , adOpenDynamic, adLockOptimistic ... 2. Setting transaction lock, when updating the record and responding to any error, by rolling the transaction back and notify the station user can catch record conflicts. On Error GoTo Err_UpDateRecord ... objConn.BeginTrans ... objConn.Execute strSQL Exit_UpdateRecord: Exit Function Err_UpdateRecord: objConn.RollbackTrans ShowConflictMsg ("SaveEmployee") Resume Exit_UpdateRecord ... 3. The SQL server has methods for handling/buffering record conflicts built into it. Even though the previous code samples are not complete I hope there is sufficient information to make the snippets useful and informative. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 7:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jul 16 14:36:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Fri, 16 Jul 2004 15:36:56 -0400 Subject: [AccessD] Jumpdrive encrypted volume In-Reply-To: Message-ID: <000601c46b6c$4198cef0$0501a8c0@colbyws> Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gary Kjos Sent: Friday, July 16, 2004 2:41 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Jumpdrive encrypted volume This message from Brenda got "autorejected " Not sure WHY. But here it is...... Gary Kjos garykjos at hotmail.com From: Reische, Brenda L. To: "'Access Developers discussion and problem solving'" Subject: RE: [AccessD] Jumpdrive encrypted volume Sent: Friday, July 16, 2004 1:16 PM Actually, I have a similar problem. What I discovered is that I have full access to the public portion on my desktop. I have no access to it at all on my laptop, and I have access to the public and encrypted areas both on a different laptop at work. I was able to get the info off the encrypted portion with that second laptop. I bought a new one, and it is recognized in all of the devices. I wonder how well tested these are and if we'll start seeing more of this as they become more heavily used. I used mine almost daily for around a month and a half. The instructions for removing the jumpdrive say, "Close all files stored on the jumpdrive. To avaoid loss of data, do not remove the jumpdrive while the light is blinking." It doesn't require you to stop and start the hardware, per se. Perhaps I will with the new one to see if that makes a difference, but I WILL keep it backed up on my home pc. Brenda Reische Application Support Analyst McDonough District Hospital www.mdh.org (309) 833-4101 -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 16 16:24:44 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 16 Jul 2004 16:24:44 -0500 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB13B@main2.marlow.com> Any possibility of just creating new accounts for people to use? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Friday, July 16, 2004 1:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup Some neat-freak cleaned out the safe and threw out the notes on the .mda keys so I should not be able to re-create the file - conspiracy to have me committed. > -----Original Message----- > From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] > Sent: Thursday, July 15, 2004 10:42 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > WG files? In 97 and 2000, workgroup files are mdw's, did > that change in 2003? > > One approach you might take is to 'merge' the security > systems. Workgroup files only store 'login' information, the > permissions are stored in the .mdb itself. If you use the > same UserName and/or Group name, in both workgroup files, > they should be interchangeable. Of course, you also have to > use the same 'ID' when you create them. > > I honestly don't know how well it works across versions. I > would assume that going from a newer version to an older > version wouldn't be an issue. > > If you have the security matched, I don't think you would > have a problem putting a 'outside' database as a source in a > query. I'm guessing here, but it's a well educated guess. > Access User Level security is very similar to NT security, > and when a process in NT has a specific security account, the > 'credentials' carry over to whatever that process is using. > I wouldn't be at all surprised if Jet does the same thing. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jmhla at earthlink.net Fri Jul 16 16:48:25 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Fri, 16 Jul 2004 14:48:25 -0700 (GMT-07:00) Subject: [AccessD] Corrupt A97 database Message-ID: <8814798.1090014505865.JavaMail.root@kermit.psp.pas.earthlink.net> Try importing all objects into a new DB. That works a lot of the time. If not and from what you have said in your note the easiest fastest and less expensive high quality effort would be to restore from the night before and just reenter one days worth of data. That you only lost one day shows you are taking good care of your data. -----Original Message----- From: rusty.hammond at cpiqpc.com Sent: Jul 16, 2004 8:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] Corrupt A97 database I've tried to search the archives on this but I can't get to the site. We have an Access 97 database that has become corrupt. I think our file server went down during a compact. Anyway, we have tried jetcomp and have tried AccessFix database recovery software from cimaware software. The best we've gotten so far is it recovers the file but the table we really need comes up with zero records. We have a backup from the night before but have lost a whole days worth of work. To spend four or five hundred dollars wouldn't bother us if we could get our data recovered several hours of people's time to get the data reentered. Can anyone recommend data recovery software that they have used? TIA Rusty Hammond -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Fri Jul 16 21:56:34 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sat, 17 Jul 2004 02:56:34 -0000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server References: <40F80AD8.18919.6D50350@lexacorp.com.pg> Message-ID: <005401cb255b$d1b7dad0$48619a89@DDICK> Thanks Stuart I'll have to look deeper into this. It is without question a server side issue and perhaps a permissions issue Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 5:05 PM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 12:46, Darren DICK wrote: > > > HI Stuart > > Thanks for this > > I have read and re-read the blurb from M$ > > I still don't get it. > > I have set the permissions on the TEMP folder on my DEV machine to > > anyone can do anything they like from anywhere withany logon :-)) > > Compiled - decompiled and compacted and repaired the DEV version of the > > back end whilst it was on my DEV machine > > > > Then I copy this local DEV version of the BE to the server - drop it into > > the expected place then try and perform some tasks and now I get > > Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " > > It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at > > that file at all. > > The KB section of MS was useless. > > Any suggestions?? > > I'm starting to get desperate this will halt the deployment of the app due this Monday > > > I'd say it's definitely a rights thing. You need to look at the Share > permissions as well as direct access rights to find out who can really do what > on a file. Do you have Admin rights through the Share you are using? > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jul 16 22:43:43 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Fri, 16 Jul 2004 23:43:43 -0400 Subject: [AccessD] OT: New Browser In-Reply-To: <005401cb255b$d1b7dad0$48619a89@DDICK> Message-ID: <000901c46bb0$423fcc70$0501a8c0@colbyws> I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com From ebarro at afsweb.com Fri Jul 16 23:41:50 2004 From: ebarro at afsweb.com (Eric Barro) Date: Fri, 16 Jul 2004 21:41:50 -0700 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: I downloaded FireFox a few days ago and I'm using it as my primary browser now. I like the tabbed windows. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 8:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com From chizotz at mchsi.com Sat Jul 17 00:17:52 2004 From: chizotz at mchsi.com (Ron Allen) Date: Sat, 17 Jul 2004 00:17:52 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <005401cb255b$d1b7dad0$48619a89@DDICK> <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: <822539500.20040717001752@mchsi.com> Hi John, I'm using FireFox, and so far am happy with it overall but it does have a few annoying bugs... or maybe features :) Ron Friday, July 16, 2004, 10:43:43 PM, you wrote: j> Anyone care to answer a poll: j> Of those who use an alternative browser (not IEX) what browser do you use? From stuart at lexacorp.com.pg Sat Jul 17 01:12:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 17 Jul 2004 16:12:50 +1000 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <005401cb255b$d1b7dad0$48619a89@DDICK> Message-ID: <40F95002.29485.BCB30D7@lexacorp.com.pg> On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. I'll be > downloading mozilla next. Firefox appears from what I am seeing to be still > in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jmoss111 at bellsouth.net Sat Jul 17 08:32:52 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 17 Jul 2004 08:32:52 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: I've been using FireFox since 0.6, it's at 0.9.2 now and I've found it to be rock solid and not buggy. It's initial load is just a bit slower than IE6.1. My favorite feature is the download manager. It's been quite awhile since I used Opera, somewhere around rel 3.?. I liked it OK but didin't see anything compelling enough to pay $35 for it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 10:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 17 09:33:20 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 17 Jul 2004 10:33:20 -0400 Subject: [AccessD] Custom MsgBox In-Reply-To: <897858690.20040716202839@cactus.dk> Message-ID: Try this. You will need a reference to the Windows Script Host Object Model. Regards, Steve Goodhall Function SJGMsgBox(sPrompt, Optional iButtons As Integer = vbOK, Optional sTitle As Variant = Empty, _ Optional iSeconds As Integer = 30) Dim iResult As Integer, oWSH As WshShell Set oWSH = CreateObject("wscript.shell") iResult = oWSH.PopUp(sPrompt, iSeconds, sTitle, iButtons) SJGMsgBox = iResult Set oWSH = Nothing End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, July 16, 2004 2:29 PM To: Access Developers discussion and problem solving Subject: [AccessD] Custom MsgBox Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 17 09:33:22 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 17 Jul 2004 10:33:22 -0400 Subject: [AccessD] Set Outlook Properties in Access In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> Message-ID: That's a new security feature that was introduced with one of the SP's for Microsoft Office. I believe it is in the base product for Office 2003. Look here (http://www.slipstick.com/outlook/esecup.htm) for lots of information, including some aftermarket products. I have not validated any of them. Regards, Steve Goodhall -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hollis,Virginia Sent: Thursday, July 15, 2004 8:59 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Set Outlook Properties in Access I am trying to send automated emails through Outlook from Access. I found this link from Microsoft that tells how to do this. http://msdn.microsoft.com/office/understanding/access/codesamples/default.as px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp I run into the problem with the security settings - where it pops up the message about a potential virus and if you want to do this and for how long. I figure this just 'may' scare off users - imagine that. Anyway, is there a way to set the Outlook security settings (Tools, Macros, Security) through Access code, to Low, send the email and then reset their security to High or Medium again? I figure there should be a way to do this for Outlook similar to setting the startup properties, etc in Access when it opens. Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Sat Jul 17 11:20:17 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Sat, 17 Jul 2004 18:20:17 +0200 Subject: [AccessD] Create custom shortcut menu In-Reply-To: Message-ID: Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael From accessd at shaw.ca Sat Jul 17 11:41:39 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 17 Jul 2004 09:41:39 -0700 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: Hi John: I test all my web apps on the standards IE, Opera, Netscape and FireFox. Bryan Carbonnel gave me the heads up on FireFox (It runs equally well on WinXX and Unix boxes) and I especially like it's fast responses. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 8:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sat Jul 17 11:41:38 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 17 Jul 2004 09:41:38 -0700 Subject: [AccessD] Custom MsgBox In-Reply-To: <897858690.20040716202839@cactus.dk> Message-ID: Hi Gustav: Where do you find this stuff...brilliant. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, July 16, 2004 11:29 AM To: Access Developers discussion and problem solving Subject: [AccessD] Custom MsgBox Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From demulling at centurytel.net Sat Jul 17 11:55:30 2004 From: demulling at centurytel.net (Demulling Family) Date: Sat, 17 Jul 2004 11:55:30 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: <40F95A02.2050606@centurytel.net> jwcolby wrote: >I downloaded Opera today, to start evaluating alternative browsers. I'll be >downloading mozilla next. Firefox appears from what I am seeing to be still >in beta. > >Anyone care to answer a poll: > >Of those who use an alternative browser (not IEX) what browser do you use? > >John W. Colby >www.ColbyConsulting.com > > > > I am using Mozzilla 1.7. Really like the tabbed browsing and it is my main browser. From gustav at cactus.dk Sat Jul 17 12:13:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 17 Jul 2004 19:13:01 +0200 Subject: [AccessD] Custom MsgBox In-Reply-To: References: Message-ID: <987643620.20040717191301@cactus.dk> Hi Jim That was at Coderanger who use a library from Gipsysoft who ... The link to Coderanger came from Mike Gunderloy who mentioned in his newsletter BuiltIt which on its own is very interesting: http://www.coderanger.com This tool is intended for managing the whole proces by scheduled linking of program code - not very relevant for an Access programmer, but yes it could be, as you often do some finishing work like decompiling, compressing and archiving. It's an advanced batch tool capable of - all by itself - to do e-mail, ftp transfer and zipping and many other things including a complete script language - very handy and very clever. /gustav > Hi Gustav: > Where do you find this stuff...brilliant. > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Friday, July 16, 2004 11:29 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Custom MsgBox > Hi all > Someone asked for a way to have a MsgBox go away by itself after a > delay. > Here's a site having some code for a custom messagebox also featuring > a "Don't show this again" checkbox: > http://www.gipsysoft.com/messagebox/ From tapli005 at umn.edu Sat Jul 17 13:01:54 2004 From: tapli005 at umn.edu (Brad Taplin) Date: Sat, 17 Jul 2004 13:01:54 -0500 Subject: [AccessD] Re: AccessD Digest, Vol 17, Issue 31 In-Reply-To: <200407171700.i6HH0OQ16555@databaseadvisors.com> References: <200407171700.i6HH0OQ16555@databaseadvisors.com> Message-ID: <6346EDE0-D81B-11D8-854A-00306570C55C@umn.edu> Mozilla 1.7 is fantastic, though you may want to re-download and install the www.macromedia.com and www.adobe.com free extras - Flash, Shockwave, and Acrobat Reader (6.0.1) - after installing Mozilla and tweaking the preferences. I maintain about fifty desktops and this is my choice, though FireFox is perfectly good as well. It just lacks some extras. I've always had a few small but annoying probs with Opera. Microsoft makes some great products, but IE is the swiss cheese of security and should be avoided when possible. If you run Linux, Konqueror is pretty nice too, but who on this list will run Linux? Stick to Mozilla, which works well and similarly on Windows, Linux, and Apple OS X. -Brad On Jul 17, 2004, at 12:00 PM, accessd-request at databaseadvisors.com wrote: > Date: Fri, 16 Jul 2004 23:43:43 -0400 > From: "jwcolby" > Subject: [AccessD] OT: New Browser > To: "'Access Developers discussion and problem solving'" > > > I downloaded Opera today, to start evaluating alternative browsers. > I'll be > downloading mozilla next. Firefox appears from what I am seeing to be > still > in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > > John W. Colby > www.ColbyConsulting.com > **************************** -- take the red pill -- From forefront at ig.com.br Sat Jul 17 14:26:57 2004 From: forefront at ig.com.br (=?iso-8859-15?Q?=22Forefront_em_Inform=E1tica_e_Consulto?= =?iso-8859-15?Q?ria_Ltda.=22?=) Date: Sat, 17 Jul 2004 16:26:57 -0300 Subject: [AccessD] OT: New Browser In-Reply-To: <40F95A02.2050606@centurytel.net> References: <000901c46bb0$423fcc70$0501a8c0@colbyws> <40F95A02.2050606@centurytel.net> Message-ID: >> >> Anyone care to answer a poll: >> >> Of those who use an alternative browser (not IEX) what browser do you >> use? >> >> John W. Colby www.ColbyConsulting.com >> I have been using Opera since v5.0 and Mozilla as alternate package. :) -- ************************************************ * Forefront em Inform?tica e Consultoria Ltda. * * Carlos Alberto Alves * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * Phone Direct: 55-21-9169-1596 * * mailto:forefront at ig.com.br * ************************************************ From carbonnb at sympatico.ca Sat Jul 17 14:44:01 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sat, 17 Jul 2004 15:44:01 -0400 Subject: [AccessD] OT: New Browser Message-ID: <20040717194401.CYCD5106.tomts14-srv.bellnexxia.net@mxmta.bellnexxia.net> > >> Anyone care to answer a poll: > >> > >> Of those who use an alternative browser (not IEX) what browser do you > >> use? > >> > >> John W. Colby www.ColbyConsulting.com Firefox, without a doubt for me. You'd be supprised how may people use Firefox. Here are some stats since the start of July) from the webserver's logs of the mailing list server, which hosts the archives (not Drew's but DBA's) IE 79.6 % FireFox 14 % Mozilla 2.8 % Netscape 1 % Everything else is less than 1 % As you can see Firefox is quite popular. What I particularly like about Firefox is that it is a web browser first and foremost. That's all it does out of the box. It's standards compliant. It renders fast. If there is something that you feel is missing, there is usually an extension you can add to get the functionallity you want. It is HIGHLY configurable. Those are just some of the highlights. Don't be scared by the beta tag. It's not an MS beta :) As Stuart (I think) said, it just means that they are not finished implementing all the features that they want to inculde. Its stable and hasn't crashed on me since I started using it back around v0.6. My $0.02 worth. -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From ssharkins at bellsouth.net Sat Jul 17 16:17:02 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 17 Jul 2004 17:17:02 -0400 Subject: [AccessD] importing from Excel Message-ID: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. From jwcolby at colbyconsulting.com Sat Jul 17 17:07:31 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 17 Jul 2004 18:07:31 -0400 Subject: [AccessD] OT: New Browser In-Reply-To: <40F95002.29485.BCB30D7@lexacorp.com.pg> Message-ID: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Saturday, July 17, 2004 2:13 AM To: Access Developers discussion and problemsolving Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 17 17:22:17 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 17 Jul 2004 18:22:17 -0400 Subject: [AccessD] importing from Excel In-Reply-To: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040717222211.DTKQ1776.imf21aec.mail.bellsouth.net@SUSANONE> Should have mentioned -- the only data type conflict we encountered was accommodating text fields with more than 255 characters -- had to export to a text file and then import so we could define those fields as Memo fields -- was an easy fix considering the wizard lets you specify data types for all the fields, so we didn't lose anything by importing strictly text. Susan H. I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pieter.janssens.lists at chello.be Sat Jul 17 17:53:36 2004 From: pieter.janssens.lists at chello.be (Pieter Janssens) Date: Sun, 18 Jul 2004 00:53:36 +0200 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> Message-ID: <20040717225253.CLZ29681.amsfep13-int.chello.nl@darwin> hi John, as a browser, firefox is as good as feature complete and will allow a full web experience without any of the addons. i use only one add-in for improved security concerning cookies, the cookie culler. if you start comparing with other browsers such as opera, yes then you would need an addon to be able to use mouse gestures for example. the bug you're referring to was a very old shell exploit that has recently been rediscovered and patched within a few hours(!) of rediscovery with the newest version 0.9.2 but every version can also be manually patched by creating/setting the boolean network.protocol-handler.external.shell configuration to false in the about:config page of firefox or donwloading an xpi addon. in short, for the moment firefox is pretty much exploit free, and providing an excellent and stable browsing experience. also, afaict the mozilla people have learned from the somewhat problematic upgrade from 0.8 to 0.9 and this will be improved accordingly in the next release, no doubt. my advice, get it and don't look back. greetings, pieter. -----Original Message----- From: jwcolby Subject: RE: [AccessD] OT: New Browser To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: Stuart McLachlan Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. From jmoss111 at bellsouth.net Sat Jul 17 18:04:40 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 17 Jul 2004 18:04:40 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> Message-ID: I don't know what version the reviewers were talking about but everything that I had at v0.8 is still functional after an update to v0.9.2 without any intervention on my part. There is a page at the firefox download site that had links to plugins. I don't use firefox heavily, but have encountered no errors to date. Another favorite feature that I neglected to mention earlier is the configurable popup stopper which is how I found it in the first place. v0.9.2 was released recently, and maybe that is what the reviewers were talking about. And to be honest, most of my web browsing in the last month or so has been done at client sites on IE6. I think that the problem with some addons is that firefox checks the addons and if not known to be "certified" for the new release will be disabled by firefox upgrade. v1.o releases in the middle of September. JM -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Saturday, July 17, 2004 5:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: New Browser To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Saturday, July 17, 2004 2:13 AM To: Access Developers discussion and problemsolving Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jul 17 19:15:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 10:15:09 +1000 Subject: [AccessD] importing from Excel In-Reply-To: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> Message-ID: <40FA4DAD.7445.30913E2@lexacorp.com.pg> On 17 Jul 2004 at 17:17, Susan Harkins wrote: > I'm wondering if any of you routinely see data type conflicts when importing > Excel data into Access? I spent an afternoon with a client a few weeks back > cleaning up Excel data for a clean import into Access -- we were totally > successful. We went from losing hundreds of records to capturing every > single one -- with just a few simple changes in their routine. > > The one potential problem I thought of that we didn't encounter was a > conflict in data types -- have any of you experienced this? My guess is > you'd simply convert using the Import Wizard, but I'd like to hear your > horror stories and solutions. >I know imports are often automated and that complicates things. > > The client's experience was strictly a one-time effort. Once they got it in > Access and we normalized the data, they were done with that part for good. > They were trying to create a searchable/reportable archive of some very old > data and used Excel as the go-between -- but then couldn't get the Excel > data clean enough to import. The truth is, it was very easy to solve -- they > just didn't know the right tricks. So, now they want it all documented, but > I personally, haven't run into any data type conflicts while importing from > Excel, but I'd like to note any potential problems if they're out there. > Mostly I see problems when clients open delimited text files in Excel and then save them again. That can really screw up formatting of the files for a subsequent import into Access. ie doing what you were doing - "used Excel as a go-between" In fact there's an interesting article in The Register about this problem http://www.theregister.co.uk/2004/07/16/excel_vanishing_dna/ The other problem is indeed Datatype conversions. The Excel Import Wizard does NOT allow you to define datatypes. You are forced to accept what the Wizard thinks is the appropriate type. Friday I spent hours working on data for a client who is a printshop. They had received a load of delimited text files of data to produce Annual statements for contributors to a super fund. They had tried to merge theses files using Excel. They initially called me in to look at the data and help them with some addressing and formatting problems and grouping sorting problems with the merged data. Initially I tried to import there resulting Excel file into Access. One column contained numbers (percentage of a superannuation death benefit which went to each beneficiary.) The first x records had numbers like 100, 50, 25 in them so the Excel import wizard decided it was an integer field and truncated the 33.3s when they finally occurred further down. Another field was text which could have a date or some other comment in it. Because the first few had dates, the wizard decided that that was it and subsequently threw out all the text comments. I eventually did what I've done on several occasions in the past. Saved the spreadsheet as a delimited text file and import that. The text import wizard DOES let you define the datatype of each column and even better, you can bypass the wizard and write your own routine to modify the data as it is imported if you really need to. I then found one other problem. When I looked at the number of records imported from Excel there were 65535 of them. That number immediately aroused my suspicions (Hope no-one here has to ask why ) and on checking, sure enough there were actually well over 70,000 contributors in the original data files. I ended up importing the raw data files and merging them in Access. It took me about ten minutes to do the raw text files import then merge, clean and export as required for their print formatting software (a program called Paris), but it cost them several hours of my time to identify and sort out the problems caused by them using Excel on the data in the first place. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sat Jul 17 18:32:17 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 09:32:17 +1000 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> References: <40F95002.29485.BCB30D7@lexacorp.com.pg> Message-ID: <40FA43A1.22560.2E1D502@lexacorp.com.pg> On 17 Jul 2004 at 18:07, jwcolby wrote: > To all the firefox users... > > The two reasons I decided against that browser were that reviewers said you > had to find and install add-0ns to make it fully functional and that > upgrades hosed those add-ons and made you re-install them. I'm running it without any Add-Ons and it does everything I want to. Add-ons can be anything from skins to games, enhancements to the built in download manager, Favourites Toolbar, Search engine interface etc, etc >Also some kind > of bugs just recently (in the last month) making it flaky. > I've been running it since V0.8 and have upgraded with each new release. It's less flaky for me than the release versions of IE. :-) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Sat Jul 17 17:48:20 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Sun, 18 Jul 2004 08:48:20 +1000 Subject: [AccessD] Criteria and Variables Message-ID: <005401c46c50$290148b0$0100000a@mitmaster> Hi Folks I'm chasing the correct syntax to use declared variables in the Criteria window when building queries. I can place the value in the criteria window by first using the variable to load a text box in the calling form and referencing the text box from the query but I'm presuming it's possible to do directly but...... what am I missing? Thanks Martin From stuart at lexacorp.com.pg Sun Jul 18 00:02:41 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 15:02:41 +1000 Subject: [AccessD] Criteria and Variables In-Reply-To: <005401c46c50$290148b0$0100000a@mitmaster> Message-ID: <40FA9111.24440.4105476@lexacorp.com.pg> On 18 Jul 2004 at 8:48, Martin Caro wrote: > Hi Folks > > I'm chasing the correct syntax to use declared variables in the > Criteria window when building queries. I can place the value in the > criteria window by first using the variable to load a text box in the > calling form and referencing the text box from the query but I'm > presuming it's possible to do directly but...... what am I missing? > AFAIK, it's not possible to use declared variables,even if they are global in scope. My standard solution is to use a static function StoredVariable() for this purpose Put the function below in a module then you can set the criteria of the query to =StoredVariable() You can intialise StoredVariable in code from anywhere so you are not dependent on having a specific form open when the query is called. Just set the variable with "result = StoredVariable(myValue)" or just "StoredVariable myValue" at any convenient point before you open the query. Static Function StoredVariable(Optional varInput As Variant) As Variant Dim varStore As Variant 'Initialise the variant if the function is called 'the first time with no Input If varStore = Empty Then varStore = Null 'Update the store if the Input is present If Not IsMissing(varInput) Then varStore = varInput 'return the stored value StoredVariable = varStore End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Sun Jul 18 01:17:19 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Sun, 18 Jul 2004 16:17:19 +1000 Subject: [AccessD] Criteria and Variables References: <40FA9111.24440.4105476@lexacorp.com.pg> Message-ID: <001b01c46c8e$e171bd60$0100000a@mitmaster> Thanks Stuart - I was being too presumptious thinking I could use variables directly... I will stop trying to make it work and use your technique. Martin ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Sunday, July 18, 2004 3:02 PM Subject: Re: [AccessD] Criteria and Variables > On 18 Jul 2004 at 8:48, Martin Caro wrote: > > > Hi Folks > > > > I'm chasing the correct syntax to use declared variables in the > > Criteria window when building queries. I can place the value in the > > criteria window by first using the variable to load a text box in the > > calling form and referencing the text box from the query but I'm > > presuming it's possible to do directly but...... what am I missing? > > > > AFAIK, it's not possible to use declared variables,even if they are global in > scope. My standard solution is to use a static function StoredVariable() for > this purpose > > Put the function below in a module then you can set the criteria of the query > to =StoredVariable() > > You can intialise StoredVariable in code from anywhere so you are not > dependent on having a specific form open when the query is called. > Just set the variable with "result = StoredVariable(myValue)" or just > "StoredVariable myValue" at any convenient point before you open the query. > > > Static Function StoredVariable(Optional varInput As Variant) As Variant > Dim varStore As Variant > > 'Initialise the variant if the function is called > 'the first time with no Input > If varStore = Empty Then varStore = Null > > 'Update the store if the Input is present > If Not IsMissing(varInput) Then varStore = varInput > > 'return the stored value > StoredVariable = varStore > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jul 18 09:11:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 18 Jul 2004 10:11:49 -0400 Subject: [AccessD] importing from Excel In-Reply-To: <40FA4DAD.7445.30913E2@lexacorp.com.pg> Message-ID: <20040718141150.QHWN1701.imf20aec.mail.bellsouth.net@SUSANONE> I eventually did what I've done on several occasions in the past. Saved the spreadsheet as a delimited text file and import that. The text import wizard DOES let you define the datatype of each column and even better, you can bypass the wizard and write your own routine to modify the data as it is imported if you really need to. ===============This is probably my preference, regardless. It seems easier to just force what I want during the import. Susan H. From artful at rogers.com Sun Jul 18 13:07:19 2004 From: artful at rogers.com (Arthur Fuller) Date: Sun, 18 Jul 2004 14:07:19 -0400 Subject: [AccessD] Hiding Back End Design In-Reply-To: Message-ID: <00fe01c46cf2$1173be60$6601a8c0@rock> If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sun Jul 18 16:29:36 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sun, 18 Jul 2004 14:29:36 -0700 Subject: [AccessD] Hiding Back End Design In-Reply-To: <00fe01c46cf2$1173be60$6601a8c0@rock> Message-ID: This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Sun Jul 18 18:23:07 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sun, 18 Jul 2004 16:23:07 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> Message-ID: <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Marty: Every place I've done work where there were mdw's involved the problems ranged from nuisance to nightmare. Since this is my proprietary product and I'm hoping to have lots of them installed around the world over the next few years (hope springs eternal) I'm really reluctant to start down that road. I think I've convinced my Chinese distributor, who started all this, that having the back end open while the front end is totally protected, is the best of both worlds. Rocky ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 9:50 PM Subject: Re: [AccessD] Hiding Back End Design > Well if you were the owner through mdw you could, everyone else would > have to go through a query. > This assumes the mdw is crackable. > > Rocky Smolin - Beach Access Software wrote: > > >Marty: > > > >Why couldn't they just go directly into the back end and open the table in > >design view? > > > >Rocky > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, July 15, 2004 6:40 PM > >Subject: Re: [AccessD] Hiding Back End Design > > > > > > > > > >>I came across this today under the Access ORK.You might be able to hide > >>the design this way. > >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm > >> > >>Using the RunPermissions Property with User-Level Security > >>In order for Microsoft Access to display a table or query, it must read > >>the design of that table or query. As a result, in order for a user to > >>read and display the data in a table or query, that user must also have > >>permission to read the design of the table or query. > >>If you dont want your users to see the design of your table or query, > >>you can create a query and set its RunPermissions property to restrict > >>their access to this information. > >>Set it up and test against one of the access reengineering case tools > >>like Sparxs or EZDesign. > >> > >>Rocky Smolin - Beach Access Software wrote: > >> > >> > >> > >>>One of the great advantages of Access is that the user can work with the > >>>data apart from the front end app. It's transparency is a real marketing > >>>plus. So I'd like to leave the back end open. I think it will be > >>>beneficial. > >>> > >>>Rocky > >>> > >>>----- Original Message ----- > >>>From: "Andy Lacey" > >>>To: "'Access Developers discussion and problem solving'" > >>> > >>>Sent: Wednesday, June 23, 2004 11:36 AM > >>>Subject: RE: [AccessD] Hiding Back End Design > >>> > >>> > >>> > >>> > >>> > >>> > >>>>I'm going to sound a dissenting voice here. I don't understand why > >>>> > >>>> > >Rocky, > > > > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect > >>>>give his system away? Because surely that's what he'd be doing? The only > >>>> > >>>> > >>>> > >>>> > >>>way > >>> > >>> > >>> > >>> > >>>>doing a development like this makes sense is to get economies of scale > >>>> > >>>> > >by > > > > > >>>>selling lots of copies. Without that incentive vertical apps would never > >>>> > >>>> > >>>> > >>>> > >>>get > >>> > >>> > >>> > >>> > >>>>developed at all because, in the main, a single customer can't stand all > >>>> > >>>> > >>>> > >>>> > >>>the > >>> > >>> > >>> > >>> > >>>>development costs. And if you're going to put in the graft why shouldn't > >>>> > >>>> > >>>> > >>>> > >>>you > >>> > >>> > >>> > >>> > >>>>dream of making money on it, and why should you open yourself to being > >>>>ripped-off by people who can't be arsed to do the hard work themselves? > >>>>Sorry, don't understand. > >>>> > >>>>-- Andy Lacey > >>>>http://www.minstersystems.co.uk > >>>> > >>>> > >>>> > >>>> > >>>> > >>>>>-----Original Message----- > >>>>>From: accessd-bounces at databaseadvisors.com > >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>>>DWUTKA at marlow.com > >>>>>Sent: 23 June 2004 18:30 > >>>>>To: accessd at databaseadvisors.com > >>>>>Subject: RE: [AccessD] Hiding Back End Design > >>>>> > >>>>> > >>>>>'Open source' should pervade into all areas of the > >>>>>information age. Music, programming, videos, etc. > >>>>>Unfortunately it will take a complete change in humanity's > >>>>>driving force....the accumulation of wealth. As long as > >>>>>people are trying to make a buck, it will be virtually > >>>>>impossible to get them to do stuff simply for the betterment > >>>>>of society. > >>>>> > >>>>>Drew > >>>>> > >>>>> > >>>>> > >>>>> > >>>>> > >>>>-- > >>>>_______________________________________________ > >>>>AccessD mailing list > >>>>AccessD at databaseadvisors.com > >>>>http://databaseadvisors.com/mailman/listinfo/accessd > >>>>Website: http://www.databaseadvisors.com > >>>> > >>>> > >>>> > >>>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>-- > >>_______________________________________________ > >>AccessD mailing list > >>AccessD at databaseadvisors.com > >>http://databaseadvisors.com/mailman/listinfo/accessd > >>Website: http://www.databaseadvisors.com > >> > >> > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 01:52:50 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 08:52:50 +0200 Subject: OT: [AccessD] Hiding Back End Design In-Reply-To: Message-ID: Jim, back in the C64-times, a friend of mine had a cartridge that could - upon the press of a button - save the whole content of the C64's memory onto a floppy disk. So, if the program (game ;-)) did not check for the original floppy disk (which a lot of programs did not) at run time it took about 2-5 minutes to write a de-copy-protected program to a floppy disk. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Jim Lawrence (AccessD) Gesendet: Sonntag, 18. Juli 2004 23:30 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Hiding Back End Design This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 06:29:52 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 21:29:52 +1000 Subject: [AccessD] Seconds Missing Message-ID: <006e01c46d83$b572cec0$0100000a@mitmaster> Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin From michael.broesdorf at web.de Mon Jul 19 07:21:58 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 14:21:58 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <006e01c46d83$b572cec0$0100000a@mitmaster> Message-ID: How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 07:45:23 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 22:45:23 +1000 Subject: [AccessD] Seconds Missing References: Message-ID: <007901c46d8e$420f7770$0100000a@mitmaster> Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 19 08:05:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 15:05:22 +0200 Subject: [AccessD] Seconds Missing In-Reply-To: <007901c46d8e$420f7770$0100000a@mitmaster> References: <007901c46d8e$420f7770$0100000a@mitmaster> Message-ID: <4811190380.20040719150522@cactus.dk> Hi Martin How have you Dim'ed the global variable and how do you store the value of it in the table? /gustav > Using an append query on an ODBC/Linked table. > I need to retrieve the record when the user exits using a composite UserID > and LoginInTime key and insert a logoff time however, the value I have > stored in a global variable has seconds and the value stored in the table > has been rounded to full minutes so I'm never going to retrieve the correct > record unless the login was actually on the full minute. From michael.broesdorf at web.de Mon Jul 19 08:17:50 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 15:17:50 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <007901c46d8e$420f7770$0100000a@mitmaster> Message-ID: Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 08:30:29 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 23:30:29 +1000 Subject: [AccessD] Seconds Missing References: <007901c46d8e$420f7770$0100000a@mitmaster> <4811190380.20040719150522@cactus.dk> Message-ID: <008a01c46d94$8f6b0740$0100000a@mitmaster> Gustav Global UserLoginTime As Date In my append query I have a virtual field.... When:getUserLoginTime that appends to the linked SQL table field.... fdDateTimeLoggedOn Function getUserLoginTime() As Variant UserLoginTime = Now() getUserLoginTime = UserLoginTime End Function I have tried As Variant and As Date with the same result. Martin ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:05 PM Subject: Re: [AccessD] Seconds Missing > Hi Martin > > How have you Dim'ed the global variable and how do you store the value > of it in the table? > > /gustav > > > > Using an append query on an ODBC/Linked table. > > > I need to retrieve the record when the user exits using a composite UserID > > and LoginInTime key and insert a logoff time however, the value I have > > stored in a global variable has seconds and the value stored in the table > > has been rounded to full minutes so I'm never going to retrieve the correct > > record unless the login was actually on the full minute. > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From kaupca at chevrontexaco.com Mon Jul 19 08:45:05 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Mon, 19 Jul 2004 08:45:05 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From mcaro at bigpond.net.au Mon Jul 19 08:52:23 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 23:52:23 +1000 Subject: [AccessD] Seconds Missing References: Message-ID: <008f01c46d97$9e664bd0$0100000a@mitmaster> Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Mon Jul 19 09:24:32 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Mon, 19 Jul 2004 10:24:32 -0400 Subject: [AccessD] Seconds Missing In-Reply-To: <008f01c46d97$9e664bd0$0100000a@mitmaster> Message-ID: <002001c46d9c$1f0ba880$6401a8c0@COA3> You may need to delete the linked table from Access and then re-link it. I recently had an Access linked table refuse to see a decimal field on SQL Server as anything but an integer until I delete/relinked. (I refreshed the links endless times to no avail). I think our friend Access sometimes just won't pick up all the schema info unless you force it on him! Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Monday, July 19, 2004 9:52 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 09:30:27 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 10:30:27 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby From michael.broesdorf at web.de Mon Jul 19 09:34:39 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 16:34:39 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <008f01c46d97$9e664bd0$0100000a@mitmaster> Message-ID: Now that sounds strange! I just tested it with a linked ODBC-table myself - the seconds are there! Maybe there is a trigger on the time-field on the server? I would definitely try SQL Profile to see what is _really_ going on (saved my life a couple of times!) BTW: What versions of Access, SQL-Server etc. are you using? Did you link the tables using the _Microsoft SQL Server ODBC-Driver_? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 15:52 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 09:36:59 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 16:36:59 +0200 Subject: AW: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> Message-ID: What exactly does the field 'selected_year' contain? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, Chester A Gesendet: Montag, 19. Juli 2004 15:45 An: accessd at databaseadvisors.com Betreff: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 michael.broesdorf at web.de Mon Jul 19 09:40:26 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 16:40:26 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <002001c46d9c$1f0ba880$6401a8c0@COA3> Message-ID: Yep, that is true! But SQL Server has a problem like this, too: If you have a view selecting all rows from a table (SELECT * FROM tbl...) and you change the column layout of the table, the view does not 'see' those changes until you open it in design view , execute it from there and save it. There is a command or option that tell's SQL Server to update the views in such cases (WITH SCHEMABINDING I believe, but am not sure..) If the view is linked into an Access database, one can have lots of fun tracking down this problem... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Steve Conklin (Developer at UltraDNT) Gesendet: Montag, 19. Juli 2004 16:25 An: 'Access Developers discussion and problem solving' Betreff: RE: [AccessD] Seconds Missing You may need to delete the linked table from Access and then re-link it. I recently had an Access linked table refuse to see a decimal field on SQL Server as anything but an integer until I delete/relinked. (I refreshed the links endless times to no avail). I think our friend Access sometimes just won't pick up all the schema info unless you force it on him! Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Monday, July 19, 2004 9:52 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 09:41:34 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 10:41:34 -0400 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <000001c46d9e$7d8735d0$cc0aa845@hargrove.internal> Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Mon Jul 19 09:43:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 16:43:53 +0200 Subject: [AccessD] Seconds Missing In-Reply-To: <002001c46d9c$1f0ba880$6401a8c0@COA3> References: <002001c46d9c$1f0ba880$6401a8c0@COA3> Message-ID: <5817101330.20040719164353@cactus.dk> Hi Steve and Martin That could be it. SmallDateTime doesn't store seconds - maybe the connection "remembers" the field as such even though you have changed it later to DateTime. /gustav > You may need to delete the linked table from Access and then re-link it. > I recently had an Access linked table refuse to see a decimal field on > SQL Server as anything but an integer until I delete/relinked. (I > refreshed the links endless times to no avail). I think our friend > Access sometimes just won't pick up all the schema info unless you force > it on him! From bchacc at san.rr.com Mon Jul 19 09:48:57 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 19 Jul 2004 07:48:57 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <009a01c46d9f$853ece90$6601a8c0@HAL9002> John: The only thing I can think of would be to use the Mouse Move event of the tab page. But it's kludgey and depends on the user moving the mouse on that page. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 19, 2004 7:30 AM Subject: [AccessD] moving focus off the tab page > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mcaro at bigpond.net.au Mon Jul 19 09:56:33 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Tue, 20 Jul 2004 00:56:33 +1000 Subject: [AccessD] Seconds Missing References: <006e01c46d83$b572cec0$0100000a@mitmaster> Message-ID: <00bc01c46da0$95078730$0100000a@mitmaster> Hi Folks Success, or so it seems at the moment......I changed the data type in the SQL table and the variable/functions in the FE to String and set the Gobal variable UserLoginTime = Format(Now,"yyyymmdd,hhmmss") ./... (also orders nicely) This stores OK in my SQL table (eg 20040720,003047) and I have been able to subsequently retrieve the correct record using my composite key using Global variables for UserID and UserLoginTime of the current user. Thanks all for your help (enough for today - as you can see from the eg above it's 12:30:47 AM) Martin ----- Original Message ----- From: "Martin Caro" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 9:29 PM Subject: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 10:01:59 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 11:01:59 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7D@DISABILITYINS01> What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Mon Jul 19 10:07:04 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 19 Jul 2004 10:07:04 -0500 Subject: [AccessD] importing from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDCB@corp-es01.fleetpride.com> I have run into cases where applications that create Excel files that in turn are imported into Access treat numbers as text fields for some reason. Since Excel shows it as text, Access also imports it as text. One solution is to highlight an empty Excel cell and onto the text column. This has the effect of adding a zero (Excel treats an empty cell as zero) and forcing Excel to change the text to a number. This also cures the problem where some entries are numbers and some text (a user puts an apostrophe in front of a "number" for ex). Since Excel "data tables" are free form, i.e. the user can (and often does insert rows, stick text comments in a number field, etc., etc., I never link directly to a user provided table- I write code to read the "records" and validate them as necessary. I write the raw data to an Access table then do all my processing from there. I have found that links to Excel sheets are relatively fragile. Excel sheets are easily corrupted, so I prefer to transfer everything into Access ASAP. Jim Hale -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Saturday, July 17, 2004 4:17 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] importing from Excel I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Mon Jul 19 10:11:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jul 2004 11:11:50 -0400 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD74@DISABILITYINS01> Message-ID: <021e01c46da2$bb38ae00$6601a8c0@rock> Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. TIA, Arthur From kaupca at chevrontexaco.com Mon Jul 19 10:22:48 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Mon, 19 Jul 2004 10:22:48 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739605@bocnte2k4.boc.chevrontexaco.net> Selected year contains the value 2004. It can contain any year value from 2001 to 2010 depending on what the user selects from the list box. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 9:37 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Date format problem What exactly does the field 'selected_year' contain? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, Chester A Gesendet: Montag, 19. Juli 2004 15:45 An: accessd at databaseadvisors.com Betreff: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 gustav at cactus.dk Mon Jul 19 10:36:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 17:36:26 +0200 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <021e01c46da2$bb38ae00$6601a8c0@rock> References: <021e01c46da2$bb38ae00$6601a8c0@rock> Message-ID: <18120254324.20040719173626@cactus.dk> Hi Arthur > Has anyone code some code in hand that would allow me to calculate the > third Wednesday of every month? Or for that matter just the first > Wednesday of a given month (to which I'll just add 14)? I don't think > it's that tough, but thought I'd check to see if someone has it in hand > before I write it. I guess these functions could easily be wrapped or modified to your purpose: Public Function DateNextWeekday( _ ByVal datDate As Date, _ Optional ByVal bytWeekday As Byte = vbMonday) _ As Date ' Returns the date of the next weekday, as spelled in vbXxxxday, following datDate. ' 2000-09-06. Cactus Data ApS. ' No special error handling. On Error Resume Next DateNextWeekday = DateAdd("d", 7 - (WeekDay(datDate, bytWeekday) - 1), datDate) End Function Public Function DateThisMonthLast( _ Optional ByVal datDateThisMonth As Date) As Date If datDateThisMonth = 0 Then datDateThisMonth = Date End If DatePreviousMonthLast = DateSerial(Year(datDateThisMonth), _ Month(datDateThisMonth) + 1, 0) End Function /gustav From gustav at cactus.dk Mon Jul 19 10:41:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 17:41:17 +0200 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <18120254324.20040719173626@cactus.dk> References: <021e01c46da2$bb38ae00$6601a8c0@rock> <18120254324.20040719173626@cactus.dk> Message-ID: <7420545102.20040719174117@cactus.dk> Hi Arthur Oops, got mixed up some copy and paste. Should read: DateThisMonthLast = DateSerial(Year(datDateThisMonth), _ Month(datDateThisMonth) + 1, 0) Gustav > DatePreviousMonthLast = DateSerial(Year(datDateThisMonth), _ > Month(datDateThisMonth) + 1, 0) From DWUTKA at marlow.com Mon Jul 19 10:43:12 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 19 Jul 2004 10:43:12 -0500 Subject: [AccessD] Third Wednesday of every month Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB144@main2.marlow.com> I wrote this a LONG time ago. When I was just learning VBA. It's actually part of the 'current' MiniCalendar example database: It dumps to 'tblWeekOfDates'. You give it a starting date, and ending date, the name of the day, the # of the week (ie, 3rd Wednesday would be 3), and the indexnumber is something I used to differentiate the results. (So if you want to run this for different days/weeks, you could 'cluster' the results under an indexnumber. Drew Function fWeekOfDates(StartDate As Date, EndDate As Date, DayName As String, WeekOf As Long, IndexNumber As Long) 'set up a variable to change from the startdate to the enddate Dim TestingDate As Date TestingDate = StartDate 'set up necessary variables to help with determining if a date matches the criteria Dim DayNumber As Long Dim FirstDayCriteria Dim LastDayCriteria Dim DayNameCriteria 'This variable will be used as the variable SQL code to insert the date into the tblWeekOfDates Dim DateSQL 'This variable will be set to true if the Date Falls within the required dates Dim DayNumberCriteria As Boolean DayNumberCriteria = False 'Set up a boolean variable to stop the loop once the EndDate is checked Dim StopLoop As Boolean StopLoop = False 'Start the Date Checking loop Do Until StopLoop = True 'Get Date information and set criteria DayNumber = Format(TestingDate, "d") FirstDayCriteria = 7 * (WeekOf - 1) + 1 LastDayCriteria = 7 * WeekOf DayNameCriteria = Format(TestingDate, "dddd") 'Set boolean variable to true if the day falls within the specified week If DayNumber >= FirstDayCriteria And DayNumber <= LastDayCriteria Then DayNumberCriteria = True End If 'if the date is a match for that month (allow the Insert Into SQL to run) If DayName = DayNameCriteria And DayNumberCriteria = True Then DateSQL = "INSERT INTO tblWeekOfDates (IndexNumber, DatesSelected) Values ('" & IndexNumber & "', '" & TestingDate & "');" DoCmd.SetWarnings (False) DoCmd.RunSQL DateSQL DoCmd.SetWarnings (True) End If DayNumberCriteria = False If TestingDate = EndDate Then StopLoop = True Else TestingDate = TestingDate + 1 End If Loop End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Monday, July 19, 2004 10:12 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Third Wednesday of every month Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 10:51:44 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 17:51:44 +0200 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: <18120254324.20040719173626@cactus.dk> Message-ID: Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael From BBarabash at TappeConstruction.com Mon Jul 19 11:07:40 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 11:07:40 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From michael.broesdorf at web.de Mon Jul 19 11:12:18 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 18:12:18 +0200 Subject: Solved: [AccessD] Convert a byte value to a hex-string In-Reply-To: Message-ID: Now I am feeling stupid: Hex() does the trick... Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Michael Brosdorf Gesendet: Montag, 19. Juli 2004 17:52 An: Access Developers discussion and problem solving Betreff: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 11:12:18 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 12:12:18 -0400 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7D@DISABILITYINS01> Message-ID: <000001c46dab$2a0a2680$cc0aa845@hargrove.internal> FirstControl is the control you want to get the focus... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 11:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 11:24:36 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 18:24:36 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Message-ID: Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 11:39:49 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 12:39:49 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7E@DISABILITYINS01> LOL. I think you misunderstood the question. When a tabbed form opens, the tab control tends to have the focus, usually with the tab0 page of the tab control. I want to place the control into the first control on the selected tab that can validly recieve the focus. This means: The control with the Lowest Tabindex that has TabStop = true that is Enabled that is Visible. IF I used Sendkeys I could just send a tab key which would cause Access to tab the cursor into the first valid control. Since I don't use Sendkeys, I need another way to do this. Somewhere in the guts of Access (page control) there is a collection of items that may (or are) be in the tab order. Unfortunately it doesn't appear to be exposed for us to use. I have built a pair of functions to find the first control that can receive the focus. It involves iterating the collection of all controls, testing each control to see if it has a TabStop property, then if it is enabled, then if it is visible. If all these things are true, then this control MAY be the first in the tab order. Now each such control is tested against every other such control to find the one with the lowest TabIndex property. It works, and on my machine takes about 16ms to run on a fairly complex form. It just seems that somewhere built in to Access I should be able to ask the object with a controls collection which control in the collection is the "first valid control in the tab order", i.e. which control can ACTUALLY RECEIVE the focus using the tab key. JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 12:12 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page FirstControl is the control you want to get the focus... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 11:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 11:45:47 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 12:45:47 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From papparuff at comcast.net Mon Jul 19 12:03:56 2004 From: papparuff at comcast.net (papparuff at comcast.net) Date: Mon, 19 Jul 2004 17:03:56 +0000 Subject: [AccessD] moving focus off the tab page Message-ID: <071920041703.19302.40FBFEFB000C7C2400004B66220075033000009A9D0E9F9F0E9F@comcast.net> John, You want to use the TabControl's Change event. Also, the cursor automatically moves to the first control on the tab selected. If you want it to go to a specific control on the tab then the following code will do it. Private Sub TabCtl0_Change() Select Case TabCtl0 Case 0 txtTab1LastControl.SetFocus MsgBox "This is page " & TabCtl0 Case 1 txtTab2SecondControl.SetFocus MsgBox "This is page " & TabCtl0 Case 2 txtTab3FourthControl.SetFocus MsgBox "This is page " & TabCtl0 End Select End Sub -- John V. Ruff ? The Eternal Optimist :-) ?Commit to the Lord whatever you do, and your plans will succeed.? Proverbs 16:3 -------------- Original message -------------- > LOL. I think you misunderstood the question. > > When a tabbed form opens, the tab control tends to have the focus, usually > with the tab0 page of the tab control. > > I want to place the control into the first control on the selected tab that > can validly recieve the focus. This means: > > The control with the Lowest Tabindex that has TabStop = true that is Enabled > that is Visible. > > IF I used Sendkeys I could just send a tab key which would cause Access to > tab the cursor into the first valid control. > > Since I don't use Sendkeys, I need another way to do this. > > Somewhere in the guts of Access (page control) there is a collection of > items that may (or are) be in the tab order. Unfortunately it doesn't > appear to be exposed for us to use. > > I have built a pair of functions to find the first control that can receive > the focus. It involves iterating the collection of all controls, testing > each control to see if it has a TabStop property, then if it is enabled, > then if it is visible. If all these things are true, then this control MAY > be the first in the tab order. Now each such control is tested against > every other such control to find the one with the lowest TabIndex property. > > It works, and on my machine takes about 16ms to run on a fairly complex > form. > > It just seems that somewhere built in to Access I should be able to ask the > object with a controls collection which control in the collection is the > "first valid control in the tab order", i.e. which control can ACTUALLY > RECEIVE the focus using the tab key. > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 12:12 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > FirstControl is the control you want to get the focus... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 11:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > What is FirstControl a property or method of? > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 10:42 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > Firstcontrol.SetFocus > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 10:30 AM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] moving focus off the tab page > > > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 12:08:03 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 13:08:03 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <000001c46db2$f3db5360$cc0aa845@hargrove.internal> Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 12:09:34 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 13:09:34 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC69@TTNEXCHSRV1.hshhp.com> Yes, no luck. It let him import it but it generated an error that the object already existed (but then the form was there sans code). Jim D. -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 1:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From jmhla at earthlink.net Mon Jul 19 12:23:45 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Mon, 19 Jul 2004 10:23:45 -0700 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <200407191723.i6JHNbQ31047@databaseadvisors.com> Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 12:37:08 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 13:37:08 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC6C@TTNEXCHSRV1.hshhp.com> According to MSKB #265434 (http://support.microsoft.com/default.aspx?scid=kb;en-us;265434&Product=acc2000) we may be lost here. Can anyone tell me different? Jim DeMarco -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 1:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From BBarabash at TappeConstruction.com Mon Jul 19 12:33:48 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 12:33:48 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065834@tccexch01.tappeconstruction.net> Not that I'm aware of. I did find this MSKB article that may be helpful to you: INFO: Converting Binary Data to Hexadecimal String http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 11:25 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From artful at rogers.com Mon Jul 19 12:37:47 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jul 2004 13:37:47 -0400 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB144@main2.marlow.com> Message-ID: <024401c46db7$1b7c24e0$6601a8c0@rock> Thanks, Drew and Gustav. I ended up whipping it together while waiting for a reply. Mine isn't as flexible but is simple to use and does what I need at the moment. I'll revisit it during refactoring: '----------------------------------------------------------------------- ---------------- ' Procedure : Bom ' DateTime : 12/22/2003 07:58 ' Author : Arthur Fuller ' Purpose : return the first of the month specified by the date passed in ' Notes : ' : ' Revisions : ' : '----------------------------------------------------------------------- ---------------- ' Public Function Bom(datThis As Date) As Date Dim d As Integer d = Day(datThis) - 1 Bom = datThis - d End Function '----------------------------------------------------------------------- ---------------- ' Procedure : ThirdWednesday ' DateTime : 07/19/2004 ' Author : Arthur Fuller ' Purpose : return the third Wednesday of the month specified by the date passed in ' Notes : assumes you will in the first of the month ' : WeekDay() begins on Sunday unless you pass an argument ' Revisions : ' : '----------------------------------------------------------------------- ---------------- ' Public Function ThirdWednesday(datThis As Date) As Date Dim retValue As Date Dim d As Integer Dim temp As Integer d = Weekday(datThis) Select Case d Case 1 temp = 3 Case 2 temp = 2 Case 3 temp = 1 Case 4 temp = 0 Case 5 temp = 6 Case 6 temp = 5 Case 7 temp = 4 End Select 'Now we know the first Wednesday of the month ThirdWednesday = datThis + temp + 14 End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Monday, July 19, 2004 11:43 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Third Wednesday of every month I wrote this a LONG time ago. When I was just learning VBA. It's actually part of the 'current' MiniCalendar example database: It dumps to 'tblWeekOfDates'. You give it a starting date, and ending date, the name of the day, the # of the week (ie, 3rd Wednesday would be 3), and the indexnumber is something I used to differentiate the results. (So if you want to run this for different days/weeks, you could 'cluster' the results under an indexnumber. Drew Function fWeekOfDates(StartDate As Date, EndDate As Date, DayName As String, WeekOf As Long, IndexNumber As Long) 'set up a variable to change from the startdate to the enddate Dim TestingDate As Date TestingDate = StartDate 'set up necessary variables to help with determining if a date matches the criteria Dim DayNumber As Long Dim FirstDayCriteria Dim LastDayCriteria Dim DayNameCriteria 'This variable will be used as the variable SQL code to insert the date into the tblWeekOfDates Dim DateSQL 'This variable will be set to true if the Date Falls within the required dates Dim DayNumberCriteria As Boolean DayNumberCriteria = False 'Set up a boolean variable to stop the loop once the EndDate is checked Dim StopLoop As Boolean StopLoop = False 'Start the Date Checking loop Do Until StopLoop = True 'Get Date information and set criteria DayNumber = Format(TestingDate, "d") FirstDayCriteria = 7 * (WeekOf - 1) + 1 LastDayCriteria = 7 * WeekOf DayNameCriteria = Format(TestingDate, "dddd") 'Set boolean variable to true if the day falls within the specified week If DayNumber >= FirstDayCriteria And DayNumber <= LastDayCriteria Then DayNumberCriteria = True End If 'if the date is a match for that month (allow the Insert Into SQL to run) If DayName = DayNameCriteria And DayNumberCriteria = True Then DateSQL = "INSERT INTO tblWeekOfDates (IndexNumber, DatesSelected) Values ('" & IndexNumber & "', '" & TestingDate & "');" DoCmd.SetWarnings (False) DoCmd.RunSQL DateSQL DoCmd.SetWarnings (True) End If DayNumberCriteria = False If TestingDate = EndDate Then StopLoop = True Else TestingDate = TestingDate + 1 End If Loop End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Monday, July 19, 2004 10:12 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Third Wednesday of every month Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. 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 Mark.Mitsules at ngc.com Mon Jul 19 13:12:37 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 19 Jul 2004 14:12:37 -0400 Subject: [AccessD] Hiding Back End Design Message-ID: >> 'Apache' << I had that game:) First of its kind that used nearly every key on the keyboard. Never 'cracked' it though;) Mark -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Sunday, July 18, 2004 5:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hiding Back End Design This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 19 12:56:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 19 Jul 2004 10:56:51 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Message-ID: <40FC0B63.4040406@shaw.ca> Well I guess if they are still worried, you could obfuscate some or all of the field names with something like speed ferret as they did with MYOB. This just slows down the person doing the reengineering. I have only had to reverse engineer one accounting package DacEasy, that had a backend database Btrieve. I had partial table layouts. Table and field names and sizes. It took me six months to write a POS in C code that integrated with it. The hard part was figuring out what fields had what calculations associated with it. In some places the numeric part after the decimal point indicted the partial inventory count. For example 2.54 meant 2 cases with 54 items out of 144. You had to refer back to another table that held this info on partial units . So if you have any field descriptions in your tables you might want to strip these out. Then again, maybe you get an Angel investor, that buys you out. Rocky Smolin - Beach Access Software wrote: >Marty: > >Every place I've done work where there were mdw's involved the problems >ranged from nuisance to nightmare. Since this is my proprietary product and >I'm hoping to have lots of them installed around the world over the next few >years (hope springs eternal) I'm really reluctant to start down that road. > >I think I've convinced my Chinese distributor, who started all this, that >having the back end open while the front end is totally protected, is the >best of both worlds. > >Rocky > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 9:50 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>Well if you were the owner through mdw you could, everyone else would >>have to go through a query. >>This assumes the mdw is crackable. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>Marty: >>> >>>Why couldn't they just go directly into the back end and open the table >>> >>> >in > > >>>design view? >>> >>>Rocky >>> >>> >>>----- Original Message ----- >>>From: "MartyConnelly" >>>To: "Access Developers discussion and problem solving" >>> >>>Sent: Thursday, July 15, 2004 6:40 PM >>>Subject: Re: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I came across this today under the Access ORK.You might be able to hide >>>>the design this way. >>>>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >>>> >>>>Using the RunPermissions Property with User-Level Security >>>>In order for Microsoft Access to display a table or query, it must read >>>>the design of that table or query. As a result, in order for a user to >>>>read and display the data in a table or query, that user must also have >>>>permission to read the design of the table or query. >>>>If you dont want your users to see the design of your table or query, >>>>you can create a query and set its RunPermissions property to restrict >>>>their access to this information. >>>>Set it up and test against one of the access reengineering case tools >>>>like Sparxs or EZDesign. >>>> >>>>Rocky Smolin - Beach Access Software wrote: >>>> >>>> >>>> >>>> >>>> >>>>>One of the great advantages of Access is that the user can work with >>>>> >>>>> >the > > >>>>>data apart from the front end app. It's transparency is a real >>>>> >>>>> >marketing > > >>>>>plus. So I'd like to leave the back end open. I think it will be >>>>>beneficial. >>>>> >>>>>Rocky >>>>> >>>>>----- Original Message ----- >>>>>From: "Andy Lacey" >>>>>To: "'Access Developers discussion and problem solving'" >>>>> >>>>>Sent: Wednesday, June 23, 2004 11:36 AM >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>I'm going to sound a dissenting voice here. I don't understand why >>>>>> >>>>>> >>>>>> >>>>>> >>>Rocky, >>> >>> >>> >>> >>>>>>who's no doubt sweat blood to develop his vertical app, should in >>>>>> >>>>>> >effect > > >>>>>>give his system away? Because surely that's what he'd be doing? The >>>>>> >>>>>> >only > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>way >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>doing a development like this makes sense is to get economies of scale >>>>>> >>>>>> >>>>>> >>>>>> >>>by >>> >>> >>> >>> >>>>>>selling lots of copies. Without that incentive vertical apps would >>>>>> >>>>>> >never > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>get >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>developed at all because, in the main, a single customer can't stand >>>>>> >>>>>> >all > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>the >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>development costs. And if you're going to put in the graft why >>>>>> >>>>>> >shouldn't > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>you >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>dream of making money on it, and why should you open yourself to being >>>>>>ripped-off by people who can't be arsed to do the hard work >>>>>> >>>>>> >themselves? > > >>>>>>Sorry, don't understand. >>>>>> >>>>>>-- Andy Lacey >>>>>>http://www.minstersystems.co.uk >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>>>-----Original Message----- >>>>>>>From: accessd-bounces at databaseadvisors.com >>>>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>>>DWUTKA at marlow.com >>>>>>>Sent: 23 June 2004 18:30 >>>>>>>To: accessd at databaseadvisors.com >>>>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>>>> >>>>>>> >>>>>>>'Open source' should pervade into all areas of the >>>>>>>information age. Music, programming, videos, etc. >>>>>>>Unfortunately it will take a complete change in humanity's >>>>>>>driving force....the accumulation of wealth. As long as >>>>>>>people are trying to make a buck, it will be virtually >>>>>>>impossible to get them to do stuff simply for the betterment >>>>>>>of society. >>>>>>> >>>>>>>Drew >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>-- >>>>>>_______________________________________________ >>>>>>AccessD mailing list >>>>>>AccessD at databaseadvisors.com >>>>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>>>Website: http://www.databaseadvisors.com >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>>-- >>>>Marty Connelly >>>>Victoria, B.C. >>>>Canada >>>> >>>> >>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From rjhjr at cox.net Mon Jul 19 13:19:36 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 19 Jul 2004 14:19:36 -0400 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Message-ID: <20040719181935.GA46930@kongemord.krig.net> On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). From martyconnelly at shaw.ca Mon Jul 19 13:02:27 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 19 Jul 2004 11:02:27 -0700 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <40FC0CB3.8060807@shaw.ca> you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada From michael.broesdorf at web.de Mon Jul 19 13:29:37 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:29:37 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <100F91B31300334B89EC531C9DCB0865065834@tccexch01.tappeconstruction.net> Message-ID: Thank you! This is exactly what I was looking for! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 19:34 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Not that I'm aware of. I did find this MSKB article that may be helpful to you: INFO: Converting Binary Data to Hexadecimal String http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 11:25 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 13:35:15 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:35:15 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <20040719181935.GA46930@kongemord.krig.net> Message-ID: INTTOHEX() is not a recognized function name. Can't find anything in BOL, either. Could that be a user-defined function? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Montag, 19. Juli 2004 20:20 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 13:35:16 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:35:16 +0200 Subject: AW: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <40FC0CB3.8060807@shaw.ca> Message-ID: That sounds interesting: I was working in a project where all access-objects were stored in Visual Source Safe as text. One of the forms was corrupted, so we went into the text stored in VSS and were able to fix it there. Unfortunately I can't remember what exactly the problem was... -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Montag, 19. Juli 2004 20:02 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Mon Jul 19 13:35:42 2004 From: marcus at tsstech.com (Scott Marcus) Date: Mon, 19 Jul 2004 14:35:42 -0400 Subject: [AccessD] OT ASP.Net configuration trouble. Message-ID: I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 13:48:55 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 14:48:55 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost??-SOLVED Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC6E@TTNEXCHSRV1.hshhp.com> We solved our problem but unfortunately it's probably nothing anyone here can use (except for the advice to keep a good recent backup). The form was trashed and we reused the code from our most recent backup which was not as old as I suspected. His most recent code mods were to one of the form's subforms, so with very little rewriting we are back to where we were. Thanks to all for suggestions and offers to help. Jim DeMarco -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: Monday, July 19, 2004 2:35 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] URGENT!! A2K - form won't load; is code lost?? That sounds interesting: I was working in a project where all access-objects were stored in Visual Source Safe as text. One of the forms was corrupted, so we went into the text stored in VSS and were able to fix it there. Unfortunately I can't remember what exactly the problem was... -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Montag, 19. Juli 2004 20:02 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From cfoust at infostatsystems.com Mon Jul 19 14:16:38 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 19 Jul 2004 12:16:38 -0700 Subject: [AccessD] Create custom shortcut menu Message-ID: What do you mean, "global" functions? All public functions are global in the application. What are you trying to do? Charlotte Foust -----Original Message----- From: Michael Br?sdorf [mailto:michael.broesdorf at web.de] Sent: Saturday, July 17, 2004 8:20 AM To: Access Developers discussion and problem solving Subject: [AccessD] Create custom shortcut menu Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Mon Jul 19 14:32:48 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Mon, 19 Jul 2004 12:32:48 -0700 Subject: [AccessD] update query - question#1 Message-ID: I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From kathrynatgwens at socal.rr.com Mon Jul 19 14:39:41 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Mon, 19 Jul 2004 12:39:41 -0700 Subject: [AccessD] update query - question#1 Message-ID: Hmm, after I sent the first time, I realized I was on no-mail, so this might not have gone through. Sorry if it's a duplicate. I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From BBarabash at TappeConstruction.com Mon Jul 19 14:48:56 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 14:48:56 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065836@tccexch01.tappeconstruction.net> No, it looks like it is part of Transact SQL for Sybase products: http://tinyurl.com/5s7wo -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string INTTOHEX() is not a recognized function name. Can't find anything in BOL, either. Could that be a user-defined function? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Montag, 19. Juli 2004 20:20 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From DWUTKA at marlow.com Mon Jul 19 15:08:02 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 19 Jul 2004 15:08:02 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> UPDATE tblCemeteries4Updating SET [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]=Trim(Mid([ Name],InStr([Name],",")+1)) That should do it! (No other querries necessary) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Monday, July 19, 2004 2:33 PM To: accessd at databaseadvisors.com Subject: [AccessD] update query - question#1 I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jul 19 16:38:11 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 19 Jul 2004 16:38:11 -0500 Subject: [AccessD] Problems with Date() Message-ID: I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 From pharold at proftesting.com Mon Jul 19 17:29:11 2004 From: pharold at proftesting.com (Perry Harold) Date: Mon, 19 Jul 2004 18:29:11 -0400 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> Message-ID: <002401c46ddf$d0c284c0$082da8c0@D58BT131> Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 CMackin at Quiznos.com Mon Jul 19 17:35:27 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 19 Jul 2004 16:35:27 -0600 Subject: [AccessD] Problems with Date() Message-ID: A long while ago I had an MDAC issue that showed the same syptoms and the fix was tyo somply install the latest MDAC. The workaround was to create a funciton like the following: Public Function GetDate2() as Date GetDate2 = Date() End Function Then in every calling place use Find and Replace to change Date() to GetDate2(). If it's the same issue then a VBA call to it worked while the calls from a textbox did not. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Geller Sent: Monday, July 19, 2004 3:38 PM To: accessd at databaseadvisors.com Subject: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Mon Jul 19 17:40:14 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 19 Jul 2004 18:40:14 -0400 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: <20040719181935.GA46930@kongemord.krig.net> Message-ID: <20040719224011.GA49032@kongemord.krig.net> On Mon, Jul 19, 2004 at 08:35:15PM +0200, Michael Brosdorf wrote: > INTTOHEX() is not a recognized function name. Can't find anything in BOL, > either. > Could that be a user-defined function? My bad. It's only in the Sybase implementation. I forgot to check. I don't work much with hex, so I can't tell you if CONVERT() will convert to hex. From d.dick at uws.edu.au Mon Jul 19 17:46:05 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Mon, 19 Jul 2004 22:46:05 -0000 Subject: [AccessD] Date format problem References: <193572B4E0FC1744BEDFEE63F82CEC9E02739605@bocnte2k4.boc.chevrontexaco.net> Message-ID: <003901cb2794$4ef9d4f0$48619a89@DDICK> Hi Chester By adding "yy" to the end of the 'syntax' you are actually telling Access to only return 2 digits of the year If you want to see all four digits of the year, try adding "yyyy" to the end of your syntax instead of just "yy" You can even add something like "dd/mm/yyyy" or "mm/dd/yyyy" to see the whole date expression Hope this helps Darren ----- Original Message ----- From: "Kaup, Chester A" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 20, 2004 1:22 AM Subject: RE: [AccessD] Date format problem > Selected year contains the value 2004. It can contain any year value > from 2001 to 2010 depending on what the user selects from the list box. > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However a large > number of electrons were terribly inconvenienced. > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael > Brosdorf > Sent: Monday, July 19, 2004 9:37 AM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Date format problem > > > What exactly does the field 'selected_year' contain? > > Michael > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, > Chester A > Gesendet: Montag, 19. Juli 2004 15:45 > An: accessd at databaseadvisors.com > Betreff: [AccessD] Date format problem > > > The following expression in a query returns 2004 Test:[Forms]![frm > Select Date]![selected_year] > The following expression returns 05 in a query Test:Format([Forms]![frm > Select Date]![selected_year],"yy") > > I an confused as to what is happening here. Help please. > > > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > 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 andrew.haslett at ilc.gov.au Mon Jul 19 17:59:17 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 20 Jul 2004 08:29:17 +0930 Subject: [AccessD] OT ASP.Net configuration trouble. Message-ID: That's pretty weird. Perhaps it doesn't recognise that IIS is running on your local machine. Try running the aspnet_iisreg.exe tool with appropriate switches (watch wrap): http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cptools/htm l/cpgrfaspnetiisregistrationtoolaspnet_regiisexe.asp Its found in the C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\ directory Cheers, Andrew -----Original Message----- From: Scott Marcus [mailto:marcus at tsstech.com] Sent: Tuesday, 20 July 2004 4:06 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT ASP.Net configuration trouble. I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From d.dick at uws.edu.au Mon Jul 19 18:51:22 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 20 Jul 2004 09:51:22 +1000 Subject: [AccessD] Problems with Date() References: Message-ID: <010801c46deb$4bba01c0$48619a89@DDICK> Hi Susan When you open the dB on their machine and go into any form or module Then click Tools|References Can you see any references marked as 'missing'? or any reference you think should be ticked but are not? Also make sure the 'order' they appear in the list matches your version of the app I have had this sort of thing before with broken and even phantom references Hope this helps Darren ----- Original Message ----- From: "Susan Geller" To: Sent: Tuesday, July 20, 2004 7:38 AM Subject: [AccessD] Problems with Date() > I have a bunch of reports which are really letters and I want them to > have today's date on them when it's run. No problem. I put a textbox on > the report and set the control source as "=Date()". Works fine on my > machine. Doesn't work on other machines. I have a very different set > up than the other machines so I don't even know where to look. Any ideas > on what might be causing the report to pop up with a dialogue box saying > "Enter Date" (as if I was asking for an input parameter) when I run the > report? Note: Office XP, 2002 file format. > > --Susan > > Susan B. Geller > Office of Information Systems > College of Continuing Education > University of Minnesota > 306 Wesbrook Hall > 77 Pleasant Street SE > Minneapolis, MN 55455 > Phone: 612-626-4785 > Fax: 612-625-2568 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:42 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Tue, 20 Jul 2004 10:11:42 +0200 Subject: AW: [AccessD] Create custom shortcut menu In-Reply-To: Message-ID: Hi Charlotte, sorry, I already got it to work using WithEvents - should have 'closed' my question here! Basically, I do not like the idea of having a public function for every button on every shortcut menu bar. Using Withevents I can bind the buttons on the shortcut menus to a set of event procedures and program them just I would do with normal command buttons on a form. Anyhow, thank you for offering help!!! Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Montag, 19. Juli 2004 21:17 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Create custom shortcut menu What do you mean, "global" functions? All public functions are global in the application. What are you trying to do? Charlotte Foust -----Original Message----- From: Michael Br?sdorf [mailto:michael.broesdorf at web.de] Sent: Saturday, July 17, 2004 8:20 AM To: Access Developers discussion and problem solving Subject: [AccessD] Create custom shortcut menu Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:45 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 10:11:45 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <20040719224011.GA49032@kongemord.krig.net> Message-ID: Hi Bob, Brett pointed me to thie KB-article: http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 I implemented this approach as a user-defined-function and it works great! Thanks to all who helped me out with this problem! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Dienstag, 20. Juli 2004 00:40 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 08:35:15PM +0200, Michael Brosdorf wrote: > INTTOHEX() is not a recognized function name. Can't find anything in BOL, > either. > Could that be a user-defined function? My bad. It's only in the Sybase implementation. I forgot to check. I don't work much with hex, so I can't tell you if CONVERT() will convert to hex. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:44 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 10:11:44 +0200 Subject: AW: [AccessD] Problems with Date() In-Reply-To: Message-ID: Try using Now() instead of Date() and set the display format of the textbox to one the built-in date formats. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Susan Geller Gesendet: Montag, 19. Juli 2004 23:38 An: accessd at databaseadvisors.com Betreff: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 03:32:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 10:32:37 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: Message-ID: <1256616904.20040720103237@cactus.dk> Hi Michael So why not share this great work of yours? /gustav > Brett pointed me to thie KB-article: > http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 > I implemented this approach as a user-defined-function and it works great! From stephen at bondsoftware.co.nz Tue Jul 20 03:48:49 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Tue, 20 Jul 2004 20:48:49 +1200 Subject: [AccessD] Append Query Message-ID: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. Any ideas? I didn't design this scenario, I've been asked along at party's end .... Stephen Bond From gustav at cactus.dk Tue Jul 20 04:10:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 11:10:41 +0200 Subject: [AccessD] Append Query In-Reply-To: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Message-ID: <1078901559.20040720111041@cactus.dk> Hi Stephen This sounds like a clean job for a Union query: Select * From qdyInter Union All Select * From qyyIntra; /gustav > Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the > duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. > I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. > Any ideas? I didn't design this scenario, I've been asked along at party's end .... > Stephen Bond From thevigil at kabelfoon.nl Tue Jul 20 04:12:28 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Tue, 20 Jul 2004 11:12:28 +0200 Subject: [AccessD] Append Query References: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Message-ID: <001301c46e39$b410af00$3f412d3e@jester> Hi Stephen, Use a union select query. like: select VoterID, vote FROM electronicVote UNION Select VoterID, vote FROM paperVote; Maybe you have to name the columns... and beware the 2 qeuries must have the same number of output columns.. HTH Bert-Jan ----- Original Message ----- From: "Stephen Bond" To: Sent: Tuesday, July 20, 2004 10:48 AM Subject: [AccessD] Append Query > Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. > > I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. > > Any ideas? I didn't design this scenario, I've been asked along at party's end .... > > Stephen Bond > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From thevigil at kabelfoon.nl Tue Jul 20 04:29:53 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Tue, 20 Jul 2004 11:29:53 +0200 Subject: [AccessD] Claas modules Message-ID: <012501c46e3c$1fa337e0$3f412d3e@jester> Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan From michael.broesdorf at web.de Tue Jul 20 04:47:24 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 11:47:24 +0200 Subject: AW: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <1256616904.20040720103237@cactus.dk> Message-ID: Hi Gustav, I simply replaced CREATE PROCEDURE with CREATE FUNCTION and set the return value - so it is not really _my_ work ;-) Ah, and removed the leading '0x'... Here is the result: CREATE FUNCTION dbo.myUDF_Binary2HexString (@binvalue varbinary(255)) RETURNS varchar(255) AS begin declare @hexvalue varchar(255) , at charvalue varchar(255) , at i int , at length int , at hexstring char(16) select @charvalue = '' , at i=1 , at length=datalength(@binvalue) , at hexstring = '0123456789abcdef' WHILE (@i<=@length) begin declare @tempint int , at firstint int , at secondint int select @tempint=CONVERT(int, SUBSTRING(@binvalue, at i,1)) select @firstint=FLOOR(@tempint/16) select @secondint=@tempint - (@firstint*16) select @charvalue=@charvalue +SUBSTRING(@hexstring, at firstint+1,1) +SUBSTRING(@hexstring, @secondint+1, 1) select @i=@i+1 end return @charvalue end -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Gustav Brock Gesendet: Dienstag, 20. Juli 2004 10:33 An: Access Developers discussion and problem solving Betreff: Re: AW: [AccessD] Convert a byte value to a hex-string Hi Michael So why not share this great work of yours? /gustav > Brett pointed me to thie KB-article: > http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 > I implemented this approach as a user-defined-function and it works great! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 05:11:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 12:11:01 +0200 Subject: [AccessD] Claas modules In-Reply-To: <012501c46e3c$1fa337e0$3f412d3e@jester> References: <012501c46e3c$1fa337e0$3f412d3e@jester> Message-ID: <3012521104.20040720121101@cactus.dk> Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan From marcus at tsstech.com Tue Jul 20 06:38:05 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 20 Jul 2004 07:38:05 -0400 Subject: [AccessD] OT ASP.Net configuration trouble. -SOLVED Message-ID: I added 'localhost' to the beginning of the exceptions LAN list because I'm using a proxy server. What threw me off was that I had this at the end of the list and it didn't work. After trying other stuff, I decided to try moving it to first in the list, which was successful. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Haslett, Andrew Sent: Monday, July 19, 2004 6:59 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT ASP.Net configuration trouble. That's pretty weird. Perhaps it doesn't recognise that IIS is running on your local machine. Try running the aspnet_iisreg.exe tool with appropriate switches (watch wrap): http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cptools/htm l/cpgrfaspnetiisregistrationtoolaspnet_regiisexe.asp Its found in the C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\ directory Cheers, Andrew -----Original Message----- From: Scott Marcus [mailto:marcus at tsstech.com] Sent: Tuesday, 20 July 2004 4:06 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT ASP.Net configuration trouble. I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Tue Jul 20 06:40:54 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 20 Jul 2004 13:40:54 +0200 (CEST) Subject: [AccessD] Dates And Merging To Word Message-ID: <22139804.1090323654636.JavaMail.www@wwinf3004> To all, I have a table in Access which has two dates fields (formatted as short date and DD/MM/YYYY), I have a word document that links to the database and uses both the date fields, however when I merge the data the dates appear in the format MM/DD/YYYY. Anyone any ideas why this is happening, and how I can get round it please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From kaupca at chevrontexaco.com Tue Jul 20 07:05:39 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 07:05:39 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> All I want is the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Monday, July 19, 2010 5:47 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Date format problem Hi Chester By adding "yy" to the end of the 'syntax' you are actually telling Access to only return 2 digits of the year If you want to see all four digits of the year, try adding "yyyy" to the end of your syntax instead of just "yy" You can even add something like "dd/mm/yyyy" or "mm/dd/yyyy" to see the whole date expression Hope this helps Darren ----- Original Message ----- From: "Kaup, Chester A" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 20, 2004 1:22 AM Subject: RE: [AccessD] Date format problem > Selected year contains the value 2004. It can contain any year value > from 2001 to 2010 depending on what the user selects from the list > box. > > Chester Kaup > Information Management Technician IT-MidContinent/MidContinent > Business Unit CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However a large > number of electrons were terribly inconvenienced. > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael > Brosdorf > Sent: Monday, July 19, 2004 9:37 AM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Date format problem > > > What exactly does the field 'selected_year' contain? > > Michael > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, > Chester A > Gesendet: Montag, 19. Juli 2004 15:45 > An: accessd at databaseadvisors.com > Betreff: [AccessD] Date format problem > > > The following expression in a query returns 2004 Test:[Forms]![frm > Select Date]![selected_year] > The following expression returns 05 in a query > Test:Format([Forms]![frm Select Date]![selected_year],"yy") > > I an confused as to what is happening here. Help please. > > > > Chester Kaup > Information Management Technician IT-MidContinent/MidContinent > Business Unit CTN 8-687-7415 > Outside 432-687-7414 > > 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 kaupca at chevrontexaco.com Tue Jul 20 07:06:40 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 07:06:40 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739611@bocnte2k4.boc.chevrontexaco.net> That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 john at winhaven.net Tue Jul 20 08:22:51 2004 From: john at winhaven.net (John Bartow) Date: Tue, 20 Jul 2004 08:22:51 -0500 Subject: [AccessD] Claas modules In-Reply-To: <3012521104.20040720121101@cactus.dk> Message-ID: Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 08:36:33 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 09:36:33 -0400 Subject: [AccessD] Class modules Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Tue Jul 20 08:59:47 2004 From: john at winhaven.net (John Bartow) Date: Tue, 20 Jul 2004 08:59:47 -0500 Subject: [AccessD] Class modules In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> Message-ID: :o) Oops, did I misspell Mister? ;-) John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 8:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Tue Jul 20 09:05:42 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 09:05:42 -0500 Subject: [AccessD] Claas modules Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDD5@corp-es01.fleetpride.com> In Getz's Access developer's handbook p446 there is a very interesting spin button class. Reviewing the properties and methods of this class helped me to understand what classes are all about. The ADH chap 3 also has a good introduction to classes. Good luck. Jim Hale -----Original Message----- From: Bert-Jan Brinkhuis [mailto:thevigil at kabelfoon.nl] Sent: Tuesday, July 20, 2004 4:30 AM To: accessd at databaseadvisors.com Subject: [AccessD] Claas modules Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 09:20:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 16:20:47 +0200 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> References: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> Message-ID: <1927507543.20040720162047@cactus.dk> Hi Chester If the year is saved as 2004 you can retrieve the deca and single years like this: intShortYear = FullYear Mod 100 If FullYear is a String - as in a combobox - you can do this: strShortYear = Right(FullYear, 2) The reason you are confused is that 2004 is a year and not the date value you expect as you can see from this: ? Format(2004, "mm/dd/yyyy") If you insist on using Format() you must build a DateTime value from the year, say 2004-01-01: datDate = DateSerial(2004, 1, 1) Doing so, Format(datDate, "yy") will return "04". /gustav > All I want is the last 2 digits of the year. It needs to be that way to > load into another program. >> Selected year contains the value 2004. It can contain any year value >> from 2001 to 2010 depending on what the user selects from the list >> box. >> >> The following expression in a query returns 2004 Test:[Forms]![frm >> Select Date]![selected_year] >> The following expression returns 05 in a query >> Test:Format([Forms]![frm Select Date]![selected_year],"yy") >> >> I an confused as to what is happening here. Help please. From Jim.Hale at FleetPride.com Tue Jul 20 09:22:11 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 09:22:11 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDD6@corp-es01.fleetpride.com> Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 20 09:28:28 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 20 Jul 2004 10:28:28 -0400 Subject: [AccessD] Class modules In-Reply-To: <916187228923D311A6FE00A0CC3FAA3090ECEE@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6AF@ADGSERVER> John, Just an FYI. The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 9:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming > in access and they (try) to explain class modules but i do not > understand it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make > and understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kaupca at chevrontexaco.com Tue Jul 20 09:50:17 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 09:50:17 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739612@bocnte2k4.boc.chevrontexaco.net> Good explanation. The way I was trying to do it confuses the format function. I think I will use the Right function. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 9:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Date format problem Hi Chester If the year is saved as 2004 you can retrieve the deca and single years like this: intShortYear = FullYear Mod 100 If FullYear is a String - as in a combobox - you can do this: strShortYear = Right(FullYear, 2) The reason you are confused is that 2004 is a year and not the date value you expect as you can see from this: ? Format(2004, "mm/dd/yyyy") If you insist on using Format() you must build a DateTime value from the year, say 2004-01-01: datDate = DateSerial(2004, 1, 1) Doing so, Format(datDate, "yy") will return "04". /gustav > All I want is the last 2 digits of the year. It needs to be that way > to load into another program. >> Selected year contains the value 2004. It can contain any year value >> from 2001 to 2010 depending on what the user selects from the list >> box. >> >> The following expression in a query returns 2004 Test:[Forms]![frm >> Select Date]![selected_year] >> The following expression returns 05 in a query >> Test:Format([Forms]![frm Select Date]![selected_year],"yy") >> >> I an confused as to what is happening here. Help please. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 09:57:47 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 10:57:47 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD81@DISABILITYINS01> No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 09:58:18 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 10:58:18 -0400 Subject: [AccessD] Class modules Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD82@DISABILITYINS01> Thanks, I'll look into that. JWC -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, July 20, 2004 10:28 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules John, Just an FYI. The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 9:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming > in access and they (try) to explain class modules but i do not > understand it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make > and understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Tue Jul 20 10:03:52 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Tue, 20 Jul 2004 11:03:52 -0400 Subject: [AccessD] Class modules Message-ID: <20040720150352.MMBE1833.tomts8-srv.bellnexxia.net@mxmta.bellnexxia.net> > From: "Colby, John" > Thanks, I'll look into that. > -----Original Message----- > From: Bobby Heid [mailto:bheid at appdevgrp.com] > John, > > Just an FYI. > > The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. You need to have the Flash Player installed. I just checked in FF 0.9.1 with the patch to 0.9.2 installed) and they work just fine for me. -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From bchacc at san.rr.com Tue Jul 20 10:33:51 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 20 Jul 2004 08:33:51 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD7E@DISABILITYINS01> Message-ID: <008e01c46e6e$f7e03360$6601a8c0@HAL9002> John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 19, 2004 9:39 AM Subject: RE: [AccessD] moving focus off the tab page > LOL. I think you misunderstood the question. > > When a tabbed form opens, the tab control tends to have the focus, usually > with the tab0 page of the tab control. > > I want to place the control into the first control on the selected tab that > can validly recieve the focus. This means: > > The control with the Lowest Tabindex that has TabStop = true that is Enabled > that is Visible. > > IF I used Sendkeys I could just send a tab key which would cause Access to > tab the cursor into the first valid control. > > Since I don't use Sendkeys, I need another way to do this. > > Somewhere in the guts of Access (page control) there is a collection of > items that may (or are) be in the tab order. Unfortunately it doesn't > appear to be exposed for us to use. > > I have built a pair of functions to find the first control that can receive > the focus. It involves iterating the collection of all controls, testing > each control to see if it has a TabStop property, then if it is enabled, > then if it is visible. If all these things are true, then this control MAY > be the first in the tab order. Now each such control is tested against > every other such control to find the one with the lowest TabIndex property. > > It works, and on my machine takes about 16ms to run on a fairly complex > form. > > It just seems that somewhere built in to Access I should be able to ask the > object with a controls collection which control in the collection is the > "first valid control in the tab order", i.e. which control can ACTUALLY > RECEIVE the focus using the tab key. > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 12:12 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > FirstControl is the control you want to get the focus... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 11:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > What is FirstControl a property or method of? > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 10:42 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > Firstcontrol.SetFocus > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 10:30 AM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] moving focus off the tab page > > > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Jim.Hale at FleetPride.com Tue Jul 20 10:38:15 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 10:38:15 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDDB@corp-es01.fleetpride.com> Hmm... If I recall correctly if you open an excel sheet and don't make changes it won't ask you if you want to save, i.e. you can just close it thereby avoiding the message box. If you can get the name of the sheet and use it in your connection string without changing the sheet name you may be able to avoid the stupid message box. As you know, you can give a linked table in Access whatever name you desire regardless of the source table name so your queries wouldn't have to change. The sole trick is to access the data without changing the workbook so the message box doesn't pop up. Something like appExcel.activeworkbook.Sheets(1).name should retrieve the name for use in your connection string. Anyway, just a thought. Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 9:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 20 11:02:10 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 20 Jul 2004 12:02:10 -0400 Subject: [AccessD] Class modules In-Reply-To: <916187228923D311A6FE00A0CC3FAA3090ED26@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6B0@ADGSERVER> Thanks Bryan. Sorry about the false issue John. I guess I have not hit any flash sites since going to 0.9.2. Bobby >You need to have the Flash Player installed. > >I just checked in FF 0.9.1 with the patch to 0.9.2 installed) and they work just fine for me. > >-- >Bryan Carbonnell - carbonnb at sympatico.ca >Unfortunately common sense isn't so common! From JColby at dispec.com Tue Jul 20 11:08:50 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:08:50 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD83@DISABILITYINS01> Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky From JColby at dispec.com Tue Jul 20 11:09:50 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:09:50 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD84@DISABILITYINS01> Yea, that seems to be the answer. JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 11:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Hmm... If I recall correctly if you open an excel sheet and don't make changes it won't ask you if you want to save, i.e. you can just close it thereby avoiding the message box. If you can get the name of the sheet and use it in your connection string without changing the sheet name you may be able to avoid the stupid message box. As you know, you can give a linked table in Access whatever name you desire regardless of the source table name so your queries wouldn't have to change. The sole trick is to access the data without changing the workbook so the message box doesn't pop up. Something like appExcel.activeworkbook.Sheets(1).name should retrieve the name for use in your connection string. Anyway, just a thought. Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 9:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 11:27:15 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:27:15 -0400 Subject: [AccessD] Class modules example Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD85@DISABILITYINS01> At one client I have built a rather elaborate system that tracks events that happen to an insurance claim. As events happen they are recorded in an event table that is child to insurance claim. The events can cause status changes, and events subsequent to any event that causes a status change inherits the "current" status if it does not cause a status change. Thus the last event always displays the current status. In each event record there are pointers to the immediate previous event, the event that caused the current status, and the event that caused the previous status. I do that for reporting purposes, so that we can determine (with queries) how long claims are in a given status, when the status changed etc. Of course this means that as a new event is created these fields have to be populated by code that looks up these previous events and fills in the FKs. Furthermore if an event is deleted, these pointers will need adjusting. Additionally, the users need the current event type / status displayed out in the main claim form. For speed reasons I have, with malice and forethought, denormalized the db and placed a pointer to the last event in the main claim record. Likewise, if the LAST event is deleted, then this pointer needs to be adjusted. I adjust this pointer directly in the record itself rather than by setting a value in a form simply so that the code that create events aren't tied to a form being open. Which brings up an interesting phenomenon - If the claim form IS OPEN, and the field in the current claim that tracks the current event is modified, any attempt to edit the current manually through the form will display a message "another user has modified this claim - your changes will be lost". The message is displayed as the user is entering the change in the very first field being changed, and the change is discarded by Access, requiring the user to start over after clicking the OK button to the message being displayed. In order to work around this and still use the encapsulation provided by the classes building the events and updating the claim record, I am using RaiseEvent to broadcast a message that the claim record has been modified, at the time that the claim is updated. The claim form listens for the message and if it sees a "claim modified" message, immediately requeries the form. Understand that the class cannot update the claim if that claim is currently being modified by any user, which in itself can cause a "multi-user" issue. I have designed a "message" class (available on my site BTW) which allows message class users to broadcast / receive messages. The event class which modified the claim gets a pointer to a global message class. It uses this pointer to send messages on that message channel. The claim form gets a pointer to the same message class. In the claim form's class module I set up an event handler to sink the message classes' message event. Thus the claim form now receives any events broadcast on that message channel. It watches the subject, and if the subject is "claim record change", it looks in the message parameter and checks the claim ID against the claim the form is currently displaying. If the claim being displayed if the claim form is the same as the claim the event class just modified, then the claim form has to requery so that the user won't get these annoying messages. It seems like Access should just requery the data by itself if it senses that the data has changed, and allow the user to continue modifying the data after the requery. Unfortunately that does not seem to be the case. There are of course other ways to handle this problem. However, using a message class - which one class module uses to broadcast messages, and another class module uses to receive messages - allows me to encapsulate and isolate the various processes. The event class can update events without worrying about whether the claim form is open and trying to cause it to requery somehow. It can simply broadcast a message "hey, I modified claim number XXX". ANY form that might be affected can listen for these messages and if it sees a message saying that the claim it is currently displaying was modified, it can requery itself. The event class logs any failed attempts to update the claim record (some user was actively editing that claim at that moment) and another process performs those updates later. John W. Colby From kathrynatgwens at socal.rr.com Tue Jul 20 11:56:10 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Tue, 20 Jul 2004 09:56:10 -0700 Subject: [AccessD] update query - question#1 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> Message-ID: :( fooey, it didn't work. Asks me for a parameter value. I copy/pasted your SQL statement: http://www.babcockancestry.com/storage/accesscemeteries1.jpg and went to the design view to look at how that parsed out http://www.babcockancestry.com/storage/accesscemeteries2.jpg then ran it and got this: http://www.babcockancestry.com/storage/accesscemeteries3.jpg On a side note, before I pasted the SQL statement, the default was UPDATE tblCemeteries4Updating SET; I tried adding the ; after SET in your statement but that gave a syntax error, so I don't know what that is about. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Monday, July 19, 2004 1:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > UPDATE tblCemeteries4Updating SET > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > Trim(Mid([ > Name],InStr([Name],",")+1)) > > That should do it! (No other querries necessary) > > Drew > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Monday, July 19, 2004 2:33 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] update query - question#1 > > > I have a table named > tblCemeteries4Updating > The pertinant fields are: > Name > Surname > FirstName > MarrName > > Query #1 > Name currently has (for example) > WESTWATER, John Ovenstone > I want to update this table to put Westwater (initial letter cap > only, rest > smalls) into the Surname field and John Ovenstone in the FirstName field. > I know I have to first make a query with the fields in it, and then change > it to an update query. That gives me the grid boxes for "Update To" and > "Criteria" but I'm not sure what to type in them. > > After that is done, I have another update, but I think I'll do one at a > time. Maybe with the answer to this one, I might be able to figure out the > other one, though the other one involves two tables, so I might be back. > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 20 12:01:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jul 2004 10:01:34 -0700 Subject: [AccessD] moving focus off the tab page Message-ID: I'm not sure this is what you're talking about, John, but I built this a long time ago to handle a similar problem: Public Function FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) As String 'created by Charlotte Foust 9/14/99 'last modified 9/11/2000 Dim ctl As Control Dim intTab As Integer Dim strCtlName As String Dim blnSkip As Boolean 'Use the count of controls as the 'maximum tab value intTab = frm.Count 'Loop throught all controls on form For Each ctl In frm If frmSection <> -1 Then If ctl.Section <> frmSection Then blnSkip = True End If 'ctl.Section <> frmSection End If 'frmSection <> -1 If Not blnSkip Then Select Case ctl.ControlType 'If control can accept value 'test its tab value against intTab. Case acTextBox, acOptionGroup, acComboBox, acListBox, _ acCheckBox, acOptionButton, acCommandButton, _ acToggleButton 'If tab value less than intTab 'set intTab = tab value and 'set strCtlName = control name. If ctl.TabIndex < intTab Then If ctl.TabStop = True Then intTab = ctl.TabIndex strCtlName = ctl.Name End If 'ctl.TabStop = True End If 'ctl.TabIndex < intTab End Select 'Case ctl.ControlType End If 'not blnSkip Next 'ctl In frm 'Return name of control with lowest tab value FirstFormControl = strCtlName End Function 'FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 8:09 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 12:31:01 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 13:31:01 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD86@DISABILITYINS01> That is close... It doesn't take into account whether a control is hidden or disabled - both of those conditions will prevent the control from getting the focus. Further it doesn't figure out whether a tab page has the focus. But that is the general idea. I wrote code to do what I needed already. I was just answering Rocky's question. JWC -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 20, 2004 1:02 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] moving focus off the tab page I'm not sure this is what you're talking about, John, but I built this a long time ago to handle a similar problem: Public Function FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) As String 'created by Charlotte Foust 9/14/99 'last modified 9/11/2000 Dim ctl As Control Dim intTab As Integer Dim strCtlName As String Dim blnSkip As Boolean 'Use the count of controls as the 'maximum tab value intTab = frm.Count 'Loop throught all controls on form For Each ctl In frm If frmSection <> -1 Then If ctl.Section <> frmSection Then blnSkip = True End If 'ctl.Section <> frmSection End If 'frmSection <> -1 If Not blnSkip Then Select Case ctl.ControlType 'If control can accept value 'test its tab value against intTab. Case acTextBox, acOptionGroup, acComboBox, acListBox, _ acCheckBox, acOptionButton, acCommandButton, _ acToggleButton 'If tab value less than intTab 'set intTab = tab value and 'set strCtlName = control name. If ctl.TabIndex < intTab Then If ctl.TabStop = True Then intTab = ctl.TabIndex strCtlName = ctl.Name End If 'ctl.TabStop = True End If 'ctl.TabIndex < intTab End Select 'Case ctl.ControlType End If 'not blnSkip Next 'ctl In frm 'Return name of control with lowest tab value FirstFormControl = strCtlName End Function 'FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 8:09 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 20 12:56:52 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 20 Jul 2004 10:56:52 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD83@DISABILITYINS01> Message-ID: <014d01c46e82$f02a89e0$6601a8c0@HAL9002> John: At first I thought you were trying to solve this for a specific form where you knew the controls and you knew where you wanted the focus set. But you're trying to make a general case routine? Would using Screen.currrentControl help figure out where you are? Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 20, 2004 9:08 AM Subject: RE: [AccessD] moving focus off the tab page > Rocky, > > The question is "what is the desired control to set the focus in", NOT how > to set the focus. > > In any form, there is no single "tab index 0" control. If you have a header > with controls in it, there will be one there. If you have a footer with > controls, there will be one there. There will be one in the main part of > the form. Furthermore, if you have tab controls, EACH page of the tab > control has it's own tab order etc. So.. if I am in the header and tap the > tab key I go one place, if I am in the footer and tap the tab key I go > another, if I am in the main part of the form I go a third, if I am in page1 > of the tab control I go another, if I am in page 2 of the form I go > another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? > > To complicate matters further, just because a control has tab index set to 0 > doesn't mean it can get the focus. It may be invisible, it may be disabled, > or it may simply have it's property that allows it to be "tabbed into" set > to false. My question is... > > How do I determine WHICH control would get the focus if the tab key were > tapped? The answer varies depending on whether there are tabs (if so which > tab is currently selected?), whether the current focus is in the header / > footer / body of the form, etc. UGLY question, and Access is no help at all > determining the answer (AFAICT). > > This is one of those "the stupid bastards know the answer" (the tab key > works doesn't it?) but they don't expose the answer to me so I can set the > focus to that control using SomeControl.SetFocus syntax. > > JWC. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 20, 2004 11:34 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] moving focus off the tab page > > > John: > > Why can't you use the _Open event of the form to se the focus to the desired > control? > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Tue Jul 20 13:04:39 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Tue, 20 Jul 2004 13:04:39 -0500 Subject: [AccessD] Problems with Date() Message-ID: The problem was a missing reference which I discovered thanks to other replies to my post, but Now() did work even with the missing reference. I solved the problem by unchecking the missing reference from the reference list -- it wasn't needed anyway. Thanks! --Susan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Tuesday, July 20, 2004 3:12 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Problems with Date() Try using Now() instead of Date() and set the display format of the textbox to one the built-in date formats. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Susan Geller Gesendet: Montag, 19. Juli 2004 23:38 An: accessd at databaseadvisors.com Betreff: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Tue Jul 20 13:08:38 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Tue, 20 Jul 2004 14:08:38 -0400 Subject: [AccessD] Average ages Message-ID: This should be simple...I think I am just missing something simple (and probably dumb). I have a query that has the following fields: Client Name: UCase([txtLastName] & ", " & [txtFirstName]) xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) kSubContID lnkClient CareGiver (Criteria: True) DatEntry (Criteria: >=#04/01/04#) The SQL looks like this: SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, tblClient.datEntry FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = tblSubConts.lnkClient WHERE (((tblSubConts.CareGiver)=True) AND ((tblClient.datEntry)>=#4/1/2004#)) ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), tblClient.datEntry; How do I get an average age for all of my clients in this query? I think I could muddle through this easier in a report or form, but I just needed a number, and I tried using the 'Totals' section for the query and choosing 'Avg' for the 'xAge' field. This does not seem to work though. John W. Clark Computer Programmer Niagara County Central Data Processing From DWUTKA at marlow.com Tue Jul 20 13:19:41 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 20 Jul 2004 13:19:41 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB158@main2.marlow.com> Line wrap! In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to the end of that line, and hit delete, which should bring Name].... back up into that line. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Tuesday, July 20, 2004 11:56 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] update query - question#1 :( fooey, it didn't work. Asks me for a parameter value. I copy/pasted your SQL statement: http://www.babcockancestry.com/storage/accesscemeteries1.jpg and went to the design view to look at how that parsed out http://www.babcockancestry.com/storage/accesscemeteries2.jpg then ran it and got this: http://www.babcockancestry.com/storage/accesscemeteries3.jpg On a side note, before I pasted the SQL statement, the default was UPDATE tblCemeteries4Updating SET; I tried adding the ; after SET in your statement but that gave a syntax error, so I don't know what that is about. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Monday, July 19, 2004 1:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > UPDATE tblCemeteries4Updating SET > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > Trim(Mid([ > Name],InStr([Name],",")+1)) > > That should do it! (No other querries necessary) > > Drew > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Monday, July 19, 2004 2:33 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] update query - question#1 > > > I have a table named > tblCemeteries4Updating > The pertinant fields are: > Name > Surname > FirstName > MarrName > > Query #1 > Name currently has (for example) > WESTWATER, John Ovenstone > I want to update this table to put Westwater (initial letter cap > only, rest > smalls) into the Surname field and John Ovenstone in the FirstName field. > I know I have to first make a query with the fields in it, and then change > it to an update query. That gives me the grid boxes for "Update To" and > "Criteria" but I'm not sure what to type in them. > > After that is done, I have another update, but I think I'll do one at a > time. Maybe with the answer to this one, I might be able to figure out the > other one, though the other one involves two tables, so I might be back. > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 13:24:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 20:24:24 +0200 Subject: [AccessD] Average ages In-Reply-To: References: Message-ID: <14642124421.20040720202424@cactus.dk> Hi John > This should be simple...I think I am just missing something simple (and > probably dumb). Yes, but you need to Group By no field and only Select Avg(Age). If you use your XAge, all Nulls count as Zero age which obstructs the average completely. /gustav > I have a query that has the following fields: > Client Name: UCase([txtLastName] & ", " & [txtFirstName]) > xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) > kSubContID > lnkClient > CareGiver (Criteria: True) > DatEntry (Criteria: >=#04/01/04#) > The SQL looks like this: > SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], > IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, > tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, > tblClient.datEntry > FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = > tblSubConts.lnkClient > WHERE (((tblSubConts.CareGiver)=True) AND > ((tblClient.datEntry)>=#4/1/2004#)) > ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), > tblClient.datEntry; > How do I get an average age for all of my clients in this query? I > think I could muddle through this easier in a report or form, but I just > needed a number, and I tried using the 'Totals' section for the query > and choosing 'Avg' for the 'xAge' field. This does not seem to work > though. > John W. Clark > Computer Programmer > Niagara County > Central Data Processing From stephen at bondsoftware.co.nz Tue Jul 20 14:12:13 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Wed, 21 Jul 2004 07:12:13 +1200 Subject: [AccessD] Append Query Message-ID: <70F3D727890C784291D8433E9C418F290887CE@server.bondsoftware.co.nz> Thank you Gustav and Bert-Jan. The brain was a bit constipated last night. Stephen From artful at rogers.com Tue Jul 20 15:31:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Tue, 20 Jul 2004 16:31:50 -0400 Subject: [AccessD] Dlookup syntax Message-ID: <003601c46e98$963226d0$6601a8c0@rock> I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur From kathrynatgwens at socal.rr.com Tue Jul 20 15:29:49 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Tue, 20 Jul 2004 13:29:49 -0700 Subject: [AccessD] update query - question#1 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB158@main2.marlow.com> Message-ID: That did it, thanks. I'll work on the next part and post any problems another time. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, July 20, 2004 11:20 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > Line wrap! > > In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to > the end of that line, and hit delete, which should bring Name].... back up > into that line. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Tuesday, July 20, 2004 11:56 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] update query - question#1 > > > :( fooey, it didn't work. Asks me for a parameter value. > I copy/pasted your SQL statement: > http://www.babcockancestry.com/storage/accesscemeteries1.jpg > and went to the design view to look at how that parsed out > http://www.babcockancestry.com/storage/accesscemeteries2.jpg > then ran it and got this: > http://www.babcockancestry.com/storage/accesscemeteries3.jpg > > On a side note, before I pasted the SQL statement, the default was > UPDATE tblCemeteries4Updating SET; > I tried adding the ; after SET in your statement but that gave a syntax > error, so I don't know what that is about. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Monday, July 19, 2004 1:08 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] update query - question#1 > > > > > > UPDATE tblCemeteries4Updating SET > > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > > Trim(Mid([ > > Name],InStr([Name],",")+1)) > > > > That should do it! (No other querries necessary) > > > > Drew > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Monday, July 19, 2004 2:33 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] update query - question#1 > > > > > > I have a table named > > tblCemeteries4Updating > > The pertinant fields are: > > Name > > Surname > > FirstName > > MarrName > > > > Query #1 > > Name currently has (for example) > > WESTWATER, John Ovenstone > > I want to update this table to put Westwater (initial letter cap > > only, rest > > smalls) into the Surname field and John Ovenstone in the > FirstName field. > > I know I have to first make a query with the fields in it, and > then change > > it to an update query. That gives me the grid boxes for "Update To" and > > "Criteria" but I'm not sure what to type in them. > > > > After that is done, I have another update, but I think I'll do one at a > > time. Maybe with the answer to this one, I might be able to > figure out the > > other one, though the other one involves two tables, so I might be back. > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 20 15:41:17 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jul 2004 13:41:17 -0700 Subject: [AccessD] Dlookup syntax Message-ID: You either need to dim X as a variant or use an Nz function around Dlookup. Integers aren't especially fond of being set to Null, which is what Dlookup returns if there is no matching value. Charlotte Foust -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Tuesday, July 20, 2004 12:32 PM To: AccessD Subject: [AccessD] Dlookup syntax I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Tue Jul 20 15:55:43 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 20 Jul 2004 14:55:43 -0600 Subject: [AccessD] Dlookup syntax Message-ID: Personally I find SQL strings a lot easier to read than any of the Lookup functions. I use this and pass it a SQL string, returns the first value in the first field of the SQL statement. It will return a Null when nothing is returned..... Public Function CLookup(strSQL As String) As Variant Dim rst As ADODB.Recordset Set rst = New ADODB.Recordset rst.Open strSQL, CurrentProject.Connection, adOpenStatic If rst.EOF Then CLookup = Null Else rst.MoveFirst CLookup = rst(0) End If rst.Close Set rst = Nothing End Function -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Tuesday, July 20, 2004 2:32 PM To: AccessD Subject: [AccessD] Dlookup syntax I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur -- _______________________________________________ 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 Jul 20 15:56:25 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 20 Jul 2004 21:56:25 +0100 Subject: [AccessD] Dlookup syntax In-Reply-To: <003601c46e98$963226d0$6601a8c0@rock> Message-ID: <000001c46e9c$0531cd80$b274d0d5@minster33c3r25> Arthur How's it failing? May be worth trying: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & Format(d,"mm/dd/yy") & "#") Or, as Charlotte suggests: X = Nz(Dlookup("myColumn", "myTable", "myDateColumn=#" & Format(d,"mm/dd/yy") & "#"),0) -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Arthur Fuller > Sent: 20 July 2004 21:32 > To: AccessD > Subject: [AccessD] Dlookup syntax > > > I can't remember how to format this! Bloddy L. The second > thing to go is memory. I forget what the first is. > > Dim s as string > Dim x as Integer > Dim d as Date > > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > > Doesn't seem to work. What should I be doing instead? > > TIA, > Arthur > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From DWUTKA at marlow.com Tue Jul 20 17:54:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 20 Jul 2004 17:54:19 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB163@main2.marlow.com> Okay, glad to help. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Tuesday, July 20, 2004 3:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] update query - question#1 That did it, thanks. I'll work on the next part and post any problems another time. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, July 20, 2004 11:20 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > Line wrap! > > In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to > the end of that line, and hit delete, which should bring Name].... back up > into that line. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Tuesday, July 20, 2004 11:56 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] update query - question#1 > > > :( fooey, it didn't work. Asks me for a parameter value. > I copy/pasted your SQL statement: > http://www.babcockancestry.com/storage/accesscemeteries1.jpg > and went to the design view to look at how that parsed out > http://www.babcockancestry.com/storage/accesscemeteries2.jpg > then ran it and got this: > http://www.babcockancestry.com/storage/accesscemeteries3.jpg > > On a side note, before I pasted the SQL statement, the default was > UPDATE tblCemeteries4Updating SET; > I tried adding the ; after SET in your statement but that gave a syntax > error, so I don't know what that is about. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Monday, July 19, 2004 1:08 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] update query - question#1 > > > > > > UPDATE tblCemeteries4Updating SET > > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > > Trim(Mid([ > > Name],InStr([Name],",")+1)) > > > > That should do it! (No other querries necessary) > > > > Drew > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Monday, July 19, 2004 2:33 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] update query - question#1 > > > > > > I have a table named > > tblCemeteries4Updating > > The pertinant fields are: > > Name > > Surname > > FirstName > > MarrName > > > > Query #1 > > Name currently has (for example) > > WESTWATER, John Ovenstone > > I want to update this table to put Westwater (initial letter cap > > only, rest > > smalls) into the Surname field and John Ovenstone in the > FirstName field. > > I know I have to first make a query with the fields in it, and > then change > > it to an update query. That gives me the grid boxes for "Update To" and > > "Criteria" but I'm not sure what to type in them. > > > > After that is done, I have another update, but I think I'll do one at a > > time. Maybe with the answer to this one, I might be able to > figure out the > > other one, though the other one involves two tables, so I might be back. > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Tue Jul 20 20:25:33 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Wed, 21 Jul 2004 11:25:33 +1000 Subject: [AccessD] WindowsXP not recognising api Call Message-ID: Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From thevigil at kabelfoon.nl Wed Jul 21 02:54:22 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Wed, 21 Jul 2004 09:54:22 +0200 Subject: [AccessD] Class modules References: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> Message-ID: <000b01c46ef7$f176f8e0$3f412d3e@jester> Thanks for the responses. I'll check into the newsletters, especcialy july 2001 And maybe John's articles on framework and the code will help me understand them too. I did read Getz ADH, but couldn't understand it/// ;-) But the spinclass module example i didn't read. Maybe i have to 'study' ADH better... ;-) Bert-Jan ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 20, 2004 3:36 PM Subject: RE: [AccessD] Class modules > >You will find a great set of instructions from Master John Colby. > > ROTFL. Master? > > You can go also to my site to find a series of articles on using a > framework, which is all about classes. > > Click the C2DbFW3G button. > > John W. Colby > > www.colbyconsulting.com > > -----Original Message----- > From: John Bartow [mailto:john at winhaven.net] > Sent: Tuesday, July 20, 2004 9:23 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Claas modules > > > Bert-Jan > I second on Gustav's response. > > I think the best resource you're going to find on class modules is right > here. Read through the newsletters, then start discussing it with the class > module gurus on this list. > > For really advanced class module usage go to the archives and search for > "Framework Discussion" during the month of March this year. You will find a > great set of instructions from Master John Colby. > > John B. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Tuesday, July 20, 2004 5:11 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Claas modules > > > Hi Bert-Jan > > Have you studied the work from our own listmembers? > > Have a look here: > > http://www.databaseadvisors.com/newsletters.htm > > Look up July 2001 and: > > "An Introduction to Class Modules (by John Colby)" > > Much more stuff in these newsletters by the way. > > /gustav > > > > I have written several functions in modules. And used several class > modules > > and can follow the code to see what it is doing, but i still do not > > understand class modules... ;-( I have several books about programming in > > access and they (try) to explain class modules but i do not understand > > it...... so i am unable to write them myself.... > > > I feel i am missing out a lot of the fun of access and ofcourse of its > > functionality! > > > Does anyone know a good document/book/website explaining how to make and > > understand class modules? > > > Thanks in advance. > > > Bert-Jan > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 21 03:56:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 10:56:36 +0200 Subject: [AccessD] Dlookup syntax In-Reply-To: <003601c46e98$963226d0$6601a8c0@rock> References: <003601c46e98$963226d0$6601a8c0@rock> Message-ID: <1976438147.20040721105636@cactus.dk> Hi Arthur The syntax is OK. The expression, however, must contain the usual US formatted date(time) string: strDate = Format(d, "mm\/dd\/yyyy") Then: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & strDate & "#") And, as Charlotte points out, always take care of a possible Null return from DLookup(). /gustav > I can't remember how to format this! Bloddy L. The second thing to go is > memory. I forget what the first is. > Dim s as string > Dim x as Integer > Dim d as Date > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > Doesn't seem to work. What should I be doing instead? > TIA, > Arthur From dwaters at usinternet.com Wed Jul 21 07:50:42 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 21 Jul 2004 07:50:42 -0500 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <16679441.1090373375236.JavaMail.root@sniper4.usinternet.com> Message-ID: <000401c46f21$55b25150$de1811d8@danwaters> Connie, I use the code I downloaded from Candace Tripp's website for this. It's been a while, but I remember that she has separate downloads for these operating systems, and that the code is slightly different, although I didn't understand the differences. I use the code as is on Windows XP PC's, and it works. Look at www.candace-tripp.com. Good Luck! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, July 20, 2004 8:26 PM To: accessd at databaseadvisors.com Subject: [AccessD] WindowsXP not recognising api Call Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jul 21 09:00:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 16:00:24 +0200 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <000401c46f21$55b25150$de1811d8@danwaters> References: <000401c46f21$55b25150$de1811d8@danwaters> Message-ID: <15824666248.20040721160024@cactus.dk> Hi Dan the Monkey (ape call?) You probably need to set these values of the OFN structure: .strCustomFilter = String(255, 0) .nMaxCustFilter = 255 If that works, could you please report if these settings work with Win9x too? /gustav > I use the code I downloaded from Candace Tripp's website for this. It's > been a while, but I remember that she has separate downloads for these > operating systems, and that the code is slightly different, although I > didn't understand the differences. I use the code as is on Windows XP PC's, > and it works. > Look at www.candace-tripp.com. > Good Luck! > Dan Waters > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: Tuesday, July 20, 2004 8:26 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] WindowsXP not recognising api Call > Ok further to last week I have been trying to find the problem with my > inherited app. The api call works fine on windows98 and when taken to > windows XP machines does not work. > It throws no errors just does not open the Windows Open Save dialog box. > The code is word for word to the Getz API call but when the XP machine > reaches the > If OpenFile Then > fResult = adh_apiGetOpenFileName(OFN) > Else > fResult = adh_apiGetSaveFileName(OFN) > End If > It does not open the dialogue box. Running the same code side by side on > the win98 machine I get the popup box every time. I have run a reference > checker and it says all references are OK. > The code is below if that helps. > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > Function adhCommonFileOpenSave( _ > Optional ByRef Flags As Variant, _ > Optional ByVal InitialDir As Variant, _ > Optional ByVal Filter As Variant, _ > Optional ByVal FilterIndex As Variant, _ > Optional ByVal DefaultExt As Variant, _ > Optional ByVal FileName As Variant, _ > Optional ByVal DialogTitle As Variant, _ > Optional ByVal hwnd As Variant, _ > Optional ByVal OpenFile As Variant) As Variant > ' This is the entry point you'll use to call the common > ' file open/save dialog. The parameters are listed > ' below, and all are optional. > ' > ' From Access 97 Developer's Handbook > ' by Litwin, Getz and Gilbert. (Sybex) > ' Copyright 1997. All Rights Reserved. > ' > ' In: > ' Flags: one or more of the adhOFN_* constants, OR'd together. > ' InitialDir: the directory in which to first look > ' Filter: a set of file filters, set up by calling > ' AddFilterItem. See examples. > ' FilterIndex: 1-based integer indicating which filter > ' set to use, by default (1 if unspecified) > ' DefaultExt: Extension to use if the user doesn't enter one. > ' Only useful on file saves. > ' FileName: Default value for the file name text box. > ' DialogTitle: Title for the dialog. > ' OpenFile: Boolean(True=Open File/False=Save As) > ' Out: > ' Return Value: Either Null or the selected filename > Dim OFN As tagOPENFILENAME > Dim strFileName As String > Dim strFileTitle As String > Dim fResult As Boolean > ' Give the dialog a caption title. > 'If IsMissing(InitialDir) Then InitialDir = "" > If IsMissing(InitialDir) Then > InitialDir = CurDir > Else > If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir > End If > If IsMissing(Filter) Then Filter = "" > If IsMissing(FilterIndex) Then FilterIndex = 1 > If IsMissing(Flags) Then Flags = 0& > If IsMissing(DefaultExt) Then DefaultExt = "" > If IsMissing(FileName) Then FileName = "" > If IsMissing(DialogTitle) Then DialogTitle = "" > If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp > If IsMissing(OpenFile) Then OpenFile = True > ' Allocate string space for the returned strings. > strFileName = Left(FileName & String(256, 0), 256) > strFileTitle = String(256, 0) > ' Set up the data structure before you call the function > With OFN > .lStructSize = Len(OFN) > .hwndOwner = hwnd > .strFilter = Filter > .nFilterIndex = FilterIndex > .strFile = strFileName > .nMaxFile = Len(strFileName) > .strFileTitle = strFileTitle > .nMaxFileTitle = Len(strFileTitle) > .strTitle = DialogTitle > .Flags = Flags > .strDefExt = DefaultExt > '.strInitialDir = CurDir > .strInitialDir = InitialDir > ' Didn't think most people would want to deal with > ' these options. > .hInstance = 0 > .strCustomFilter = "" > .nMaxCustFilter = 0 > .lpfnHook = 0 > End With > ' This will pass the desired data structure to the > ' Windows API, which will in turn it uses to display > ' the Open/Save As Dialog. > If OpenFile Then > fResult = adh_apiGetOpenFileName(OFN) > Else > fResult = adh_apiGetSaveFileName(OFN) > End If > ' The function call filled in the strFileTitle member > ' of the structure. You'll have to write special code > ' to retrieve that if you're interested. > If fResult Then > ' You might care to check the Flags member of the > ' structure to get information about the chosen file. > ' In this example, if you bothered to pass in a > ' value for Flags, we'll fill it in with the outgoing > ' Flags value. > If Not IsMissing(Flags) Then Flags = OFN.Flags > adhCommonFileOpenSave = adhTrimNull(OFN.strFile) > msgbox adhCommonFileOpenSave > Else > adhCommonFileOpenSave = Null > End If > End Function > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or received > it in error, please delete the message and notify sender. Views expressed > are those of the individual sender and are not necessarily the views of > their organisation. From John.Clark at niagaracounty.com Wed Jul 21 09:57:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Wed, 21 Jul 2004 10:57:42 -0400 Subject: [AccessD] Average ages Message-ID: Well, don't I feel the fool?! Thanks Gustav...as usual you have enlightened me! I have never used the 'Totals' feature before. I had basically thought it it would put the 'answer' at the end of the query or something. Thanks again...take care! John W Clark >>> gustav at cactus.dk 7/20/2004 2:24:24 PM >>> Hi John > This should be simple...I think I am just missing something simple (and > probably dumb). Yes, but you need to Group By no field and only Select Avg(Age). If you use your XAge, all Nulls count as Zero age which obstructs the average completely. /gustav > I have a query that has the following fields: > Client Name: UCase([txtLastName] & ", " & [txtFirstName]) > xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) > kSubContID > lnkClient > CareGiver (Criteria: True) > DatEntry (Criteria: >=#04/01/04#) > The SQL looks like this: > SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], > IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, > tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, > tblClient.datEntry > FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = > tblSubConts.lnkClient > WHERE (((tblSubConts.CareGiver)=True) AND > ((tblClient.datEntry)>=#4/1/2004#)) > ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), > tblClient.datEntry; > How do I get an average age for all of my clients in this query? I > think I could muddle through this easier in a report or form, but I just > needed a number, and I tried using the 'Totals' section for the query > and choosing 'Avg' for the 'xAge' field. This does not seem to work > though. > John W. Clark > Computer Programmer > Niagara County > Central Data Processing -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 21 10:27:52 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jul 2004 08:27:52 -0700 Subject: [AccessD] WindowsXP not recognizing ape Call Message-ID: Windows 95 used 16-bit API calls. Win98 could handle those or 32 bit calls. Win NT and up only handle the 32-bit calls and the names of some of the libraries and the types of some of the arguments are different. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 21, 2004 4:51 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] WindowsXP not recognizing ape Call Connie, I use the code I downloaded from Candace Tripp's website for this. It's been a while, but I remember that she has separate downloads for these operating systems, and that the code is slightly different, although I didn't understand the differences. I use the code as is on Windows XP PC's, and it works. Look at www.candace-tripp.com. Good Luck! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, July 20, 2004 8:26 PM To: accessd at databaseadvisors.com Subject: [AccessD] WindowsXP not recognising api Call Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 21 10:56:33 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 17:56:33 +0200 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <15824666248.20040721160024@cactus.dk> References: <000401c46f21$55b25150$de1811d8@danwaters> <15824666248.20040721160024@cactus.dk> Message-ID: <4131635629.20040721175633@cactus.dk> Hi Dan Or you may simply comment this line out: ' .strCustomFilter = "" Again, I'm not sure how the code will run on Win9x. /gustav > Hi Dan the Monkey (ape call?) > You probably need to set these values of the OFN structure: > .strCustomFilter = String(255, 0) > .nMaxCustFilter = 255 > If that works, could you please report if these settings work with Win9x too? > /gustav >> I use the code I downloaded from Candace Tripp's website for this. It's >> been a while, but I remember that she has separate downloads for these >> operating systems, and that the code is slightly different, although I >> didn't understand the differences. I use the code as is on Windows XP PC's, >> and it works. >> Look at www.candace-tripp.com. >> Good Luck! >> Dan Waters >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> connie.kamrowski at agric.nsw.gov.au >> Sent: Tuesday, July 20, 2004 8:26 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] WindowsXP not recognising api Call >> Ok further to last week I have been trying to find the problem with my >> inherited app. The api call works fine on windows98 and when taken to >> windows XP machines does not work. >> It throws no errors just does not open the Windows Open Save dialog box. >> The code is word for word to the Getz API call but when the XP machine >> reaches the >> If OpenFile Then >> fResult = adh_apiGetOpenFileName(OFN) >> Else >> fResult = adh_apiGetSaveFileName(OFN) >> End If >> It does not open the dialogue box. Running the same code side by side on >> the win98 machine I get the popup box every time. I have run a reference >> checker and it says all references are OK. >> The code is below if that helps. >> Connie Kamrowski >> Analyst/Programmer >> Information Technology >> NSW Department of Primary Industries >> Orange >> Ph: 02 6391 3250 >> Fax:02 6391 3290 >> Function adhCommonFileOpenSave( _ >> Optional ByRef Flags As Variant, _ >> Optional ByVal InitialDir As Variant, _ >> Optional ByVal Filter As Variant, _ >> Optional ByVal FilterIndex As Variant, _ >> Optional ByVal DefaultExt As Variant, _ >> Optional ByVal FileName As Variant, _ >> Optional ByVal DialogTitle As Variant, _ >> Optional ByVal hwnd As Variant, _ >> Optional ByVal OpenFile As Variant) As Variant >> ' This is the entry point you'll use to call the common >> ' file open/save dialog. The parameters are listed >> ' below, and all are optional. >> ' >> ' From Access 97 Developer's Handbook >> ' by Litwin, Getz and Gilbert. (Sybex) >> ' Copyright 1997. All Rights Reserved. >> ' >> ' In: >> ' Flags: one or more of the adhOFN_* constants, OR'd together. >> ' InitialDir: the directory in which to first look >> ' Filter: a set of file filters, set up by calling >> ' AddFilterItem. See examples. >> ' FilterIndex: 1-based integer indicating which filter >> ' set to use, by default (1 if unspecified) >> ' DefaultExt: Extension to use if the user doesn't enter one. >> ' Only useful on file saves. >> ' FileName: Default value for the file name text box. >> ' DialogTitle: Title for the dialog. >> ' OpenFile: Boolean(True=Open File/False=Save As) >> ' Out: >> ' Return Value: Either Null or the selected filename >> Dim OFN As tagOPENFILENAME >> Dim strFileName As String >> Dim strFileTitle As String >> Dim fResult As Boolean >> ' Give the dialog a caption title. >> 'If IsMissing(InitialDir) Then InitialDir = "" >> If IsMissing(InitialDir) Then >> InitialDir = CurDir >> Else >> If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir >> End If >> If IsMissing(Filter) Then Filter = "" >> If IsMissing(FilterIndex) Then FilterIndex = 1 >> If IsMissing(Flags) Then Flags = 0& >> If IsMissing(DefaultExt) Then DefaultExt = "" >> If IsMissing(FileName) Then FileName = "" >> If IsMissing(DialogTitle) Then DialogTitle = "" >> If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp >> If IsMissing(OpenFile) Then OpenFile = True >> ' Allocate string space for the returned strings. >> strFileName = Left(FileName & String(256, 0), 256) >> strFileTitle = String(256, 0) >> ' Set up the data structure before you call the function >> With OFN >> .lStructSize = Len(OFN) >> .hwndOwner = hwnd >> .strFilter = Filter >> .nFilterIndex = FilterIndex >> .strFile = strFileName >> .nMaxFile = Len(strFileName) >> .strFileTitle = strFileTitle >> .nMaxFileTitle = Len(strFileTitle) >> .strTitle = DialogTitle >> .Flags = Flags >> .strDefExt = DefaultExt >> '.strInitialDir = CurDir >> .strInitialDir = InitialDir >> ' Didn't think most people would want to deal with >> ' these options. >> .hInstance = 0 >> .strCustomFilter = "" >> .nMaxCustFilter = 0 >> .lpfnHook = 0 >> End With >> ' This will pass the desired data structure to the >> ' Windows API, which will in turn it uses to display >> ' the Open/Save As Dialog. >> If OpenFile Then >> fResult = adh_apiGetOpenFileName(OFN) >> Else >> fResult = adh_apiGetSaveFileName(OFN) >> End If >> ' The function call filled in the strFileTitle member >> ' of the structure. You'll have to write special code >> ' to retrieve that if you're interested. >> If fResult Then >> ' You might care to check the Flags member of the >> ' structure to get information about the chosen file. >> ' In this example, if you bothered to pass in a >> ' value for Flags, we'll fill it in with the outgoing >> ' Flags value. >> If Not IsMissing(Flags) Then Flags = OFN.Flags >> adhCommonFileOpenSave = adhTrimNull(OFN.strFile) >> msgbox adhCommonFileOpenSave >> Else >> adhCommonFileOpenSave = Null >> End If >> End Function From artful at rogers.com Wed Jul 21 11:48:15 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 12:48:15 -0400 Subject: [AccessD] Seconds Missing In-Reply-To: Message-ID: <017201c46f42$85072860$6601a8c0@rock> If it were I in your place, I would look instead at defaulting the datetime column in the SQL table to GetDate(), which will grab the system dateTime for you. Then you can direct your concerns to the data other than this column. I use this technique all the time and forget about the Access equivalents. What I care most about is when the row was inserted, so I'd leave it to SQL to determine that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Monday, July 19, 2004 9:18 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael From artful at rogers.com Wed Jul 21 11:53:24 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 12:53:24 -0400 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739611@bocnte2k4.boc.chevrontexaco.net> Message-ID: <017301c46f43$3d3e46c0$6601a8c0@rock> Why not modulus the year with 100 and grab the modulo? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Tuesday, July 20, 2004 8:07 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Date format problem That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 artful at rogers.com Wed Jul 21 12:03:17 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 13:03:17 -0400 Subject: [AccessD] Dlookup syntax In-Reply-To: <1976438147.20040721105636@cactus.dk> Message-ID: <017501c46f44$9e3e0360$6601a8c0@rock> Thanks for the tips. What really puzzles me is that no matter what values I supply, the first call works and the second call fails. Bizarre! I'm still investigating. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, July 21, 2004 4:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dlookup syntax Hi Arthur The syntax is OK. The expression, however, must contain the usual US formatted date(time) string: strDate = Format(d, "mm\/dd\/yyyy") Then: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & strDate & "#") And, as Charlotte points out, always take care of a possible Null return from DLookup(). /gustav > I can't remember how to format this! Bloddy L. The second thing to go > is memory. I forget what the first is. > Dim s as string > Dim x as Integer > Dim d as Date > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > Doesn't seem to work. What should I be doing instead? > TIA, > Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Wed Jul 21 12:18:22 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 21 Jul 2004 13:18:22 -0400 Subject: [AccessD] Date format problem Message-ID: ;) Be careful Arthur...you might introduce a programming bug for which there is no "catchy" name. We are all familiar with the millennium bug (every 1000 years), however your approach will only work through the year 9999. Unfortunately, the next catchy phrase in time scale terms will be the "Epoch bug" (for which there is no set timeframe, but is, at a minimum, 1 million years). Mark -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 21, 2004 12:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Why not modulus the year with 100 and grab the modulo? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Tuesday, July 20, 2004 8:07 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Date format problem That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 Drawbridge.Jack at ic.gc.ca Wed Jul 21 13:06:23 2004 From: Drawbridge.Jack at ic.gc.ca (Drawbridge.Jack at ic.gc.ca) Date: Wed, 21 Jul 2004 14:06:23 -0400 Subject: [AccessD] Claas modules Message-ID: <45C67756F7C0F942AD80AE35546F40C20DF7F62A@mb-bp-011.ic.gc.ca> See the following link for writeup by Jim DeMarco. It is very good. http://www.databaseadvisors.com/newletters/newsletter022002/0202ClassesForTh eMasses.htm Also check accessd for Class Modules , and for WithEvents People on accessd - John Colby and others have many interesting and helpful articles/messages and links. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bert-Jan Brinkhuis Sent: Tuesday, July 20, 2004 5:30 AM To: accessd at databaseadvisors.com Subject: [AccessD] Claas modules Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Wed Jul 21 16:57:46 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 21 Jul 2004 22:57:46 +0100 Subject: [AccessD] OT Ignore References: Message-ID: <001a01c46f6d$c2d98450$1c02a8c0@MARTINREID> Checking outside access From artful at rogers.com Wed Jul 21 18:48:01 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 19:48:01 -0400 Subject: [AccessD] Treeview Problems Message-ID: <01d501c46f7d$28caf000$6601a8c0@rock> Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. TIA, Arthur From connie.kamrowski at agric.nsw.gov.au Wed Jul 21 19:00:26 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 22 Jul 2004 10:00:26 +1000 Subject: [AccessD] Re: WindowsXP not recognizing ape Call -Solved. Message-ID: Gustav! That works perfectly, and also works in Win98. I would like to send you a bottle of good Australian wine for your trouble, but I don't know how it would travel. You have saved my sanity! I wonder if the not recognising Ape call was a problem for Tarzan Thankyou Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From lists at theopg.com Wed Jul 21 19:49:10 2004 From: lists at theopg.com (MarkH) Date: Thu, 22 Jul 2004 01:49:10 +0100 Subject: [AccessD] Treeview Problems In-Reply-To: <01d501c46f7d$28caf000$6601a8c0@rock> Message-ID: <000001c46f85$b39cfcc0$5e0d6bd5@netboxxp> Taking into account I'm on my third glass of wine and its real late... Not sure if I took it all in but I have a similar situation where for each node at a given level I want to create child nodes for all possible parameters etc. I make the index (key of the node) unique by combining the parameters (child) primary key with the parent nodes key. If I need to create relationships where none exist (i.e. to get all records etc.) I just create a dummy column in each query with the same value, e.g. "'asd' AS theKey" and join on that... Hth... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: 22 July 2004 00:48 To: AccessD Subject: [AccessD] Treeview Problems Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Wed Jul 21 21:28:00 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 21 Jul 2004 22:28:00 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <000001c46f85$b39cfcc0$5e0d6bd5@netboxxp> Message-ID: <001501c46f93$8555e0d0$0201a8c0@COA3> Well, I had 6 beers (and counting) ... But ... Shouldn't this already exist? > table (OrderDetailTypes) with one of each OrderDetailType... > so that there's a combo when choosing the detail type upon entry? If its not in a table, isn't it then a DISTINCT query, not a union, to get a single list of all existing types? And, further, wouldn't your key be: type & customer, (I don't like multi-column pk either, but I see no other choice) so if Select * where customer =1 and type = 4 returns no records, there are no child rows to add. I haven't seen your cool code for treeviews, but you may be up against a situation where you have to customize something non-re-usable ... Going now for # 7 Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MarkH Sent: Wednesday, July 21, 2004 8:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Treeview Problems Taking into account I'm on my third glass of wine and its real late... Not sure if I took it all in but I have a similar situation where for each node at a given level I want to create child nodes for all possible parameters etc. I make the index (key of the node) unique by combining the parameters (child) primary key with the parent nodes key. If I need to create relationships where none exist (i.e. to get all records etc.) I just create a dummy column in each query with the same value, e.g. "'asd' AS theKey" and join on that... Hth... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: 22 July 2004 00:48 To: AccessD Subject: [AccessD] Treeview Problems Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. 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 gustav at cactus.dk Thu Jul 22 03:10:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 10:10:44 +0200 Subject: [AccessD] Re: WindowsXP not recognizing ape Call -Solved. In-Reply-To: References: Message-ID: <1904040630.20040722101044@cactus.dk> Hi Connie Great! Now I can have the different code examples for the dialog cleaned up. Maybe I should go and get the bottle myself ... I've always wanted to visit Australia but never found the right occasion - now I have one reason more! /gustav > Gustav! > That works perfectly, and also works in Win98. > I would like to send you a bottle of good Australian wine for your trouble, > but I don't know how it would travel. You have saved my sanity! > I wonder if the not recognising Ape call was a problem for Tarzan > Thankyou > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 From gustav at cactus.dk Thu Jul 22 03:26:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 10:26:59 +0200 Subject: [AccessD] Treeview Problems In-Reply-To: <01d501c46f7d$28caf000$6601a8c0@rock> References: <01d501c46f7d$28caf000$6601a8c0@rock> Message-ID: <735015471.20040722102659@cactus.dk> Hi Arthur Your problem is that the tree structure you aim for is not a true branching tree structure as you at level 3 wish to list all possible order detail types instead of those actually used. However, it could be easily solved; you don't even need a union query, you just need to - as you state - list all possible types, regardless if they are used or not (that means just list them). I guess it will break the system in your fancy tree code but you can justify that for yourself by remembering that the code was created for the clean tree structure. /gustav > Some of you may have read my stuff about data-driven treeviews. Lately I > have run into a problem using my own code, and am looking for a graceful > way out. > If you've read or at least run the code, then you know that it reduces > the population of any given level to a simple select statement, using a > query, a table, a view or a UDF. > However, my current problem is this: > Let's suppose that you have parent table P and child table C, which > references an FK F (i.e. OrderDetailType.... Assuming that there can be > several types of OrderDetail, say CarRental, CampGroundSite, > CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney > Park, one of the most beautiful places in the world, so forgive my > examples)). > Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview > Level 3 is all the possible order detail types. TV 4 is the detail types > arranged under TV3. > I.e. > 1: > ABC Company > DEF Company > 2: > Order 123 from ABC > Order 125 from ABC > Order 126 from DEF > Order 139 from DEF > 3: > CarRental > CampGroundSite > CanoeRental > Etc. > 4: > Specific instances of CarRental, CampGroundSite, CanoeRental, etc. > My code so far can handle levels 1 and 2 easily, one statement per > level. > The problem is at level 3. I want to populate the treeview at level 3 > with all the order detail types (CarRental, CampGroundSite, CanoeRental, > etc.) for each Order. It's a simple UNION query to do this, but where do > I get the unique key? > Generalizing my problem, I have a simple (and dare I say it pretty cool) > way of populating the data-driven levels of a treeview. But that's > insufficient for my current problem. I need to populate the > OrderDetailTypes level with all possible order detail types and then > sub-populate level 4 with the corresponding children. I'm at a loss how > to achieve this. > One way to do it, which would fall conveniently into my current scheme, > is to populate a bridge table (OrderDetailTypes) with one of each > OrderDetailType... But that sucks, IMO. It stores a bunch of data that > is most of the time unnecessary. I HATE unnecessary detail! I'll go > there if I have to, but it makes me gag. > Generalizing the problem.... > Given: code that can populate any tree-level with a simple select > How to insert a level that is not data-driven or alternatively is > data-driven but not with related FKs > Treeview nodes insist upon unique keys (understandably so). But how > should I manufacture said unique keys given that no physical rows > correspond to them. > Maybe the generalization is: how to relate a grandchild to a parent in > the absence of parental data? That might be an incorrect phrasing, but > that's what I mean. > I hope that I have stated the problem clearly enough for you to follow > the logic. If not, please reply for further clarification. > Any suggestions much appreciated. > TIA, > Arthur From Drawbridge.Jack at ic.gc.ca Thu Jul 22 08:44:28 2004 From: Drawbridge.Jack at ic.gc.ca (Drawbridge.Jack at ic.gc.ca) Date: Thu, 22 Jul 2004 09:44:28 -0400 Subject: [AccessD] update query - question#1 Message-ID: <45C67756F7C0F942AD80AE35546F40C20DF7F62B@mb-bp-011.ic.gc.ca> Kathryn, Not sure if you have resolved this but here is SQL to try. Create a new query; go to SQL Mode and type this in. Then switch to Query Design and it will have the names and criteria. UPDATE tblCemeteries4Updating SET tblCemeteries4Updating.Surname = StrConv(Mid([Name],1,InStr([Name],",")-1),3) , tblCemeteries4Updating.FirstName = Mid([Name],InStr([Name],",")+1); If the format of Name always has the surName followed by a ",", then this should work. Good luck -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Monday, July 19, 2004 3:33 PM To: accessd at databaseadvisors.com Subject: [AccessD] update query - question#1 I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Thu Jul 22 09:56:13 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 10:56:13 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <735015471.20040722102659@cactus.dk> Message-ID: <02b601c46ffc$0860f470$6601a8c0@rock> Thanks for replying, Gustav. The part I'm having difficulty getting my head around is this. Suppose 4 levels in the tree: Customer Order All Possible Detail Types Specific Detail of type x My code can handle levels 1 and 2 with one statement each. No problem. Level 3 I can write with individual "Add" statements. But now what? How can I relate level 4, which should be as easily handled as levels 1 and 2, i.e. with one statement that mentions the parent key? I don't have a parent key, or maybe I do, but I can't see it. At the moment, I'm thinking that the only way to achieve what I want is to manufacture a bridge table called OrderDetailTypes and automatically add N rows to this every time a new Order is created. Such a solution makes my stomach turn, but at the moment I don't see another solution. Any advice appreciated, Arthur P.S. Thanks for the rationalization (justification) you offered. Next time I fight with my girl friend, I'll request more rationalizations :) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 22, 2004 4:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Treeview Problems Hi Arthur Your problem is that the tree structure you aim for is not a true branching tree structure as you at level 3 wish to list all possible order detail types instead of those actually used. However, it could be easily solved; you don't even need a union query, you just need to - as you state - list all possible types, regardless if they are used or not (that means just list them). I guess it will break the system in your fancy tree code but you can justify that for yourself by remembering that the code was created for the clean tree structure. /gustav > Some of you may have read my stuff about data-driven treeviews. Lately > I have run into a problem using my own code, and am looking for a > graceful way out. > If you've read or at least run the code, then you know that it reduces > the population of any given level to a simple select statement, using > a query, a table, a view or a UDF. > However, my current problem is this: > Let's suppose that you have parent table P and child table C, which > references an FK F (i.e. OrderDetailType.... Assuming that there can > be several types of OrderDetail, say CarRental, CampGroundSite, > CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney > Park, one of the most beautiful places in the world, so forgive my > examples)). > Assume that Treeview level 1 is Customer. TV level 2 is Orders. > Treeview Level 3 is all the possible order detail types. TV 4 is the > detail types arranged under TV3. > I.e. > 1: > ABC Company > DEF Company > 2: > Order 123 from ABC > Order 125 from ABC > Order 126 from DEF > Order 139 from DEF > 3: > CarRental > CampGroundSite > CanoeRental > Etc. > 4: > Specific instances of CarRental, CampGroundSite, CanoeRental, etc. > My code so far can handle levels 1 and 2 easily, one statement per > level. > The problem is at level 3. I want to populate the treeview at level 3 > with all the order detail types (CarRental, CampGroundSite, > CanoeRental, > etc.) for each Order. It's a simple UNION query to do this, but where do > I get the unique key? > Generalizing my problem, I have a simple (and dare I say it pretty > cool) way of populating the data-driven levels of a treeview. But > that's insufficient for my current problem. I need to populate the > OrderDetailTypes level with all possible order detail types and then > sub-populate level 4 with the corresponding children. I'm at a loss > how to achieve this. > One way to do it, which would fall conveniently into my current > scheme, is to populate a bridge table (OrderDetailTypes) with one of > each OrderDetailType... But that sucks, IMO. It stores a bunch of data > that is most of the time unnecessary. I HATE unnecessary detail! I'll > go there if I have to, but it makes me gag. > Generalizing the problem.... > Given: code that can populate any tree-level with a simple select How > to insert a level that is not data-driven or alternatively is > data-driven but not with related FKs Treeview nodes insist upon unique > keys (understandably so). But how should I manufacture said unique > keys given that no physical rows correspond to them. > Maybe the generalization is: how to relate a grandchild to a parent in > the absence of parental data? That might be an incorrect phrasing, but > that's what I mean. > I hope that I have stated the problem clearly enough for you to follow > the logic. If not, please reply for further clarification. > Any suggestions much appreciated. > TIA, > Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Thu Jul 22 10:31:58 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 22 Jul 2004 10:31:58 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From gustav at cactus.dk Thu Jul 22 10:42:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 17:42:39 +0200 Subject: [AccessD] Treeview Problems In-Reply-To: <02b601c46ffc$0860f470$6601a8c0@rock> References: <02b601c46ffc$0860f470$6601a8c0@rock> Message-ID: <6631155819.20040722174239@cactus.dk> Hi Arthur Yes I can see your problem at connecting level 3 and 4. Although your stomach may face a hard time I think that's a possible route, though you - as far as I can see - wouldn't need (to fill) a bridging table but could use a view or query where you bring the PK of the orderdetail record forward together with the list of all orderdetail types. Then you will at level 4 have that PK and all order types and can select any of these even if the picked combination doesn't carry any actual orderdetails of that type. I haven't your code at hand so I cannot verify if this is possible. /gustav > Thanks for replying, Gustav. The part I'm having difficulty getting my > head around is this. Suppose 4 levels in the tree: > Customer > Order > All Possible Detail Types > Specific Detail of type x > My code can handle levels 1 and 2 with one statement each. No problem. > Level 3 I can write with individual "Add" statements. But now what? How > can I relate level 4, which should be as easily handled as levels 1 and > 2, i.e. with one statement that mentions the parent key? I don't have a > parent key, or maybe I do, but I can't see it. > At the moment, I'm thinking that the only way to achieve what I want is > to manufacture a bridge table called OrderDetailTypes and automatically > add N rows to this every time a new Order is created. Such a solution > makes my stomach turn, but at the moment I don't see another solution. > Any advice appreciated, > Arthur > P.S. > Thanks for the rationalization (justification) you offered. Next time I > fight with my girl friend, I'll request more rationalizations :) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock > Sent: Thursday, July 22, 2004 4:27 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Treeview Problems > Hi Arthur > Your problem is that the tree structure you aim for is not a true > branching tree structure as you at level 3 wish to list all possible > order detail types instead of those actually used. > However, it could be easily solved; you don't even need a union query, > you just need to - as you state - list all possible types, regardless if > they are used or not (that means just list them). I guess it will break > the system in your fancy tree code but you can justify that for yourself > by remembering that the code was created for the clean tree structure. > /gustav >> Some of you may have read my stuff about data-driven treeviews. Lately >> I have run into a problem using my own code, and am looking for a >> graceful way out. >> If you've read or at least run the code, then you know that it reduces >> the population of any given level to a simple select statement, using >> a query, a table, a view or a UDF. >> However, my current problem is this: >> Let's suppose that you have parent table P and child table C, which >> references an FK F (i.e. OrderDetailType.... Assuming that there can >> be several types of OrderDetail, say CarRental, CampGroundSite, >> CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney >> Park, one of the most beautiful places in the world, so forgive my >> examples)). >> Assume that Treeview level 1 is Customer. TV level 2 is Orders. >> Treeview Level 3 is all the possible order detail types. TV 4 is the >> detail types arranged under TV3. >> I.e. >> 1: >> ABC Company >> DEF Company >> 2: >> Order 123 from ABC >> Order 125 from ABC >> Order 126 from DEF >> Order 139 from DEF >> 3: >> CarRental >> CampGroundSite >> CanoeRental >> Etc. >> 4: >> Specific instances of CarRental, CampGroundSite, CanoeRental, etc. >> My code so far can handle levels 1 and 2 easily, one statement per >> level. >> The problem is at level 3. I want to populate the treeview at level 3 >> with all the order detail types (CarRental, CampGroundSite, >> CanoeRental, >> etc.) for each Order. It's a simple UNION query to do this, but where > do >> I get the unique key? >> Generalizing my problem, I have a simple (and dare I say it pretty >> cool) way of populating the data-driven levels of a treeview. But >> that's insufficient for my current problem. I need to populate the >> OrderDetailTypes level with all possible order detail types and then >> sub-populate level 4 with the corresponding children. I'm at a loss >> how to achieve this. >> One way to do it, which would fall conveniently into my current >> scheme, is to populate a bridge table (OrderDetailTypes) with one of >> each OrderDetailType... But that sucks, IMO. It stores a bunch of data >> that is most of the time unnecessary. I HATE unnecessary detail! I'll >> go there if I have to, but it makes me gag. >> Generalizing the problem.... >> Given: code that can populate any tree-level with a simple select How >> to insert a level that is not data-driven or alternatively is >> data-driven but not with related FKs Treeview nodes insist upon unique >> keys (understandably so). But how should I manufacture said unique >> keys given that no physical rows correspond to them. >> Maybe the generalization is: how to relate a grandchild to a parent in >> the absence of parental data? That might be an incorrect phrasing, but >> that's what I mean. >> I hope that I have stated the problem clearly enough for you to follow >> the logic. If not, please reply for further clarification. >> Any suggestions much appreciated. >> TIA, >> Arthur From DWUTKA at marlow.com Thu Jul 22 10:55:48 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jul 2004 10:55:48 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB17B@main2.marlow.com> Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Thu Jul 22 11:01:02 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 22 Jul 2004 11:01:02 -0500 (CDT) Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <1976438147.20040721105636@cactus.dk> References: <003601c46e98$963226d0$6601a8c0@rock> <1976438147.20040721105636@cactus.dk> Message-ID: <2024.216.43.21.235.1090512062.squirrel@cetus.email.starband.net> Hi everyone! I'm not sure how to do this, or if it can even be done. Currently using Access 97 on WinXP. The application is a secured (through access workgroup/users) database front end. At this point, I have no customized toolbars or menus, just using the standard ones. The client has found that some of the users have messed with the toolbars (dragged them off to who knows where...) and afterwards can't get to them when they really do need them. I eventually plan to have customized toolbars and menubars for them, but this question will apply to them as well, even though they're not ready yet. Is there a way to lock the menubar and toolbar in place using vb code or some other way of automatically locking them? I know it can be done in Access on each workstation, but these pc's are all over the place and I don't want to tell their MIS that he has to go around to each computer and lock the toolbars in place. That would gain me MORE than just a dirty look. Explicit hand signals might be involved.... Any help would be greatly appreciated. TIA! Greg Smith gregsmith at starband.net From kaupca at chevrontexaco.com Thu Jul 22 11:13:57 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jul 2004 11:13:57 -0500 Subject: [AccessD] Restrict data entry from form into table Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> I have a form for data entry into a table. The first field, date, is automatically filled in from a selection on another form. The second field is a drop down list box. The third field is to enter a numeric value. For any given date I need to let the user only select a particular item from the drop down list in the second field once. Is this possible through indexing or some other method? I am drawing a blank here. Thanks Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From BBarabash at TappeConstruction.com Thu Jul 22 11:36:53 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 22 Jul 2004 11:36:53 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB0865065850@tccexch01.tappeconstruction.net> Hmm... Just did a PlanetSourceCode.com search on named pipes, and received 3 hits. Guess which one I downloaded? Hint: http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=40065& lngWId=1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, July 22, 2004 10:56 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Network registry? Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From artful at rogers.com Thu Jul 22 12:06:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 13:06:50 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <6631155819.20040722174239@cactus.dk> Message-ID: <02e201c4700e$47a909d0$6601a8c0@rock> Thanks! I think you may be onto something here. There's no reason that a view can't be a relational multiplication. The trick is going to be devising the unique keys of its rows, and relating those to level 4, but I think that I can pull that off. Thanks again for the pointer! Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 22, 2004 11:43 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Treeview Problems Hi Arthur Yes I can see your problem at connecting level 3 and 4. Although your stomach may face a hard time I think that's a possible route, though you - as far as I can see - wouldn't need (to fill) a bridging table but could use a view or query where you bring the PK of the orderdetail record forward together with the list of all orderdetail types. Then you will at level 4 have that PK and all order types and can select any of these even if the picked combination doesn't carry any actual orderdetails of that type. I haven't your code at hand so I cannot verify if this is possible. /gustav > Thanks for replying, Gustav. The part I'm having difficulty getting my > head around is this. Suppose 4 levels in the tree: > Customer > Order > All Possible Detail Types > Specific Detail of type x > My code can handle levels 1 and 2 with one statement each. No problem. > Level 3 I can write with individual "Add" statements. But now what? > How can I relate level 4, which should be as easily handled as levels > 1 and 2, i.e. with one statement that mentions the parent key? I don't > have a parent key, or maybe I do, but I can't see it. > At the moment, I'm thinking that the only way to achieve what I want > is to manufacture a bridge table called OrderDetailTypes and > automatically add N rows to this every time a new Order is created. > Such a solution makes my stomach turn, but at the moment I don't see > another solution. > Any advice appreciated, > Arthur > P.S. > Thanks for the rationalization (justification) you offered. Next time > I fight with my girl friend, I'll request more rationalizations :) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav > Brock > Sent: Thursday, July 22, 2004 4:27 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Treeview Problems > Hi Arthur > Your problem is that the tree structure you aim for is not a true > branching tree structure as you at level 3 wish to list all possible > order detail types instead of those actually used. > However, it could be easily solved; you don't even need a union query, > you just need to - as you state - list all possible types, regardless > if they are used or not (that means just list them). I guess it will > break the system in your fancy tree code but you can justify that for > yourself by remembering that the code was created for the clean tree > structure. > /gustav >> Some of you may have read my stuff about data-driven treeviews. >> Lately >> I have run into a problem using my own code, and am looking for a >> graceful way out. >> If you've read or at least run the code, then you know that it >> reduces >> the population of any given level to a simple select statement, using >> a query, a table, a view or a UDF. >> However, my current problem is this: >> Let's suppose that you have parent table P and child table C, which >> references an FK F (i.e. OrderDetailType.... Assuming that there can >> be several types of OrderDetail, say CarRental, CampGroundSite, >> CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney >> Park, one of the most beautiful places in the world, so forgive my >> examples)). >> Assume that Treeview level 1 is Customer. TV level 2 is Orders. >> Treeview Level 3 is all the possible order detail types. TV 4 is the >> detail types arranged under TV3. >> I.e. >> 1: >> ABC Company >> DEF Company >> 2: >> Order 123 from ABC >> Order 125 from ABC >> Order 126 from DEF >> Order 139 from DEF >> 3: >> CarRental >> CampGroundSite >> CanoeRental >> Etc. >> 4: >> Specific instances of CarRental, CampGroundSite, CanoeRental, etc. >> My code so far can handle levels 1 and 2 easily, one statement per >> level. >> The problem is at level 3. I want to populate the treeview at level 3 >> with all the order detail types (CarRental, CampGroundSite, >> CanoeRental, >> etc.) for each Order. It's a simple UNION query to do this, but where > do >> I get the unique key? >> Generalizing my problem, I have a simple (and dare I say it pretty >> cool) way of populating the data-driven levels of a treeview. But >> that's insufficient for my current problem. I need to populate the >> OrderDetailTypes level with all possible order detail types and then >> sub-populate level 4 with the corresponding children. I'm at a loss >> how to achieve this. >> One way to do it, which would fall conveniently into my current >> scheme, is to populate a bridge table (OrderDetailTypes) with one of >> each OrderDetailType... But that sucks, IMO. It stores a bunch of data >> that is most of the time unnecessary. I HATE unnecessary detail! I'll >> go there if I have to, but it makes me gag. >> Generalizing the problem.... >> Given: code that can populate any tree-level with a simple select How >> to insert a level that is not data-driven or alternatively is >> data-driven but not with related FKs Treeview nodes insist upon unique >> keys (understandably so). But how should I manufacture said unique >> keys given that no physical rows correspond to them. >> Maybe the generalization is: how to relate a grandchild to a parent in >> the absence of parental data? That might be an incorrect phrasing, but >> that's what I mean. >> I hope that I have stated the problem clearly enough for you to >> follow >> the logic. If not, please reply for further clarification. >> Any suggestions much appreciated. >> TIA, >> Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 22 13:01:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 22 Jul 2004 11:01:16 -0700 Subject: [AccessD] Restrict data entry from form into table References: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> Message-ID: <00f601c47015$e29bec30$6601a8c0@HAL9002> Chester: Instead of datasheet view use continuous form. Then you can set the Enabled and Locked properties of each field individually. HTH Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Kaup, Chester A" To: Sent: Thursday, July 22, 2004 9:13 AM Subject: [AccessD] Restrict data entry from form into table I have a form for data entry into a table. The first field, date, is automatically filled in from a selection on another form. The second field is a drop down list box. The third field is to enter a numeric value. For any given date I need to let the user only select a particular item from the drop down list in the second field once. Is this possible through indexing or some other method? I am drawing a blank here. Thanks Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 Thu Jul 22 13:04:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 11:04:12 -0700 Subject: [AccessD] Toolbar/Menubar Locking Message-ID: One of the properties of the individual toolbar/menubars is Allow Customizing and another is Allow Moving. If both of those are turned off for each toolbar/menubar that should stop the users from shooting themselves in the foot, at least in your application. Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 22, 2004 8:01 AM To: accessd at databaseadvisors.com Subject: [AccessD] Toolbar/Menubar Locking Hi everyone! I'm not sure how to do this, or if it can even be done. Currently using Access 97 on WinXP. The application is a secured (through access workgroup/users) database front end. At this point, I have no customized toolbars or menus, just using the standard ones. The client has found that some of the users have messed with the toolbars (dragged them off to who knows where...) and afterwards can't get to them when they really do need them. I eventually plan to have customized toolbars and menubars for them, but this question will apply to them as well, even though they're not ready yet. Is there a way to lock the menubar and toolbar in place using vb code or some other way of automatically locking them? I know it can be done in Access on each workstation, but these pc's are all over the place and I don't want to tell their MIS that he has to go around to each computer and lock the toolbars in place. That would gain me MORE than just a dirty look. Explicit hand signals might be involved.... Any help would be greatly appreciated. TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 22 13:15:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jul 2004 13:15:31 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB17E@main2.marlow.com> LOL. Those classes are pretty easy to use. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 11:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? Hmm... Just did a PlanetSourceCode.com search on named pipes, and received 3 hits. Guess which one I downloaded? Hint: http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=40065& lngWId=1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, July 22, 2004 10:56 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Network registry? Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jul 22 14:31:15 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jul 2004 20:31:15 +0100 Subject: [AccessD] Restrict data entry from form into table In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> Message-ID: <001201c47022$74634bc0$b274d0d5@minster33c3r25> Chester If you set an index on the date plus the second field and make it Unique won't that do it? They'll still be able to select the 'wrong' value from the dropdown but Access will error when they try to save that record. You can have an error handler to intercept the errror and give a neater message if you want to. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kaup, Chester A > Sent: 22 July 2004 17:14 > To: accessd at databaseadvisors.com > Subject: [AccessD] Restrict data entry from form into table > > > I have a form for data entry into a table. The first field, > date, is automatically filled in from a selection on another > form. The second field is a drop down list box. The third > field is to enter a numeric value. For any given date I need > to let the user only select a particular item from the drop > down list in the second field once. Is this possible through > indexing or some other method? I am drawing a blank here. Thanks > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However > a large number of electrons were terribly inconvenienced. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From cfoust at infostatsystems.com Thu Jul 22 15:59:27 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 13:59:27 -0700 Subject: [AccessD] Database Conversion in VBA Message-ID: Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust From artful at rogers.com Thu Jul 22 17:02:56 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 18:02:56 -0400 Subject: [AccessD] Database Conversion in VBA In-Reply-To: Message-ID: <034c01c47037$a4f728f0$6601a8c0@rock> Is there something wrong with doing it in the menu? Do you need to do it programmatically? If so, there must be constants that you can pass in to DoCmd that will achieve same. Never had the need to do it yet but what's wrong with the menu options themselves? Just asking Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 22, 2004 4:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Database Conversion in VBA Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jul 22 17:13:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 15:13:03 -0700 Subject: [AccessD] Database Conversion in VBA Message-ID: We need to examine a datafile in code and convert it if it is in 2002 format. Our users don't see the menu to do this, and we couldn't safely leave it to them anyhow. There are no constants except acCmdConvertDatabase, and the only code I've seen used SendKeys to run that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be running this in the current database, it becomes problematic. Charlotte Foust -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Thursday, July 22, 2004 2:03 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Database Conversion in VBA Is there something wrong with doing it in the menu? Do you need to do it programmatically? If so, there must be constants that you can pass in to DoCmd that will achieve same. Never had the need to do it yet but what's wrong with the menu options themselves? Just asking Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 22, 2004 4:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Database Conversion in VBA Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jul 22 17:21:11 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 22 Jul 2004 22:21:11 +0000 Subject: [AccessD] Launch Access From Batch Message-ID: Hello All, Have a batch file that opens A97db...if you run the batch on the server...it runs fine...but if you call it remotely from AS400...it hangs on the statement in the batch were you execute the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Planning a family vacation? Check out the MSN Family Travel guide! http://dollar.msn.com From d.dick at uws.edu.au Thu Jul 22 18:28:29 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 23 Jul 2004 09:28:29 +1000 Subject: [AccessD] Toolbar/Menubar Locking References: <003601c46e98$963226d0$6601a8c0@rock><1976438147.20040721105636@cactus.dk> <2024.216.43.21.235.1090512062.squirrel@cetus.email.starband.net> Message-ID: <000c01c47043$989a5f30$48619a89@DDICK> Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently using > Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, just > using the standard ones. The client has found that some of the users have > messed with the toolbars (dragged them off to who knows where...) and > afterwards can't get to them when they really do need them. > > I eventually plan to have customized toolbars and menubars for them, but > this question will apply to them as well, even though they're not ready > yet. > > Is there a way to lock the menubar and toolbar in place using vb code or > some other way of automatically locking them? I know it can be done in > Access on each workstation, but these pc's are all over the place and I > don't want to tell their MIS that he has to go around to each computer and > lock the toolbars in place. That would gain me MORE than just a dirty > look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 22 19:27:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jul 2004 17:27:14 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Message-ID: <41005B62.30902@shaw.ca> Just for Info. One other thing to do is file a copyright, you have a copyright automatically but you cannot sue for infringement, unless it is registered This costs $30. You send in roughly first and last 25 pages of source code with blocked out trade secrets. Government processing time is six months. For US details see: Copyright Registration for Computer Programs http://www.copyright.gov/circs/circ61.html#deposit Rocky Smolin - Beach Access Software wrote: >Marty: > >Every place I've done work where there were mdw's involved the problems >ranged from nuisance to nightmare. Since this is my proprietary product and >I'm hoping to have lots of them installed around the world over the next few >years (hope springs eternal) I'm really reluctant to start down that road. > >I think I've convinced my Chinese distributor, who started all this, that >having the back end open while the front end is totally protected, is the >best of both worlds. > >Rocky > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 9:50 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>Well if you were the owner through mdw you could, everyone else would >>have to go through a query. >>This assumes the mdw is crackable. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>Marty: >>> >>>Why couldn't they just go directly into the back end and open the table >>> >>> >in > > >>>design view? >>> >>>Rocky >>> >>> >>>----- Original Message ----- >>>From: "MartyConnelly" >>>To: "Access Developers discussion and problem solving" >>> >>>Sent: Thursday, July 15, 2004 6:40 PM >>>Subject: Re: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I came across this today under the Access ORK.You might be able to hide >>>>the design this way. >>>>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >>>> >>>>Using the RunPermissions Property with User-Level Security >>>>In order for Microsoft Access to display a table or query, it must read >>>>the design of that table or query. As a result, in order for a user to >>>>read and display the data in a table or query, that user must also have >>>>permission to read the design of the table or query. >>>>If you dont want your users to see the design of your table or query, >>>>you can create a query and set its RunPermissions property to restrict >>>>their access to this information. >>>>Set it up and test against one of the access reengineering case tools >>>>like Sparxs or EZDesign. >>>> >>>>Rocky Smolin - Beach Access Software wrote: >>>> >>>> >>>> >>>> >>>> >>>>>One of the great advantages of Access is that the user can work with >>>>> >>>>> >the > > >>>>>data apart from the front end app. It's transparency is a real >>>>> >>>>> >marketing > > >>>>>plus. So I'd like to leave the back end open. I think it will be >>>>>beneficial. >>>>> >>>>>Rocky >>>>> >>>>>----- Original Message ----- >>>>>From: "Andy Lacey" >>>>>To: "'Access Developers discussion and problem solving'" >>>>> >>>>>Sent: Wednesday, June 23, 2004 11:36 AM >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>I'm going to sound a dissenting voice here. I don't understand why >>>>>> >>>>>> >>>>>> >>>>>> >>>Rocky, >>> >>> >>> >>> >>>>>>who's no doubt sweat blood to develop his vertical app, should in >>>>>> >>>>>> >effect > > >>>>>>give his system away? Because surely that's what he'd be doing? The >>>>>> >>>>>> >only > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>way >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>doing a development like this makes sense is to get economies of scale >>>>>> >>>>>> >>>>>> >>>>>> >>>by >>> >>> >>> >>> >>>>>>selling lots of copies. Without that incentive vertical apps would >>>>>> >>>>>> >never > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>get >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>developed at all because, in the main, a single customer can't stand >>>>>> >>>>>> >all > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>the >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>development costs. And if you're going to put in the graft why >>>>>> >>>>>> >shouldn't > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>you >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>dream of making money on it, and why should you open yourself to being >>>>>>ripped-off by people who can't be arsed to do the hard work >>>>>> >>>>>> >themselves? > > >>>>>>Sorry, don't understand. >>>>>> >>>>>>-- Andy Lacey >>>>>>http://www.minstersystems.co.uk >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>>>-----Original Message----- >>>>>>>From: accessd-bounces at databaseadvisors.com >>>>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>>>DWUTKA at marlow.com >>>>>>>Sent: 23 June 2004 18:30 >>>>>>>To: accessd at databaseadvisors.com >>>>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>>>> >>>>>>> >>>>>>>'Open source' should pervade into all areas of the >>>>>>>information age. Music, programming, videos, etc. >>>>>>>Unfortunately it will take a complete change in humanity's >>>>>>>driving force....the accumulation of wealth. As long as >>>>>>>people are trying to make a buck, it will be virtually >>>>>>>impossible to get them to do stuff simply for the betterment >>>>>>>of society. >>>>>>> >>>>>>>Drew >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>-- >>>>>>_______________________________________________ >>>>>>AccessD mailing list >>>>>>AccessD at databaseadvisors.com >>>>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>>>Website: http://www.databaseadvisors.com >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>>-- >>>>Marty Connelly >>>>Victoria, B.C. >>>>Canada >>>> >>>> >>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >> >> >> > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jul 22 20:02:34 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jul 2004 18:02:34 -0700 Subject: [AccessD] OT: Network registry? References: <2F8793082E00D4119A1700B0D0216BF8031BB17B@main2.marlow.com> Message-ID: <410063AA.3000406@shaw.ca> You could also use ADSI scripts to add this info into a registry key on each clients machine from a network admin account. Use the ADsSecurity.dll COM component from the ADSI SDK (Win2000) or the built-in AdsSecurityUtility object on WinXP. It has a COM interface as well as an API interface. This is not easy stuff! But it would give the BOFH heart failure. No, I have not done this before but should be possible to write from vbs or Access. DWUTKA at marlow.com wrote: >Along the lines of the window service, I would recommend going with Named >Pipes. They're pretty easy to setup, and they're fast. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash >Sent: Thursday, July 22, 2004 10:32 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] OT: Network registry? > > >Here's the problem. I have an encrypted piece of information that I >want to share with every computer in my network (~70 machines). This >information can change at any time so it would be difficult to store it >locally on each workstation. > >Currently I am storing this information in an INI file on a network >share, which causes a series of problems: >- I need to hard code the INI file location in the code accessing the >data. If the file location changes, I would need to update all of the >workstations. >- All users accessing this file need the appropriate file permissions. >There really isn't a single network location that ALL users in this >building access. > >I was thinking of writing a Windows service that could run on one of the >servers, that could monitor incoming requests from client workstations, >and return the encrypted data. That way, one would only need to know >the local IP address of the server, which is unlikely to change. > >Any other ideas? > >Brett Barabash >Lead Software Developer >Tappe Construction, Co. >Eagan, MN > >Email: bbarabash at tappeconstruction.com >Phone: (651) 256-6831 > >"Intel Inside: The world's most widely used warning label" - Jim Hopper > > > >---------------------------------------------------------------------------- >---------------------------------------- >The information in this email may contain confidential information that >is legally privileged. The information is only for the use of the intended >recipient(s) named above. If you are not the intended recipient(s), you >are hereby notified that any disclosure, copying, distribution, or the >taking >of any action in regard to the content of this email is strictly prohibited. >If >transmission is incorrect, unclear, or incomplete, please notify the sender >immediately. The authorized recipient(s) of this information is/are >prohibited >from disclosing this information to any other party and is/are required to >destroy the information after its stated need has been fulfilled. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >This footer also confirms that this email message has been scanned >for the presence of computer viruses.Scanning of this message and >addition of this footer is performed by SurfControl E-mail Filter software >in conjunction with virus detection software. >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > -- Marty Connelly Victoria, B.C. Canada From dwaters at usinternet.com Thu Jul 22 20:45:04 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 22 Jul 2004 20:45:04 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <000001c47056$ad0f5ca0$de1811d8@danwaters> In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters From jmhla at earthlink.net Fri Jul 23 00:14:09 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Thu, 22 Jul 2004 22:14:09 -0700 Subject: [AccessD] Hit the Wall? In-Reply-To: <000001c47056$ad0f5ca0$de1811d8@danwaters> Message-ID: <200407230513.i6N5DtQ05147@databaseadvisors.com> Dan Max number of fields in a table =255. Look at your design. You probably need to normalize the table and make several fields across multiple tables. Joe Hecht jmhla at earthlink.net 28g -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 6:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael at ddisolutions.com.au Fri Jul 23 00:40:55 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Fri, 23 Jul 2004 15:40:55 +1000 Subject: [AccessD] Hit the Wall? Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AB1@ddi-pdc.ddisolutions.ddisolutions.com.au> No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 01:36:02 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 08:36:02 +0200 Subject: [AccessD] OT: Network registry? In-Reply-To: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> Message-ID: <1901759800.20040723083602@cactus.dk> Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store it > locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of the > servers, that could monitor incoming requests from client workstations, > and return the encrypted data. That way, one would only need to know > the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 From stephen at bondsoftware.co.nz Fri Jul 23 05:43:08 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 22:43:08 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Access 2000 - In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). Any Ideas? TIA Stephen Bond Otatara, New Zealand From gustav at cactus.dk Fri Jul 23 05:59:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 12:59:03 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Message-ID: <11417541363.20040723125903@cactus.dk> Hi Stephen How do you specify it in the report's headings and groupings specification? You may need to write the original expression: =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) Is startdate included as i (not visible) textbox in the report? /gustav > Access 2000 - > In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. > I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed > incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms > (there will be but I have removed it to attempt to solve this). > Any Ideas? > TIA > Stephen Bond > Otatara, New Zealand From andy at minstersystems.co.uk Fri Jul 23 06:03:04 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 23 Jul 2004 12:03:04 +0100 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <20040723110301.B4392252701@smtp.nildram.co.uk> Stephen How about trying this. Create a public function to which you pass StartDate and which returns the correct Year. Then replace your IIF test in the query with the function call and group on that. Might make the SQL 'simpler' so Access can cope. Haven't tried it but may work. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: [AccessD] Report Grouping on a derived query field Date: 23/07/04 10:56 > > Access 2000 - > In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. > > I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). > > Any Ideas? > > TIA > Stephen Bond > Otatara, New Zealand > > > > -- > _______________________________________________ > 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 stephen at bondsoftware.co.nz Fri Jul 23 06:08:33 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:08:33 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> Hi Gustav, you're up early! 11pm Friday here. In the report, I am using the field FY. It presents in the Field List, and in the Sorting And Grouping drop box. startDate is included in the detail line of the report. Will try your suggestion and let you know. Stephen Bond > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Friday, 23 July 2004 10:59 p.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Report Grouping on a derived query field > > > Hi Stephen > > How do you specify it in the report's headings and groupings > specification? > You may need to write the original expression: > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > Is startdate included as i (not visible) textbox in the report? > > /gustav > > > > Access 2000 - > > In a query which feeds a report I have a derived field. It > is derived directly from a date field in one of the > contributing tables, thus: > > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > > The query runs perfectly, and gives me values like 2003, > 2004 etc in the FY field. > > > I am using this derived field, FY, as a grouping level (the > only grouping level) in the report. When I run the report, > it bombs off immediately with the error message "The > expression is typed > > incorrectly, or is too complex to be evaluated ..." and > more stuff about simplifying the expression. When I remove > the Grouping Level completely the report runs. There is no > code-behind-forms > > (there will be but I have removed it to attempt to solve this). > > > Any Ideas? > > > TIA > > Stephen Bond > > Otatara, New Zealand > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stephen at bondsoftware.co.nz Fri Jul 23 06:16:20 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:16:20 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DB@server.bondsoftware.co.nz> Andy, thanks, tried that and same result. Stephen > -----Original Message----- > From: Andy Lacey [mailto:andy at minstersystems.co.uk] > Sent: Friday, 23 July 2004 11:03 p.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Report Grouping on a derived query field > > > Stephen > How about trying this. Create a public function to which you > pass StartDate > and which returns the correct Year. Then replace your IIF > test in the query > with the function call and group on that. Might make the SQL > 'simpler' so > Access can cope. Haven't tried it but may work. > > > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Fri Jul 23 06:16:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 13:16:19 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> Message-ID: <14518576661.20040723131619@cactus.dk> Hi Stephen > Hi Gustav, you're up early! 11pm Friday here. Oh not at all, I'm in Europe - it's 13.00 hours here. > In the report, I am using the field FY. It presents in the Field List, and in the Sorting And Grouping drop box. > startDate is included in the detail line of the report. > Will try your suggestion and let you know. OK. /gustav > Stephen Bond >> -----Original Message----- >> From: Gustav Brock [mailto:gustav at cactus.dk] >> Sent: Friday, 23 July 2004 10:59 p.m. >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Report Grouping on a derived query field >> >> >> Hi Stephen >> >> How do you specify it in the report's headings and groupings >> specification? >> You may need to write the original expression: >> >> =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) >> >> Is startdate included as i (not visible) textbox in the report? >> >> /gustav >> >> >> > Access 2000 - >> > In a query which feeds a report I have a derived field. It >> is derived directly from a date field in one of the >> contributing tables, thus: >> >> > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) >> >> > The query runs perfectly, and gives me values like 2003, >> 2004 etc in the FY field. >> >> > I am using this derived field, FY, as a grouping level (the >> only grouping level) in the report. When I run the report, >> it bombs off immediately with the error message "The >> expression is typed >> > incorrectly, or is too complex to be evaluated ..." and >> more stuff about simplifying the expression. When I remove >> the Grouping Level completely the report runs. There is no >> code-behind-forms >> > (there will be but I have removed it to attempt to solve this). >> >> > Any Ideas? >> >> > TIA >> > Stephen Bond >> > Otatara, New Zealand From stephen at bondsoftware.co.nz Fri Jul 23 06:22:34 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:22:34 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DC@server.bondsoftware.co.nz> > > Hi Stephen > > > Hi Gustav, you're up early! 11pm Friday here. > > Oh not at all, I'm in Europe - it's 13.00 hours here. > Quite right, I was looking at the time at AccessD ;-> From stephen at bondsoftware.co.nz Fri Jul 23 06:27:37 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:27:37 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Gustav, identical result as before :-< > > How do you specify it in the report's headings and groupings > > specification? > > You may need to write the original expression: > > > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > > > Is startdate included as i (not visible) textbox in the report? > > > > /gustav From paul.hartland at fsmail.net Fri Jul 23 06:40:12 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 23 Jul 2004 13:40:12 +0200 (CEST) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <20967598.1090582812566.JavaMail.www@wwinf3001> To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jmhla at earthlink.net Fri Jul 23 06:44:41 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Fri, 23 Jul 2004 04:44:41 -0700 (GMT-07:00) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <9948306.1090583082041.JavaMail.root@kermit.psp.pas.earthlink.net> Paul, I do not know the code but you need to open the Excel object model and access the page setup options. In Excel turn on the macro recorder and set the options manually. Look at the generated code. -----Original Message----- From: paul.hartland at fsmail.net Sent: Jul 23, 2004 4:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 23 06:48:09 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 23 Jul 2004 07:48:09 -0400 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: I'm guessing you want to set this using automation...? Here is an example from the help file: ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address Mark -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jul 23 06:54:29 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 23 Jul 2004 13:54:29 +0200 (CEST) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <11742222.1090583669313.JavaMail.www@wwinf3001> Thanks everyone, never even thought of looking in the help today.....can tell it's Friday..... Message date : Jul 23 2004, 12:52 PM >From : "Mitsules, Mark S. (Newport News)" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] OT-Excel Printing Header Rows On Each Page I'm guessing you want to set this using automation...? Here is an example from the help file: ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address Mark -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From dwaters at usinternet.com Fri Jul 23 06:54:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 06:54:28 -0500 Subject: [AccessD] Hit the Wall? In-Reply-To: <14618365.1090561122538.JavaMail.root@sniper4.usinternet.com> Message-ID: <000401c470ab$cf65a480$de1811d8@danwaters> Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 06:55:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 13:55:48 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Message-ID: <9720945598.20040723135548@cactus.dk> Hi Stephen Then, as neither Andy's suggestion did make a difference, something else must be going on. You may need to group on more fields - you can try that out in the query itself. /gustav > Gustav, identical result as before :-< >> > How do you specify it in the report's headings and groupings >> > specification? >> > You may need to write the original expression: >> > >> > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) >> > >> > Is startdate included as i (not visible) textbox in the report? >> > >> > /gustav From jmoss111 at bellsouth.net Fri Jul 23 07:00:08 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Fri, 23 Jul 2004 07:00:08 -0500 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page In-Reply-To: <20967598.1090582812566.JavaMail.www@wwinf3001> Message-ID: In excel turn on the macro recorder, and create your header. Stop the recorder and open the macro, and copy the code. Then in an Access module, insert the code with looping and row counting with your recordset code. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 23, 2004 6:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Fri Jul 23 07:55:00 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 23 Jul 2004 08:55:00 -0400 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page In-Reply-To: Message-ID: <000801c470b4$46c86960$0201a8c0@COA3> You want this property, I believe: With ActiveSheet.PageSetup .PrintTitleRows = "$1:$1" ' <- prints the first row on every page .PrintTitleColumns = "" End With Alternatively, you could do this manually in an XLT file, and send your data to the xlt each time (which will "spawn" a new copy of itself each time). Steve -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 23 08:05:04 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 23 Jul 2004 09:05:04 -0400 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Message-ID: <042b01c470b5$ac000350$6601a8c0@rock> I think that you have no choice but to bounce the derived field up to the master level of the report (that is, join the detail table to the master so you can grab this one field), and then do your grouping on that. Doing this will probably give you duplicate rows at the master level but you can get around that by grouping on the columns that duplicate. Try it as a query first, and then once you have it working, slam it back into the report. HTH, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stephen Bond Sent: Friday, July 23, 2004 7:28 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Report Grouping on a derived query field Gustav, identical result as before :-< > > How do you specify it in the report's headings and groupings > > specification? You may need to write the original expression: > > > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > > > Is startdate included as i (not visible) textbox in the report? > > > > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jul 23 09:00:47 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 23 Jul 2004 09:00:47 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From jimdettman at earthlink.net Fri Jul 23 06:04:06 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 23 Jul 2004 07:04:06 -0400 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Message-ID: Stephen, Try putting the calc in a subquery. Then build the report query off that. I know the general rule of thumb has always been to move calculations up rather then down, but I've run into a couple cases where it worked. Then there are a few cases where I actually had to build a temp table in a temp database to feed the report. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Friday, July 23, 2004 6:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Report Grouping on a derived query field Access 2000 - In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). Any Ideas? TIA Stephen Bond Otatara, New Zealand -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 09:14:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 16:14:05 +0200 Subject: [AccessD] OT: Network registry? In-Reply-To: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> Message-ID: <2929242838.20040723161405@cactus.dk> Hi Brett You could ask your app to look for it whenever it launches. Or you could set a time stamp or version no. in the backend, then let your app recopy and load the info when it needs the info and an update is available. It all depends, of course, on how frequent the info changes. /gustav > The info *could* be stored on the workstation. However, the mechanism > for updating it is the big question. How do I keep 70 workstations > updated when it changes? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock > Sent: Friday, July 23, 2004 1:36 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] OT: Network registry? > Hi Brett > Must the user read the info off the remote file or would it be allowed > to copy the encrypted info as a file to the users' machines? > The last option opens for a lot of quite simple solutions like ftp or > http transfer. > /gustav >> Here's the problem. I have an encrypted piece of information that I >> want to share with every computer in my network (~70 machines). This >> information can change at any time so it would be difficult to store >> it locally on each workstation. >> Currently I am storing this information in an INI file on a network >> share, which causes a series of problems: >> - I need to hard code the INI file location in the code accessing the >> data. If the file location changes, I would need to update all of the >> workstations. >> - All users accessing this file need the appropriate file permissions. >> There really isn't a single network location that ALL users in this >> building access. >> I was thinking of writing a Windows service that could run on one of >> the servers, that could monitor incoming requests from client >> workstations, and return the encrypted data. That way, one would only >> need to know the local IP address of the server, which is unlikely to > change. >> Any other ideas? >> Brett Barabash >> Lead Software Developer >> Tappe Construction, Co. >> Eagan, MN From GregSmith at starband.net Fri Jul 23 09:29:24 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 23 Jul 2004 09:29:24 -0500 Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <000c01c47043$989a5f30$48619a89@DDICK> Message-ID: <200407231427.i6NER17J025721@apollo.email.starband.net> Hi Darren. Thanks for responding. What you said is along the line of what I want to do, however, I want to be able to control the toolbars' properties based on the security. That is, if I login as the developer, I want the toolbars 'loose', so I can do what I want with them. However, when the "public" signs in, I want the toolbars "locked" so they can't mess with them. The only way I know to do this is through code, but I don't know (or can find) the syntax of the code to do it. Or is this type of control not possible? Thanks! Greg Smith gregsmith at starband.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Thursday, July 22, 2004 6:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Toolbar/Menubar Locking Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently using > Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, just > using the standard ones. The client has found that some of the users have > messed with the toolbars (dragged them off to who knows where...) and > afterwards can't get to them when they really do need them. > > I eventually plan to have customized toolbars and menubars for them, but > this question will apply to them as well, even though they're not ready > yet. > > Is there a way to lock the menubar and toolbar in place using vb code or > some other way of automatically locking them? I know it can be done in > Access on each workstation, but these pc's are all over the place and I > don't want to tell their MIS that he has to go around to each computer and > lock the toolbars in place. That would gain me MORE than just a dirty > look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Fri Jul 23 10:36:53 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 23 Jul 2004 11:36:53 -0400 Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <200407231427.i6NER17J025721@apollo.email.starband.net> Message-ID: <000001c470ca$e1e82a50$cc0aa845@hargrove.internal> Lookup the CommandBar object in the help files. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Friday, July 23, 2004 10:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Toolbar/Menubar Locking Hi Darren. Thanks for responding. What you said is along the line of what I want to do, however, I want to be able to control the toolbars' properties based on the security. That is, if I login as the developer, I want the toolbars 'loose', so I can do what I want with them. However, when the "public" signs in, I want the toolbars "locked" so they can't mess with them. The only way I know to do this is through code, but I don't know (or can find) the syntax of the code to do it. Or is this type of control not possible? Thanks! Greg Smith gregsmith at starband.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Thursday, July 22, 2004 6:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Toolbar/Menubar Locking Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently > using Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, > just using the standard ones. The client has found that some of the > users have messed with the toolbars (dragged them off to who knows > where...) and afterwards can't get to them when they really do need > them. > > I eventually plan to have customized toolbars and menubars for them, > but this question will apply to them as well, even though they're not > ready yet. > > Is there a way to lock the menubar and toolbar in place using vb code > or some other way of automatically locking them? I know it can be > done in Access on each workstation, but these pc's are all over the > place and I don't want to tell their MIS that he has to go around to > each computer and lock the toolbars in place. That would gain me MORE > than just a dirty look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Rich_Lavsa at pghcorning.com Fri Jul 23 10:58:21 2004 From: Rich_Lavsa at pghcorning.com (Lavsa, Rich) Date: Fri, 23 Jul 2004 11:58:21 -0400 Subject: [AccessD] OT: Network registry? Message-ID: <833956F5C117124A89417638FDB11290EBD22F@goexchange.pghcorning.com> Thinking outside the box a little, so don't crucify me if these options don't sound good.. Possible option #1...... I for one am not savvy when it comes to writing VB code, however would think that someone could write a little VB app that could monitor the basic field properties such as Modified date of the encrypted field in question. When that date changes you could then copy that file out to all 70 machines. In my mind this VB application would run as a Service, and would monitor the file maybe every minute to check the old with the new modified date property, if current date is newer then old date then start the Push routine that will push out the new file to every workstation. That is just something I would think about doing, then again I wouldn't know how to implement that and would come to this list or a VB list to ask HOW? Possible option #2...... Isn't there something called RobotCopy or maybe Briefcase or if have XP you might be able to get away with using the Synchronization Manager. Again not sure what your requirements and demand on the network all of this would be, just suggestions and thinking outside the box a little... Rich -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Friday, July 23, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 23 11:12:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 09:12:04 -0700 Subject: [AccessD] OT: Network registry? Message-ID: LOL We're only allowed one crucifixion a week, and I think we already had one this week. Charlotte Foust -----Original Message----- From: Lavsa, Rich [mailto:Rich_Lavsa at pghcorning.com] Sent: Friday, July 23, 2004 7:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: Network registry? Thinking outside the box a little, so don't crucify me if these options don't sound good.. Possible option #1...... I for one am not savvy when it comes to writing VB code, however would think that someone could write a little VB app that could monitor the basic field properties such as Modified date of the encrypted field in question. When that date changes you could then copy that file out to all 70 machines. In my mind this VB application would run as a Service, and would monitor the file maybe every minute to check the old with the new modified date property, if current date is newer then old date then start the Push routine that will push out the new file to every workstation. That is just something I would think about doing, then again I wouldn't know how to implement that and would come to this list or a VB list to ask HOW? Possible option #2...... Isn't there something called RobotCopy or maybe Briefcase or if have XP you might be able to get away with using the Synchronization Manager. Again not sure what your requirements and demand on the network all of this would be, just suggestions and thinking outside the box a little... Rich -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Friday, July 23, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 ------------------------------------------------------------------------ ---- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Fri Jul 23 13:22:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 13:22:46 -0500 Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <000501c470e2$0db19c40$de1811d8@danwaters> Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 23 13:23:00 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 23 Jul 2004 14:23:00 -0400 Subject: [AccessD] Pivot table builder Message-ID: <048301c470e2$15f564e0$6601a8c0@rock> I'm trying to create a pivot table form in Access and no matter how simple I try to make it, I immediately get an error message in the detail area that says "The query could not be processed. The data provider didn't supply any further error information." The database is Access MDB. The version is Access 2002 SP-1. Can anyone who has a simple pivot table form built please send me a zipped MDB so I can verify that I can at least open and use one? If so, please send it directly to me, zipped up. TIA, Arthur From cfoust at infostatsystems.com Fri Jul 23 13:26:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 11:26:20 -0700 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 13:38:57 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 13:38:57 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB192@main2.marlow.com> Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Fri Jul 23 13:55:10 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 13:55:10 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <6039825.1090607377268.JavaMail.root@sniper4.usinternet.com> Message-ID: <000001c470e6$9498b000$de1811d8@danwaters> I guess I had thought of using an unbound form as well. But I think at this point, with more fields perhaps to come as the customer starts using this, it would make more sense to rewrite this as an ADP rather than rewrite it to be unbound. However, this many fields is a function of the process and nothing else. There is no logical normalization that can be done that hasn't already been done (there are two different child tables). To remove fields is to change the business process. Thanks Charlotte! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 23, 2004 1:26 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 23 13:59:23 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 23 Jul 2004 20:59:23 +0200 Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB192@main2.marlow.com> Message-ID: How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Fri Jul 23 14:02:49 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 23 Jul 2004 12:02:49 -0700 Subject: [AccessD] Alternate Front Ends Message-ID: <410160D9.4010607@verizon.net> Because it's friday and because a friend forwarded this to me, I'm wondering if there are any of you guys out there testing this FE out? it certainly (according to the help pages) seems like it can do what Access can but it's not a db, so you'd still need something like mySQL or alike to manage it your db, tho it looks like you can make queries right from this gui tool. http://www.totalrekall.co.uk/index.php -- -Francisco From dwaters at usinternet.com Fri Jul 23 14:04:18 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 14:04:18 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <31138944.1090608512512.JavaMail.root@sniper8.usinternet.com> Message-ID: <000101c470e7$db23a880$de1811d8@danwaters> Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Fri Jul 23 14:13:52 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 14:13:52 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <19197918.1090609193394.JavaMail.root@sniper6.usinternet.com> Message-ID: <000601c470e9$312efb70$de1811d8@danwaters> This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it?s a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Fri Jul 23 14:50:03 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jul 2004 15:50:03 -0400 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <000601c470e9$312efb70$de1811d8@danwaters> Message-ID: <20040723195001.LFEM1788.imf22aec.mail.bellsouth.net@SUSANONE> Why not divide the data into the same structure as the tab and use 1:1 relationships? Susan H. This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it?s a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jul 23 14:47:15 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 23 Jul 2004 14:47:15 -0500 Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: It would be at least a little scary to maintain but you could use larger text fields to store groups of your other smaller text fields so that COMBINED_FIELD1 of 255 characters contained the data for logical fields 1-51 (assuming 5 character fields) You could then reference data in form controls by using controls populated by MID([COMBINED_FIELD1],1,5) for the first one MID([COMBINED_FIELD1],6,5) for the second etc. Gary Kjos garykjos at hotmail.com >From: "Dan Waters" >Reply-To: Access Developers discussion and problem >solving >To: "Database Advisors" >Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) >Date: Fri, 23 Jul 2004 13:22:46 -0500 > >Any other ideas on ways to resolve this issue? > >Thanks! >Dan Waters > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters >Sent: Thursday, July 22, 2004 8:45 PM >To: Database Advisors >Subject: [AccessD] Hit the Wall? > >In an Access app w/FE and BE, I need a table that has about 270 fields. A >single form will be bound to the table. (This is a business process >management application.) If I upsize this to a project (never done this), >I >can have up to 1024 fields in a table. > > > >I tried creating a query to join two smaller tables, but queries are also >limited to 255 columns. > > > >Is there a way around this so I can still use an Access BE? > > > >Thanks! > >Dan Waters > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jul 23 14:37:31 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 23 Jul 2004 14:37:31 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <100F91B31300334B89EC531C9DCB0865065859@tccexch01.tappeconstruction.net> How about using subforms for each tab page? That way you could have up to 11 different recordsources. It sounds like you were able to logically split the FE fields into 11 pages. It shouldn't be too difficult to at least split the BE into 2 tables. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:14 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it's a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From cfoust at infostatsystems.com Fri Jul 23 15:06:51 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 13:06:51 -0700 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: I'm not talking about removing fields from the *process*, I'm talking about changing the nature of a record to include a field for the value and a field for the "field name", "process segment", or whatever else you want to call it. Trust me, I've made this work with hundreds of "fields" because I didn't have to deal with trying to update individual fields in a single record, I could simply update a single record for that "field". If you have hundreds of fields in a single record, that doesn't mean you can't normalize it further. It may just mean you're in first normal form. Charlotte -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:55 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) I guess I had thought of using an unbound form as well. But I think at this point, with more fields perhaps to come as the customer starts using this, it would make more sense to rewrite this as an ADP rather than rewrite it to be unbound. However, this many fields is a function of the process and nothing else. There is no logical normalization that can be done that hasn't already been done (there are two different child tables). To remove fields is to change the business process. Thanks Charlotte! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 23, 2004 1:26 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 15:28:25 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 15:28:25 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB194@main2.marlow.com> Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 15:49:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 15:49:19 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stephen at bondsoftware.co.nz Fri Jul 23 15:18:49 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Sat, 24 Jul 2004 08:18:49 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DE@server.bondsoftware.co.nz> Gustav, Andy, Jim, Arthur, thanks for your input overnight, it's 8am Saturday, I'm awake, I've read your various contributions, and moved the derived field by itself to a query that is two query levels away from the report (so now it feeds the query that feeds the report). Eureka! Thank you one and all. Stephen Bond P.S. Jim, I was reaching the stage of the temp table approach. Not elegant is it? > -----Original Message----- > From: Jim Dettman [mailto:jimdettman at earthlink.net] > Sent: Friday, 23 July 2004 11:04 p.m. > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Report Grouping on a derived query field > > > Stephen, > > Try putting the calc in a subquery. Then build the report > query off that. > I know the general rule of thumb has always been to move > calculations up > rather then down, but I've run into a couple cases where it worked. > > Then there are a few cases where I actually had to build a > temp table in a > temp database to feed the report. > > Jim. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond > Sent: Friday, July 23, 2004 6:43 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] Report Grouping on a derived query field > > > Access 2000 - > In a query which feeds a report I have a derived field. It is derived > directly from a date field in one of the contributing tables, thus: > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > The query runs perfectly, and gives me values like 2003, 2004 > etc in the FY > field. > > I am using this derived field, FY, as a grouping level (the > only grouping > level) in the report. When I run the report, it bombs off > immediately with > the error message "The expression is typed incorrectly, or is > too complex to > be evaluated ..." and more stuff about simplifying the > expression. When I > remove the Grouping Level completely the report runs. There is no > code-behind-forms (there will be but I have removed it to > attempt to solve > this). > > Any Ideas? > > TIA > Stephen Bond > Otatara, 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 dwaters at usinternet.com Fri Jul 23 16:59:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 16:59:46 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <1020837.1090615986482.JavaMail.root@sniper3.usinternet.com> Message-ID: <000001c47100$5e15eb50$de1811d8@danwaters> Thank you Drew! This is a whole area I don't know about, and your example looks like a great example to learn from. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:49 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 23 20:53:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 23 Jul 2004 18:53:51 -0700 Subject: [AccessD] Database Conversion in VBA References: Message-ID: <4101C12F.4000503@shaw.ca> Well here is some rough code that will scan through directories and sub directories. to determine an mdb's version and print out the Access Version and Jet Version numbers. You will have to run this from Access 2002 or 2003, otherwise higher versions will not be recognized. This code will not be able to get at mdb's that are read only versions or those opened exclusively. Sub VersionTest(strpath As String) 'VersionTest "C:\Access files\Images\Picture2002.mdb" On Error GoTo ErrHandler Dim db As Database Dim i As Long Set db = DBEngine.OpenDatabase(strpath) Debug.Print strpath & " - " & db.Version & " - " & db.Properties("AccessVersion") 'For i = 0 To 8 ' Debug.Print db.Properties(i).Name & "-" & db.Properties(i).Value 'Next Exit Sub ErrHandler: ' most likely 3051 read only databases MsgBox Err.Number & " - " & Err.Description & vbCrLf & strpath End Sub Sub testfind() FindSub "C:\Access files\", "*mdb" End Sub ' FindSub() ermittelt alle Dateien mit der im Commondialog ' ausgew?hlten Dateiendung bis zur untersten Ebene ab dem gew?hlten 'Verzeichnis. ' Hierzu wird ein rekursiver Aufruf der Routine FindSub() eingesetzt. ' FindSub() determines all files with in the Commondialog the ' selected file dung up to the lowest level starting from the selected 'Verzeichnis. ' For this a recursive call of the routine FindSub() is used. Sub FindSub(strStart As String, strFindWhat As String) Dim arrFindDir() As String Dim strFind As String Dim i As Integer ChDrive (Left(strStart, 3)) ChDir (strStart) Call DirSub(strFindWhat, strStart) strFind = Dir("*.*", vbDirectory) i = 0 'ermittelt alle vorhandenen Dateien und Verzeichnisse im aktuellen 'Verzeichnis 'ermittelt all existing files and listings in the current 'Verzeichnis Do Until strFind = "" ReDim Preserve arrFindDir(i) arrFindDir(i) = strFind i = i + 1 strFind = Dir() Loop For i = 0 To UBound(arrFindDir) ' If... ermittelt ob es sich um ein Verzeichnis handelt ' und verzweigt dann rekursiv in dieses Verzeichnis If Dir(arrFindDir(i), vbNormal) = "" And Left(arrFindDir(i), 1) <> "." Then ' Rekursiver Aufruf von FindSub Call FindSub(strStart & arrFindDir(i) & "\", strFindWhat) ChDir (strStart) End If Next End Sub ' ermittelt alle gesuchten Dateien im momentan aktuellen Verzeichnis ' und gibt die gefundenen Dateien mit Pfad in eine Listenfeld (lstFiles)aus. ' determines all looked for files in the momentarily current listing ' and gives the found files with path in list field (lstFiles)aus. Sub DirSub(strFindWhat, strStart) Dim strFindfile As String strFindfile = Dir(strFindWhat, vbNormal) Do While strFindfile <> "" VersionTest strStart & strFindfile '.lstFiles.AddItem strStart & strFindfile strFindfile = Dir() Loop End Sub Charlotte Foust wrote: >We need to examine a datafile in code and convert it if it is in 2002 >format. Our users don't see the menu to do this, and we couldn't safely >leave it to them anyhow. There are no constants except >acCmdConvertDatabase, and the only code I've seen used SendKeys to run >that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be >running this in the current database, it becomes problematic. > >Charlotte Foust > > >-----Original Message----- >From: Arthur Fuller [mailto:artful at rogers.com] >Sent: Thursday, July 22, 2004 2:03 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Database Conversion in VBA > > >Is there something wrong with doing it in the menu? Do you need to do it >programmatically? If so, there must be constants that you can pass in to >DoCmd that will achieve same. Never had the need to do it yet but what's >wrong with the menu options themselves? > >Just asking > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: Thursday, July 22, 2004 4:59 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] Database Conversion in VBA > > >Has anyone succeeded in converting a database from 2002 to 2000 format >in code? No matter what I try, I only trigger the conversion dialog >without successfully passing in the arguments it needs. What I'm >looking for is 2002 code that will specify a database file and convert >that file to 2000 format. > >Charlotte Foust > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sat Jul 24 02:39:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jul 2004 09:39:08 +0200 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> Message-ID: <451029900.20040724093908@cactus.dk> Hi Drew Interesting and creative solution for this topic! /gustav > As an addition to the email below, if you go this method, you can really > save on form creation time, if you build your form one table at a > time. .. From gustav at cactus.dk Sat Jul 24 03:09:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jul 2004 10:09:05 +0200 Subject: [AccessD] Database Conversion in VBA In-Reply-To: <4101C12F.4000503@shaw.ca> References: <4101C12F.4000503@shaw.ca> Message-ID: <1822827285.20040724100905@cactus.dk> Hi Marty Just curious - where will the code fail for read-only mdbs? /gustav > This code will not be able to get at mdb's that are read only versions > or those opened exclusively. From jimdettman at earthlink.net Sat Jul 24 09:31:30 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 24 Jul 2004 10:31:30 -0400 Subject: [AccessD] Database Conversion in VBA In-Reply-To: <4101C12F.4000503@shaw.ca> Message-ID: Marty (and all), A did a sample database a while back to find all MDB's in a path and build a table with the result. Anyone that wants a copy can e-mail me off-line. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Friday, July 23, 2004 9:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Database Conversion in VBA Well here is some rough code that will scan through directories and sub directories. to determine an mdb's version and print out the Access Version and Jet Version numbers. You will have to run this from Access 2002 or 2003, otherwise higher versions will not be recognized. This code will not be able to get at mdb's that are read only versions or those opened exclusively. Sub VersionTest(strpath As String) 'VersionTest "C:\Access files\Images\Picture2002.mdb" On Error GoTo ErrHandler Dim db As Database Dim i As Long Set db = DBEngine.OpenDatabase(strpath) Debug.Print strpath & " - " & db.Version & " - " & db.Properties("AccessVersion") 'For i = 0 To 8 ' Debug.Print db.Properties(i).Name & "-" & db.Properties(i).Value 'Next Exit Sub ErrHandler: ' most likely 3051 read only databases MsgBox Err.Number & " - " & Err.Description & vbCrLf & strpath End Sub Sub testfind() FindSub "C:\Access files\", "*mdb" End Sub ' FindSub() ermittelt alle Dateien mit der im Commondialog ' ausgew?hlten Dateiendung bis zur untersten Ebene ab dem gew?hlten 'Verzeichnis. ' Hierzu wird ein rekursiver Aufruf der Routine FindSub() eingesetzt. ' FindSub() determines all files with in the Commondialog the ' selected file dung up to the lowest level starting from the selected 'Verzeichnis. ' For this a recursive call of the routine FindSub() is used. Sub FindSub(strStart As String, strFindWhat As String) Dim arrFindDir() As String Dim strFind As String Dim i As Integer ChDrive (Left(strStart, 3)) ChDir (strStart) Call DirSub(strFindWhat, strStart) strFind = Dir("*.*", vbDirectory) i = 0 'ermittelt alle vorhandenen Dateien und Verzeichnisse im aktuellen 'Verzeichnis 'ermittelt all existing files and listings in the current 'Verzeichnis Do Until strFind = "" ReDim Preserve arrFindDir(i) arrFindDir(i) = strFind i = i + 1 strFind = Dir() Loop For i = 0 To UBound(arrFindDir) ' If... ermittelt ob es sich um ein Verzeichnis handelt ' und verzweigt dann rekursiv in dieses Verzeichnis If Dir(arrFindDir(i), vbNormal) = "" And Left(arrFindDir(i), 1) <> "." Then ' Rekursiver Aufruf von FindSub Call FindSub(strStart & arrFindDir(i) & "\", strFindWhat) ChDir (strStart) End If Next End Sub ' ermittelt alle gesuchten Dateien im momentan aktuellen Verzeichnis ' und gibt die gefundenen Dateien mit Pfad in eine Listenfeld (lstFiles)aus. ' determines all looked for files in the momentarily current listing ' and gives the found files with path in list field (lstFiles)aus. Sub DirSub(strFindWhat, strStart) Dim strFindfile As String strFindfile = Dir(strFindWhat, vbNormal) Do While strFindfile <> "" VersionTest strStart & strFindfile '.lstFiles.AddItem strStart & strFindfile strFindfile = Dir() Loop End Sub Charlotte Foust wrote: >We need to examine a datafile in code and convert it if it is in 2002 >format. Our users don't see the menu to do this, and we couldn't safely >leave it to them anyhow. There are no constants except >acCmdConvertDatabase, and the only code I've seen used SendKeys to run >that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be >running this in the current database, it becomes problematic. > >Charlotte Foust > > >-----Original Message----- >From: Arthur Fuller [mailto:artful at rogers.com] >Sent: Thursday, July 22, 2004 2:03 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Database Conversion in VBA > > >Is there something wrong with doing it in the menu? Do you need to do it >programmatically? If so, there must be constants that you can pass in to >DoCmd that will achieve same. Never had the need to do it yet but what's >wrong with the menu options themselves? > >Just asking > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: Thursday, July 22, 2004 4:59 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] Database Conversion in VBA > > >Has anyone succeeded in converting a database from 2002 to 2000 format >in code? No matter what I try, I only trigger the conversion dialog >without successfully passing in the arguments it needs. What I'm >looking for is 2002 code that will specify a database file and convert >that file to 2000 format. > >Charlotte Foust > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 24 16:29:24 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 24 Jul 2004 14:29:24 -0700 Subject: [AccessD] Database Conversion in VBA References: <4101C12F.4000503@shaw.ca> <1822827285.20040724100905@cactus.dk> Message-ID: <4102D4B4.60202@shaw.ca> Oops. In Versio test routine should be this line to open mdb as shared and readonly Set db = DBEngine.OpenDatabase(strpath, False, True) rather than Set db = DBEngine.OpenDatabase(strpath) Gustav Brock wrote: >Hi Marty > >Just curious - where will the code fail for read-only mdbs? > >/gustav > > > > >>This code will not be able to get at mdb's that are read only versions >>or those opened exclusively. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From Subscriptions at servicexp.com Sat Jul 24 19:05:27 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 24 Jul 2004 20:05:27 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <4102D4B4.60202@shaw.ca> Message-ID: A2k Is it possible to detect external references made on an .mde from within the mde? Robert Gracie From joeget at vgernet.net Sun Jul 25 05:17:44 2004 From: joeget at vgernet.net (John Eget) Date: Sun, 25 Jul 2004 06:17:44 -0400 Subject: [AccessD] format access graph displayed data table Message-ID: <000a01c47230$a41bab90$11c2f63f@Desktop> I have a graph on a report with the data table showing. The numbers are standard however the displayed data table numbers are missing the 1000 separator. Does anyone know how to get the data table to display the separator? John From gustav at cactus.dk Sun Jul 25 06:31:43 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 13:31:43 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <93600443.20040725133143@cactus.dk> Hi Robert You can list them but, as far as I know, not change them - that's one of the limitations of an mde. /gustav > A2k > Is it possible to detect external references made on an .mde from > within the mde? From gustav at cactus.dk Sun Jul 25 07:00:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 14:00:59 +0200 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <842356989.20040725140059@cactus.dk> Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried > compact/repair and jetcomp.exe. Can anyone help us get our form and code back? From gustav at cactus.dk Sun Jul 25 07:08:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 14:08:08 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <40FC0CB3.8060807@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> Message-ID: <1042785495.20040725140808@cactus.dk> Hi Marty > you can try to use the undocumented SaveAsText and LoadFromText, may > help if an object is corrupted or otherwise behaving weirdly. > At the debug/immediate window type: > Application.SaveAsText acForm,"MyForm","c:\form.txt > or depending on Access version > SaveAsText acForm,"MyForm","c:\form.txt > You can then load the file into a new MDB. > Application.LoadFromText acForm,"MyForm","c:\from.txt" This is very handy! Thanks for that tip. This way you can easily include a small form and other objects in a message like this without attachments. Have you more small gems like this? /gustav From Subscriptions at servicexp.com Sun Jul 25 08:20:24 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 09:20:24 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <93600443.20040725133143@cactus.dk> Message-ID: How can I list them?, I know how to get the reference collection for the "internal" references, but I have no idea how to find any external (other databases or programs connected (Referenced) to the mde) references. Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 7:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert You can list them but, as far as I know, not change them - that's one of the limitations of an mde. /gustav > A2k > Is it possible to detect external references made on an .mde from > within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Sun Jul 25 08:26:10 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Sun, 25 Jul 2004 09:26:10 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried > compact/repair and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From gustav at cactus.dk Sun Jul 25 08:42:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 15:42:37 +0200 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> References: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> Message-ID: <1938454126.20040725154237@cactus.dk> Hi Jim > .. there was a disturbing article at M$KB that said when the code > module disappears it cannot be recovered. It gave no explaination > for this condition and no solution. Sounds scarry. I'm glad I have a nightly backup for each day of the week from our Novell server. (Reminds me: Where is William these days? Lost in some Windows Server profiles again? Or is his energy left on the OT list?) /gustav From gustav at cactus.dk Sun Jul 25 09:07:09 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 16:07:09 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <769926102.20040725160709@cactus.dk> Hi Robert > How can I list them?, I know how to get the reference collection for the > "internal" references, but I have no idea how to find any external (other > databases or programs connected (Referenced) to the mde) references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? From Subscriptions at servicexp.com Sun Jul 25 12:11:42 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 13:11:42 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <769926102.20040725160709@cactus.dk> Message-ID: Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for the > "internal" references, but I have no idea how to find any external (other > databases or programs connected (Referenced) to the mde) references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sun Jul 25 12:29:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 19:29:20 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <184772410.20040725192920@cactus.dk> Hi Robert Sorry, missed that fine detail. No, I have no idea. If so, it should be recorded in the registry or somewhere else. Of course (dont't know how to do that?), you could ask your mde to record - whenever a database app references it - in the registry the name of that database. Not a very reliable method. Or in a table of its own. And that would not indicate the present use of the mde, only historical references. /gustav > Yea, that lists the reference made from within the database, but what I > need is to "Detect" references (external connections) to the mde. > Does this make any sense? > Robert Gracie > www.servicexp.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Sunday, July 25, 2004 10:07 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Detecting External References From With-In an > MDE? > Hi Robert >> How can I list them?, I know how to get the reference collection for the >> "internal" references, but I have no idea how to find any external (other >> databases or programs connected (Referenced) to the mde) references. From martyconnelly at shaw.ca Sun Jul 25 13:30:48 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 25 Jul 2004 11:30:48 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> Message-ID: <4103FC58.9080201@shaw.ca> hmm.. I never thought of attaching form code to a newsgroup message this way. It would show the design quite easily However you might find this useful as it uses same method. Here is the method to dump everything in an mdb to text files in temp directory via saveastext--loadfromtext method into a new mdb and then compile it. Code is very busy and concise.. I borrowed it from an Lyle Fairfield, access newsgroup posting a long time ago. I have never seen GetObject used this way to startup a second version of Access. He was in charge of Dallas Fort Worth PC or Access UserGroup at one time. Maybe Drew has come across him. If you remove the kill txt statement, all your code will be available from the temporary text files in temp directory. This code is useful to try and recover clobbered or corrupted mdb files, if you can open the mdb. '=================================== 'code provided by Lyle Fairfield Sub BackUpThisTextFiles() Dim a(1 To 5) As String Dim bck As String Dim con As Container Dim doc As Document Dim objAccess As Access.Application Dim Ref As Reference Dim txt As String Dim zip As String Dim z As Long a(1) = "Tables" a(2) = "Forms" a(3) = "Reports" a(4) = "Scripts" a(5) = "Modules" bck = DBEngine(0)(0).Name bck = Left(bck, Len(bck) - 4) & "_BackUp.mdb" Do While Forms.Count > 0 DoCmd.Close acForm, Forms(0).Name Loop Do While Reports.Count > 0 DoCmd.Close acReport, Reports(0).Name Loop Do txt = Environ("temp") & "\" & CStr(Fix(Timer)) & ".txt" Loop Until Len(Dir$(txt)) = 0 SaveAsText 6, "", bck Set objAccess = GetObject(bck) On Error Resume Next With objAccess For Each Ref In .References .References.Remove Ref Next Ref End With For Each Ref In References With Ref If Not .BuiltIn Then objAccess.References.AddFromFile Ref.FullPath End With Next Ref Set Ref = Nothing For z = 1 To 5 Set con = DBEngine(0)(0).Containers(a(z)) With con For Each doc In .Documents With doc On Error Resume Next SaveAsText z, .Name, txt objAccess.Application.LoadFromText z, .Name, txt On Error GoTo 0 End With Next doc End With Next z Kill txt Set doc = Nothing Set con = Nothing With objAccess .DoCmd.OpenModule _ (.DBEngine(0)(0).Containers("Modules").Documents(0).Name) .DoCmd.RunCommand acCmdCompileAndSaveAllModules .Application.Quit End With Set objAccess = Nothing Shell SysCmd(acSysCmdAccessDir) & "MsAccess.Exe " & _ """" & bck & """" & "/compact" On Error Resume Next zip = bck FileName zip zip = "d:\" & Format(Now(), "yyyymmddhhnnss") & zip FileCopy bck, zip MsgBox "All Done Creating " & bck End Sub '=================================== Private Sub FileName(ByRef sIn As String) Dim pos As Long Dim posForwardSlash As Long pos = InStr(sIn, "\") posForwardSlash = InStr(sIn, "/") If pos = 0 Then pos = posForwardSlash If pos Then sIn = Mid(sIn, pos + 1) FileName sIn End If End Sub '=================================== Gustav Brock wrote: >Hi Marty > > > >>you can try to use the undocumented SaveAsText and LoadFromText, may >>help if an object is corrupted or otherwise behaving weirdly. >>At the debug/immediate window type: >>Application.SaveAsText acForm,"MyForm","c:\form.txt >>or depending on Access version >>SaveAsText acForm,"MyForm","c:\form.txt >>You can then load the file into a new MDB. >>Application.LoadFromText acForm,"MyForm","c:\from.txt" >> >> > >This is very handy! Thanks for that tip. >This way you can easily include a small form and other objects in a >message like this without attachments. > >Have you more small gems like this? > >/gustav > > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sun Jul 25 13:50:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 20:50:01 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <4103FC58.9080201@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> Message-ID: <435613561.20040725205001@cactus.dk> Great Marty! But are you sure it will save everything? If I try acTable it won't - error 2487, object type is empty or invalid for this method or action. /gustav > hmm.. I never thought of attaching form code to a newsgroup message > this way. > It would show the design quite easily > However you might find this useful as it uses same method. > Here is the method to dump everything in an mdb to text files in temp > directory via saveastext--loadfromtext method into a new mdb and then > compile it. From jwcolby at colbyconsulting.com Sun Jul 25 13:53:35 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 14:53:35 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: Message-ID: <000001c47278$b0bc7800$80b3fea9@ColbyM6805> Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Sun Jul 25 14:14:10 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 15:14:10 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <000001c47278$b0bc7800$80b3fea9@ColbyM6805> Message-ID: My thought was to protect the "use" of the mde. The front end of one of my apps is an .mdb, and because of certain needs will need to remain as such. All of the "work" code is stored in an .mde. The problem is, that one can reference the .mde and pretty much use the code with-in the mde. I was first going to pass some encryption keys between the .mdb and the .mde to authenticate that it's the correct .mdb using the .mde. But I soon realized that would not work, as if the key was stripped from the .mdb then it would be useless. There must be a way to do this.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Detecting External References From With-In an MDE? Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 15:43:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 15:43:36 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB19D@main2.marlow.com> You're welcome. Just remember that my post was just a sketch. You would need to plan and build the system. There are a lot of variables that are too complex to try and incorporate into one post (or even several). Holler if you have more particular questions. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 5:00 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Thank you Drew! This is a whole area I don't know about, and your example looks like a great example to learn from. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:49 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael at ddisolutions.com.au Sun Jul 25 19:09:39 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Mon, 26 Jul 2004 10:09:39 +1000 Subject: [AccessD] Hit the Wall? Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AB5@ddi-pdc.ddisolutions.ddisolutions.com.au> Dan, We gave them a choice, we limit the # of columns or upgrade to SQL. They chose to limit the # of columns. I'm pretty sure my colleague tried joining multiple tables (1-1) but the query still choked on the 8K limit which makes sense as a query is just a virtual table. Boolean fields are 2 bytes so you should be OK regards Michael M Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 20:44:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 20:44:37 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1A0@main2.marlow.com> Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jul 25 21:11:17 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 22:11:17 -0400 Subject: [AccessD] Hit the Wall? In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1A0@main2.marlow.com> Message-ID: <000101c472b5$d9a59110$80b3fea9@ColbyM6805> I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 21:19:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 21:19:00 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1A1@main2.marlow.com> maybe, I always thought yes/no were 1 byte on the disk......hmmmmm. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 9:11 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jul 25 21:51:00 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 22:51:00 -0400 Subject: [AccessD] Hit the Wall? In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1A1@main2.marlow.com> Message-ID: <000201c472bb$65a4b380$80b3fea9@ColbyM6805> Either way, the savings are substantial, both in storage and in speed. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 10:19 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? maybe, I always thought yes/no were 1 byte on the disk......hmmmmm. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 9:11 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew From bis at albury.net.au Mon Jul 26 02:10:59 2004 From: bis at albury.net.au (John Harris) Date: Mon, 26 Jul 2004 17:10:59 +1000 Subject: [AccessD] Drag & Drop Utility Message-ID: <000201c4730e$1b3dd530$0100a8c0@bis001> Greetings from Australia!! I have just downloaded a copy of your D & D utility. Just what I need. One question though: I assume (perhaps incorrectly) that one purpose of the utility is to allow controls to be moved when in form view. This would allow users for example to define their own form layout (at least for the items that were D&D enabled). On this basis, I assumed that if I move controls with D&D when in form view, I would still be asked to save the changes on exit - this does not happen. Am I misinterpreting the purpose of this utility. From jimdettman at earthlink.net Mon Jul 26 08:31:00 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 09:31:00 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: Message-ID: Robert, << There must be a way to do this....>> What is it that you allow your users to do within the MDB FE? There should be some way that the MDE upon first run code "finger print" the MDB file. Or turn that around a bit; how about fingerprinting the machine it's installed on? Jim (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 3:14 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? My thought was to protect the "use" of the mde. The front end of one of my apps is an .mdb, and because of certain needs will need to remain as such. All of the "work" code is stored in an .mde. The problem is, that one can reference the .mde and pretty much use the code with-in the mde. I was first going to pass some encryption keys between the .mdb and the .mde to authenticate that it's the correct .mdb using the .mde. But I soon realized that would not work, as if the key was stripped from the .mdb then it would be useless. There must be a way to do this.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Detecting External References From With-In an MDE? Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 26 10:30:55 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jul 2004 08:30:55 -0700 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: Do you have SR-3 loaded on O2k? If not, and if you have any 2002 apps on your machine, or if you're exhanging files between a O2k and an OXP machine, you may have run into the problem caused by the VBE6.DLL installed by OXP breaking your 2000 code. That causes the problem you are seeing, and it can irreparably toast your code containers. In that case, a backup is your only solution. Loading SR-3 patches the Access executable so that it can deal with the "updated" vbe6.dll, but it won't recover one of those damaged mdbs. I don't have the MSKB article reference at hand, but it has been discussed before and should be in the archives. Charlotte Foust -----Original Message----- From: Jim DeMarco [mailto:Jdemarco at hudsonhealthplan.org] Sent: Sunday, July 25, 2004 5:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. > One of the forms in our A2K app (the main form naturally) will not > load and we cannot access the code-behind. We've tried compact/repair > and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ************************************************************************ *********** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". ************************************************************************ *********** -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 26 10:43:32 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 26 Jul 2004 11:43:32 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F9903740B18@TTNEXCHSRV1.hshhp.com> Good points Charlotte. I thought he was using 2002 for development but it turns out its 2000 with SR-1. Maybe this will help. Thanks, Jim DeMarco -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Monday, July 26, 2004 11:31 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Do you have SR-3 loaded on O2k? If not, and if you have any 2002 apps on your machine, or if you're exhanging files between a O2k and an OXP machine, you may have run into the problem caused by the VBE6.DLL installed by OXP breaking your 2000 code. That causes the problem you are seeing, and it can irreparably toast your code containers. In that case, a backup is your only solution. Loading SR-3 patches the Access executable so that it can deal with the "updated" vbe6.dll, but it won't recover one of those damaged mdbs. I don't have the MSKB article reference at hand, but it has been discussed before and should be in the archives. Charlotte Foust -----Original Message----- From: Jim DeMarco [mailto:Jdemarco at hudsonhealthplan.org] Sent: Sunday, July 25, 2004 5:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. > One of the forms in our A2K app (the main form naturally) will not > load and we cannot access the code-behind. We've tried compact/repair > and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ************************************************************************ *********** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". ************************************************************************ *********** -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From Mark.Mitsules at ngc.com Mon Jul 26 13:38:14 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 14:38:14 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark From markamatte at hotmail.com Mon Jul 26 14:34:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Mon, 26 Jul 2004 19:34:58 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ From jimdettman at earthlink.net Mon Jul 26 14:54:22 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 15:54:22 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 26 14:58:15 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 26 Jul 2004 12:58:15 -0700 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark select * from myTable where myFieldName like *Mark* The previous sql should return all matches, from table myTable where the word 'Mark' is anywhere in the field myFieldName. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 11:38 AM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 26 15:04:02 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 26 Jul 2004 13:04:02 -0700 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: Hi Mark: If you want to update anything in a table you have to use the 'Update' sql string. Just go into the query form and select query type Update. It should be easy to proceed from there. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 12:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 26 15:19:23 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 26 Jul 2004 16:19:23 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <001901c4734d$db144030$80b3fea9@ColbyM6805> Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Mon Jul 26 15:29:52 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 16:29:52 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <001901c4734d$db144030$80b3fea9@ColbyM6805> Message-ID: John, <> Your right; I just double checked. Was always under the impression that it did. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jul 26 15:34:11 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 16:34:11 -0400 Subject: [AccessD] Multiple Table Search Message-ID: >>My take was that he wanted to find DATA from a record inside any of 100 tables.<< Correct. >>AFAIK Find and replace will not find data<< I'd like to confirm this before downloading or installing these products. Thanks, Mark -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jul 26 15:37:35 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 16:37:35 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Jim, Thanks for the reply. How about where myTable can be any of 70+ tables and myFieldName can be any field within those 70+ tables? Mark -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Monday, July 26, 2004 3:58 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark select * from myTable where myFieldName like *Mark* The previous sql should return all matches, from table myTable where the word 'Mark' is anywhere in the field myFieldName. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 11:38 AM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jul 26 15:53:18 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 15:53:18 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AB@main2.marlow.com> Hang on, working on a solution right now. Should have it done in about 20 minutes (after I go have a cigarette). I was just about finished, and had to have an impromptu meeting. Just got done, so don't buy anything yet, I'm gonna have a VBA method for you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 1:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 26 16:51:58 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 26 Jul 2004 17:51:58 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <001c01c4735a$c968dc80$80b3fea9@ColbyM6805> Mark, These products are both excellent but are aimed at finding OBJECTS in a database, things like discovering where fields of a table are used in queries, forms and reports. Where references to forms are used in code or in queries etc. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 4:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search >>My take was that he wanted to find DATA from a record inside any of >>100 tables.<< Correct. >>AFAIK Find and replace will not find data<< I'd like to confirm this before downloading or installing these products. Thanks, Mark -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jul 26 17:05:27 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 17:05:27 -0500 Subject: [AccessD] Query giving different results each time Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AC@main2.marlow.com> Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 Mon Jul 26 18:33:45 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jul 2004 16:33:45 -0700 Subject: [AccessD] Multiple Table Search Message-ID: You can search for values with SpeedFerret, but I haven't actually used that feature. Charlotte -----Original Message----- From: Jim Dettman [mailto:jimdettman at earthlink.net] Sent: Monday, July 26, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search John, <> Your right; I just double checked. Was always under the impression that it did. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Mon Jul 26 20:09:23 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 11:09:23 +1000 Subject: [AccessD] Drag & Drop Utility References: <000201c4730e$1b3dd530$0100a8c0@bis001> Message-ID: <005a01c47376$5b07a7a0$48619a89@DDICK> Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From markamatte at hotmail.com Mon Jul 26 20:45:34 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 01:45:34 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, Thanks for the feedback...but I'm still a little confused...If I am running the same SQL against the same table...back to back...why am I getting different results? Thanks, Mark >From: DWUTKA at marlow.com >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time >Date: Mon, 26 Jul 2004 17:05:27 -0500 > >Okay, here ya go. I built this into a form, because it uses a lot of >'techniques' to get things done. (Class modules, collections, callback >functions (for the list box)), along with all of the associated properties >that need to be set to get things done. So instead of trying to explain >how >to build the form, I'm just posting a link to download it. Right now, my >DSL is down (in case anyone wondered why the archives on my site weren't >there.....), it will be back up Thursday...so within a few days of that, I >will try to remember to put this file on my website. >(http://www.wolfwares.com) > >Until then, I put it on my company's website, for download. > >http://www.marlow.com/FindAllData.zip > >The zipped database has a form, query, and class module. Just import all >three into whatever database you want. Open the form, enter the search >criteria, and click the button. All applicable hits will be displayed in >the listbox. You can then double click the listbox to display either the >particular record (if a primary key for that table exists), or for all of >the results off of that table. > >Boy, that was actually fun to build! > >Drew > >FYI: This code only searches for text, in text and memo fields. It also >automatically puts astericks around the search criteria, so if you want to >put astericks inside the criteria, go ahead, but they're not necessary on >the outside. If you want to search number fields, the code could be >modified to do that. Actually, if there is enough of a request for it, I >could modify the search form to have different search boxes (text, >currency, >date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The >sample I built is in 97, which has DAO set by default, but if you use A2k, >make sure you have DAO selected. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Monday, July 26, 2004 2:35 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] Query giving different results each time > > >Hello All, > >In A97 I am running a local query...I couldn't get the results I >wanted...so > >I kept treaking my criteria...but then I realized...that if I didn'tchange >anything...I would get slightly different results...each time I ran it. It >would omit 1-5 rows...but not the same ones. > >Desperately confused...any insight? > >Thanks, > >Mark A. Matte > >SQL: > >SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, >tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, >tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone >FROM tblPRS_Pending_PHONE >WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt >FROM tblPRS_Pending_PHONE A >WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND >((tblPRS_Pending_PHONE.primary_ind)="y")); > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From itsame2000 at sbcglobal.net Mon Jul 26 20:59:47 2004 From: itsame2000 at sbcglobal.net (Jeremy Toves) Date: Mon, 26 Jul 2004 18:59:47 -0700 (PDT) Subject: [AccessD] Drag & Drop Utility In-Reply-To: <005a01c47376$5b07a7a0$48619a89@DDICK> Message-ID: <20040727015947.27971.qmail@web81506.mail.yahoo.com> I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? Thanks! Darren DICK wrote:Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 26 20:55:16 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 26 Jul 2004 18:55:16 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> Message-ID: <4105B604.3030508@shaw.ca> I had a closer look at the code This doesn't seem to work with tables. SaveAsText 0,"Products","C:\Program Files\Microsoft Office\Office\Samples\Northwind_BackUp.mdb" This doesn't seem to work with certain queries if you are scanning through all the document names. SaveAsText 1,"Products","C:\Program Files\Microsoft Office\Office\Samples\Northwind_BackUp.mdb" However this method below entering the table name by grabbing it from document containers from within NorthWind works. It must have something to do with LPSTR or BSTR strings, I tried fiddling with various methods to get it to accept a C like null terminated string, nothing seemed to work This piece of code copies the queries but it fails with the on error resume statement so it skips the garbled table names. Sub testit() Dim con As Container Dim doc As Document Set con = DBEngine(0)(0).Containers("Tables") With con For Each doc In .Documents With doc On Error Resume Next SaveAsText 1, .Name, "C:\Program Files\Microsoft Office\Office\Samples\TextDump_" &.name & ".txt" Debug.Print "*" & .Name & "*" On Error GoTo 0 End With Next doc End With End Sub Where the tables and relationships are copied is; in this even deeper undocumented call in the code SaveAsText 6, "", bck Which stand alone would look like this. SaveAsText 6,"", "C:\Program Files\Microsoft Office\Office\Samples\TextDump2.mdb" LoadFromText/SaveAsText are undocumented methods used by VSS integration. The "6" param copies the "ACB" portion that is checked in.... it includes project refs, tables, relationships, commandbars, and import specs. Gustav Brock wrote: >Great Marty! > >But are you sure it will save everything? > >If I try acTable it won't - error 2487, object type is empty or >invalid for this method or action. > >/gustav > > > > >>hmm.. I never thought of attaching form code to a newsgroup message >>this way. >>It would show the design quite easily >> >> > > > >>However you might find this useful as it uses same method. >> >> > > > >> Here is the method to dump everything in an mdb to text files in temp >>directory via saveastext--loadfromtext method into a new mdb and then >>compile it. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From d.dick at uws.edu.au Mon Jul 26 21:15:22 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 12:15:22 +1000 Subject: [AccessD] Drag & Drop Utility References: <20040727015947.27971.qmail@web81506.mail.yahoo.com> Message-ID: <009f01c4737f$9254fa60$48619a89@DDICK> It's free go to the Database Advisors website Have a look at the downloads section www.databaseadvisors.com ----- Original Message ----- From: "Jeremy Toves" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 27, 2004 11:59 AM Subject: Re: [AccessD] Drag & Drop Utility > I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? > > Thanks! > > > > Darren DICK wrote:Hi John > Yes the drag and drop just gives you the ability to 'move' things on the screen > It is up to you to specify how you store 'the new coordinates' > In my 'in use' application I have fields in a table that hold the > Top, Left, Height, Width for each control on my 'ID Card' design area. > So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but > hold the new coordinates for each move. On the mouse up I record where the 'Drop' > finished and I put those 'coordinates' straight into the table. > When the ID Card design form is opened I get those coordinates and 'move' > all the controls to where they were last dropped. > > But there would be a myriad of ways to achieve this much more cleverly than what I am doing > > Make sense? > > Hope this helps > > Darren > > > > > ----- Original Message ----- > From: "John Harris" > To: > Sent: Monday, July 26, 2004 5:10 PM > Subject: [AccessD] Drag & Drop Utility > > > > Greetings from Australia!! > > > > I have just downloaded a copy of your D & D utility. Just what I need. > > > > One question though: I assume (perhaps incorrectly) that one purpose > > of the utility is to allow controls to be moved when in form view. > > This would allow users for example to define their own form layout (at > > least for the items that were D&D enabled). On this basis, I assumed > > that if I move controls with D&D when in form view, I would still be > > asked to save the changes on exit - this does not happen. > > > > Am I misinterpreting the purpose of this utility. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 26 21:36:08 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 21:36:08 -0500 Subject: [AccessD] Drag & Drop Utility Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AE@main2.marlow.com> It's in the downloads section of http://databaseadvisors.com . And it's free. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jeremy Toves Sent: Monday, July 26, 2004 9:00 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Drag & Drop Utility I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? Thanks! Darren DICK wrote:Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 26 22:28:09 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 26 Jul 2004 20:28:09 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> Message-ID: <4105CBC9.3090804@shaw.ca> But this odd command leads to something more interesting. You could use this saveastext 6,"","some.mdb" command to do regular unattended backups of your backend on some hourly basis. Even when the backend is in use. This seems to work, regardless of the state of the db, that is, tables can be open, but it copies them anyway, including data entered during the current open state, but it doesn't copy changed or new data in a dirty record. In your backend mdb you have this code You could put this in a module in your back-end data file and have it conditionally execute based on a what you pass it in the /cmd argument of the command line you use to open it. If Command = "Backup" Then BackTest End If Sub BackTemp() Dim a As New Access.Application Set a = New Access.Application With a .OpenCurrentDatabase "C:\Documents and Settings\Some User\My Documents\db2.mdb", False,True .SaveAsText 6, "", "C:\Documents and Settings\Some User\My Documents\db2Backup.mdb" .Quit acQuitSaveNone End With Set a = Nothing End Sub Then you'd open the back end with this command line: "C:\Program Files\Microsoft Office\Office\MSAccess.exe" "[data file path/name]" /cmd "Backup" You could have this command line executed on your server at a scheduled time. Of course, there could be problems there, as in some circumstances, applications with a UI won't run properly when invoked when there is no one logged into the server console. There is no real way to do this without opening the actual data file in the Access UI, because SaveAsText operates only on the MDB currently open in the Access user interface. Gustav Brock wrote: >Great Marty! > >But are you sure it will save everything? > >If I try acTable it won't - error 2487, object type is empty or >invalid for this method or action. > >/gustav > > > > >>hmm.. I never thought of attaching form code to a newsgroup message >>this way. >>It would show the design quite easily >> >> > > > >>However you might find this useful as it uses same method. >> >> > > > >> Here is the method to dump everything in an mdb to text files in temp >>directory via saveastext--loadfromtext method into a new mdb and then >>compile it. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From stuart at lexacorp.com.pg Mon Jul 26 23:01:07 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 14:01:07 +1000 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <41066023.19756.4869A4B@lexacorp.com.pg> On 27 Jul 2004 at 1:45, Mark A Matte wrote: > Hello All, > > Thanks for the feedback...but I'm still a little confused...If I am running > the same SQL against the same table...back to back...why am I getting > different results? > > A corrupt index? Have you tried a compact and repair? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From d.dick at uws.edu.au Mon Jul 26 23:29:44 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 14:29:44 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <00f001c47392$57fb6850$48619a89@DDICK> Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren From stuart at lexacorp.com.pg Mon Jul 26 23:41:06 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 14:41:06 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <00f001c47392$57fb6850$48619a89@DDICK> Message-ID: <41066982.28886.4AB3265@lexacorp.com.pg> > > So I thought I would just launch the app from the users desktop with a BATCH file. > The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > IIRC, in Win9X, you need to specify the application in batch files (and in scheduled tasks?) so you will need something like: "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program Files\Truman\Truman.mdb" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From d.dick at uws.edu.au Mon Jul 26 23:49:09 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 14:49:09 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <41066982.28886.4AB3265@lexacorp.com.pg> Message-ID: <010a01c47395$0e0d23c0$48619a89@DDICK> Thanks Stuart That sounds about right Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Tuesday, July 27, 2004 2:41 PM Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > So I thought I would just launch the app from the users desktop with a BATCH file. > > The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, > > all from within the batch file Simple - on XP and WIN2000 at least > > > > Here is the batch file............... > > REM START BATCH FILE########################################### > > echo Updating your system to the latest Version of TruMan... > > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > c:\Progra~1\Truman\Truman.mdb > > REM END BATCH FILE ########################################### > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... > > 1 file(s) copied (Great it copied the file) > > Bad command or file name (Bugger it doesn't spark up the app) > > > > The S drive location of the new app is valid. The destination folder in Program files and the existence > > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > > > The on the Win 98 machine if I copy the line " > > c:\Progra~1\Truman\Truman.mdb" from the batch file and > > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app > > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > > > I'm stumped - any suggestions? > > > > IIRC, in Win9X, you need to specify the application in batch files (and in > scheduled tasks?) so you will need something like: > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > Files\Truman\Truman.mdb" > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Tue Jul 27 01:38:23 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 27 Jul 2004 07:38:23 +0100 Subject: [AccessD] Multiple Table Search In-Reply-To: <001c01c4735a$c968dc80$80b3fea9@ColbyM6805> Message-ID: <000b01c473a4$50b75740$b274d0d5@minster33c3r25> Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From mgauk at btconnect.com Tue Jul 27 02:48:14 2004 From: mgauk at btconnect.com (MG) Date: Tue, 27 Jul 2004 08:48:14 +0100 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <00f001c47392$57fb6850$48619a89@DDICK> Message-ID: <200407270749.i6R7nhQ20268@databaseadvisors.com> Here is the code that I use. I put in each person's c:\ root and then call it in their startup menu. Adjust to suit. Max Sherman CODE: ' Max Sherman Jan 2004 ' Program to run (1) from Startup and (2) from User Desktop ' copies over the version on the Server to the user's PC - It does not check for dates as per Version 1. ' It also synchonises times on all machine to agree with that on Server. Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, fOnServerPC, fOnLocalPC Dim strUser,objShell,objNetwork Set FSO = CreateObject("Scripting.FileSystemObject") Set objShell = wscript.createobject("WScript.shell") Set objNetwork = wscript.createobject("WScript.Network") strUser = objnetwork.userdomain ' wscript.echo struser objShell.run("NET TIME \\Server /SET /YES") if strUser = "MAX" then ' wscript.Echo "Skipped" else fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" wscript.Echo ("Checking For MCM File Updates: Please Click OK and then wait until the messagebox re-appears") ' Server File If (FSO.FileExists(fOnServerPC)) Then Set fServer = FSO.GetFile(fOnServerPC) FSO.CopyFile fOnServerPC , fOnLocalPC wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now been copied onto your computer") Else wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is missing from the Server. Please Report This Immediately") End If End if Set FSO = nothing set objShell = nothing set objNetworkl = nothing -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: 27 July 2004 05:30 To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From mgauk at btconnect.com Tue Jul 27 02:57:21 2004 From: mgauk at btconnect.com (MG) Date: Tue, 27 Jul 2004 08:57:21 +0100 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <200407270757.i6R7vKQ29697@databaseadvisors.com> Sorry, I should have said that the filename for the vbs code I just posted, must end in .vbs so that your operating system can find it. Don't know if it will run on 98 machines though. Max Sherman -----Original Message----- From: MG [mailto:mgauk at btconnect.com] Sent: 27 July 2004 08:48 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy Here is the code that I use. I put in each person's c:\ root and then call it in their startup menu. Adjust to suit. Max Sherman CODE: ' Max Sherman Jan 2004 ' Program to run (1) from Startup and (2) from User Desktop ' copies over the version on the Server to the user's PC - It does not check for dates as per Version 1. ' It also synchonises times on all machine to agree with that on Server. Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, fOnServerPC, fOnLocalPC Dim strUser,objShell,objNetwork Set FSO = CreateObject("Scripting.FileSystemObject") Set objShell = wscript.createobject("WScript.shell") Set objNetwork = wscript.createobject("WScript.Network") strUser = objnetwork.userdomain ' wscript.echo struser objShell.run("NET TIME \\Server /SET /YES") if strUser = "MAX" then ' wscript.Echo "Skipped" else fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" wscript.Echo ("Checking For MCM File Updates: Please Click OK and then wait until the messagebox re-appears") ' Server File If (FSO.FileExists(fOnServerPC)) Then Set fServer = FSO.GetFile(fOnServerPC) FSO.CopyFile fOnServerPC , fOnLocalPC wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now been copied onto your computer") Else wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is missing from the Server. Please Report This Immediately") End If End if Set FSO = nothing set objShell = nothing set objNetworkl = nothing -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: 27 July 2004 05:30 To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From gustav at cactus.dk Tue Jul 27 02:59:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 09:59:08 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <4105CBC9.3090804@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> <4105CBC9.3090804@shaw.ca> Message-ID: <1077409394.20040727095908@cactus.dk> Hi Marty Oh, that was lot of stuff! Thanks. I'll have a look at it later (having some real work to do right now). /gustav > But this odd command leads to something more interesting. > You could use this > saveastext 6,"","some.mdb" > command to do regular unattended backups of your backend on some hourly > basis. > Even when the backend is in use. From gustav at cactus.dk Tue Jul 27 03:49:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 10:49:20 +0200 Subject: [AccessD] Drag & Drop Utility In-Reply-To: <005a01c47376$5b07a7a0$48619a89@DDICK> References: <000201c4730e$1b3dd530$0100a8c0@bis001> <005a01c47376$5b07a7a0$48619a89@DDICK> Message-ID: <3910421415.20040727104920@cactus.dk> Hi Darren I haven't paid this util much notice ... but wouldn't it be possible to build a poor man's (= user safe) report "designer" this way - without having the user have access to reports in design mode. A form could simulate the report layout. Then the user could move the controls around and resize and change fonts etc. All it does is saving the positions and a few other properties in a table which you read at report open? Drew? 20 minutes and a cigarette. Much more needed? /gustav > Hi John > Yes the drag and drop just gives you the ability to 'move' things on the screen > It is up to you to specify how you store 'the new coordinates' > In my 'in use' application I have fields in a table that hold the > Top, Left, Height, Width for each control on my 'ID Card' design area. > So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but > hold the new coordinates for each move. On the mouse up I record where the 'Drop' > finished and I put those 'coordinates' straight into the table. > When the ID Card design form is opened I get those coordinates and 'move' > all the controls to where they were last dropped. > But there would be a myriad of ways to achieve this much more cleverly than what I am doing > Make sense? > Hope this helps > Darren > ----- Original Message ----- > From: "John Harris" > To: > Sent: Monday, July 26, 2004 5:10 PM > Subject: [AccessD] Drag & Drop Utility >> Greetings from Australia!! >> >> I have just downloaded a copy of your D & D utility. Just what I need. >> >> One question though: I assume (perhaps incorrectly) that one purpose >> of the utility is to allow controls to be moved when in form view. >> This would allow users for example to define their own form layout (at >> least for the items that were D&D enabled). On this basis, I assumed >> that if I move controls with D&D when in form view, I would still be >> asked to save the changes on exit - this does not happen. >> >> Am I misinterpreting the purpose of this utility. From carbonnb at sympatico.ca Tue Jul 27 04:27:01 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Tue, 27 Jul 2004 05:27:01 -0400 Subject: [AccessD] Drag & Drop Utility In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1AE@main2.marlow.com> Message-ID: <4105E7A5.6004.16A2EF@localhost> On 26 Jul 2004 at 21:36, DWUTKA at marlow.com wrote: > It's in the downloads section of http://databaseadvisors.com . And > it's free. Actually its on http://www.databaseadvisors.com http://databaseadvisors.com is a different server. -- Bryan Carbonnell - carbonnb at sympatico.ca I've learned.... That having a child fall asleep in your arms is one of the most peaceful feelings in the world. From dwilliams_78704 at yahoo.com Tue Jul 27 06:44:33 2004 From: dwilliams_78704 at yahoo.com (dan williams) Date: Tue, 27 Jul 2004 04:44:33 -0700 (PDT) Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <20040727114433.59081.qmail@web50809.mail.yahoo.com> probably are looking for a union - this looks thru different table with a prompt for a last name select [BoardCommLastName], [BoardCommFirstName], [BoardCommCommissionTitleName],[BoardCommDateAppointed], [BoardCommDateOfExpiration], [BoardCommDateOfCommission], [BoardCommDateOfOath] from [tblBoards&Commission] WHERE ((([tblBoards&Commission].BoardCommLastName) Like [Type the last name followed by *:])) UNION select [BranchPilotsLastName], [BranchPilotsFirstName], [BranchPilotsPort],[BranchPilotsDateOfAppointment], [BranchPilotsDateOfExpiration], [BranchPilotsDateOfCommission], [BranchPilotsDateOfOath] from [tblBranchPilots] WHERE ((([tblBranchPilots].BranchPilotsLastName) Like [Type the last name followed by *:])) UNION select [DistrictAttorneyLastName], [DistrictAttorneyFirstName], [DistrictAttorneyTitle], [DistrictAttorneyDateOfAppointment], [DistrictAttorneyDateOfExpiration], [DistrictAttorneyDateOfCommission], [DistrictAttorneyDateOfOath] from [tblDistrictAttorneys] WHERE ((([tblDistrictAttorneys].DistrictAttorneyLastName) Like [Type the last name followed by *:])) UNION select [DistrictJudgesLastName], [DistrictJudgesFirstName], [DistrictJudgesFormOfAddress], [DistrictJudgesDateOfAppointment], [DistrictJudgesDateOfExpiration], [DistrictJudgesDateOfCommission], [DistrictJudgesDateOfOath] from [tblDistrictJudges] WHERE ((([tblDistrictJudges].DistrictJudgesLastName) Like [Type the last name followed by *:])) UNION select [ElectedOfficialsLastName], [ElectedOfficialsFirstName], [ElectedOfficialsTitle], [ElectedOfficialsDateElected], [ElectedOfficialsDateOfExpiration], [ElectedOfficialsDateOfCommission], [ElectedOfficialsDateOfOath] from [tblElectedStateOfficials] WHERE ((([tblElectedStateOfficials].ElectedOfficialsLastName) Like [Type the last name followed by *:])) UNION select [HigherCourtLastName], [HigherCourtFirstName], [HigherCourtFormOfAddress], [HigherCourtDateOfAppointment], [HigherCourtDateOfExpiration], [HigherCourtDateOfCommission], [HigherCourtDateOfOath] from [tblHigherCourts] WHERE ((([tblHigherCourts].HigherCourtLastName) Like [Type the last name followed by *:])) UNION select [SpecialJudgesAppointedJudge], [SpecialJudgesAppointedJudge], [SpecialJudgesFormOfAddress], [SpecialJudgesDateOfAppointment], [SpecialJudgesDateOfCommission], [SpecialJudgesDateOfCommission], [SpecialJudgesDateOfCommission] from [tblSpecialCountyJudges] WHERE ((([tblSpecialCountyJudges].SpecialJudgesAppointedJudge) Like [Type the last name followed by *:])) UNION select [TaskForceLastName], [TaskForceFirstName], [TaskForceName], [TaskForceDateOfAppointment], [TaskForceDateOfExpiration], [TaskForceDateOfCommission], [TaskForceDateOfOath] from [tblTaskForce] WHERE ((([tblTaskForce].TaskForceLastName) Like [Type the last name followed by *:])) ORDER BY 1; --- "Mitsules, Mark S. (Newport News)" wrote: > Jim, > > Thanks for the reply. How about where myTable can > be any of 70+ tables and > myFieldName can be any field within those 70+ > tables? > > Mark > > > > -----Original Message----- > From: Jim Lawrence (AccessD) > [mailto:accessd at shaw.ca] > Sent: Monday, July 26, 2004 3:58 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark > > select * from myTable where myFieldName like *Mark* > > The previous sql should return all matches, from > table myTable where the > word 'Mark' is anywhere in the field myFieldName. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Mitsules, Mark > S. (Newport News) > Sent: Monday, July 26, 2004 11:38 AM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am > not familiar enough > with the data to do an educated search. What is > the simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > __________________________________ Do you Yahoo!? Yahoo! Mail - You care about security. So do we. http://promotions.yahoo.com/new_mail From Mark.Mitsules at ngc.com Tue Jul 27 06:46:45 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 27 Jul 2004 07:46:45 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Thanks Andy! I was disappointed when I came in this morning and saw no reply from Drew. I was looking forward to seeing Drew's suggestion and was single-mindedly oblivious to all other posts. Mark -----Original Message----- From: Andy Lacey [mailto:andy at minstersystems.co.uk] Sent: Tuesday, July 27, 2004 2:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jul 27 07:12:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 22:12:50 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <200407270757.i6R7vKQ29697@databaseadvisors.com> Message-ID: <4106D362.1138.648C323@localhost> > Sorry, I should have said that the filename for the vbs code I just posted, > must end in .vbs so that your operating system can find it. Don't > know if it will run on 98 machines though. > It also requires the Windows Scripting Host to be enabled. Many PCs have it turned off for security reasons. WSH is a primary vector for viruses/malicious code. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mikedorism at adelphia.net Tue Jul 27 07:15:19 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 27 Jul 2004 08:15:19 -0400 Subject: [AccessD] Offsite Developer needed immediately Message-ID: <000001c473d3$628df260$cc0aa845@hargrove.internal> I recently took on what I thought was going to be a simple project for a company in Louisville, Kentucky. The project scope has mushroomed and due to life commitments (my only sister is due to give birth to nephew/niece #3 any day now), I can't give them the attention they deserve. Rather than leave them hanging, I'd like to find them someone with the right skill set and immediately available time to take over. Knowledge needed: Great Plains/Dynamics and Crystal Reports. Project scope: 1) Build a Crystal Report version of the Dynamics Invoice. 2) Create a tool (using Access Runtime or Visual Basic) which will let them triage incoming orders into invoice batches. 3) Track all invoices to make sure they are filled and reprint any that are not. Please note that there current website volume is about 1500+ orders per day and rising so this is something that they need done very quickly. If interested, email me offline. Doris Manning mikedorism at adelphia.net From Mark.Mitsules at ngc.com Tue Jul 27 07:18:12 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 27 Jul 2004 08:18:12 -0400 Subject: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Message-ID: Thanks Drew. Meetings seem to be taking over my day so I will get back to you ASAP with any feedback. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, July 26, 2004 6:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 bheid at appdevgrp.com Tue Jul 27 07:33:43 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 08:33:43 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B088@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby From bheid at appdevgrp.com Tue Jul 27 07:49:37 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 08:49:37 -0400 Subject: [AccessD] Weird query execution problem. UPDATED INFO. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B0E5@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CE@ADGSERVER> Sorry, I forgot specifics. Access XP sp2 Win2K sp3 The queries are update queries. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 27 07:56:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 14:56:47 +0200 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> References: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Message-ID: <4525268514.20040727145647@cactus.dk> Hi Bobby I would try stopping the code (by a msgbox) before and in-between the three queries. Perhaps it is only one of the queries that causes trouble. Also, try running the code when the database is stored locally. Networks and wrong settings on file servers can cause errors. /gustav > Hi all, > Me again with another problem. > I have these three queries that normally run fine on most BEs that I throw > at it. These databases have between 1500-50000 payroll records. I have a > large database with 193000 payroll records. I am running the queries from > code using db.execute "queryname",dbfailonerror. > When processing the large database, Access appears to stop running. It runs > up to the offending queries and stops. I show 0% cpu for access when this > happens. I have let it go for over an hour before and still no go. > So yesterday, I stopped the program right before the queries. I then went > to the query list and double-clicked each of the three queries and they ran > fine. > Anyone have any ideas as to what may be going on? I am going to try running > them in code using a querydef. > Thanks, > Bobby From bheid at appdevgrp.com Tue Jul 27 08:39:04 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 09:39:04 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B0F9@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CF@ADGSERVER> Hey Gustav, The databases are local. I have stopped the code at the queries. It is at least the first two. There are many other queries (this is a conversion from and earlier version) around these. These queries run fine on other databases. I also just tried to run the first query using a querydef and got the same results. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 27, 2004 8:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Weird query execution problem. Hi Bobby I would try stopping the code (by a msgbox) before and in-between the three queries. Perhaps it is only one of the queries that causes trouble. Also, try running the code when the database is stored locally. Networks and wrong settings on file servers can cause errors. /gustav > Hi all, > Me again with another problem. > I have these three queries that normally run fine on most BEs that I > throw at it. These databases have between 1500-50000 payroll records. > I have a large database with 193000 payroll records. I am running the > queries from code using db.execute "queryname",dbfailonerror. > When processing the large database, Access appears to stop running. > It runs up to the offending queries and stops. I show 0% cpu for > access when this happens. I have let it go for over an hour before and still no go. > So yesterday, I stopped the program right before the queries. I then > went to the query list and double-clicked each of the three queries > and they ran fine. > Anyone have any ideas as to what may be going on? I am going to try > running them in code using a querydef. > Thanks, > Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jul 27 09:17:32 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 27 Jul 2004 10:17:32 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Message-ID: Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jul 27 09:52:07 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 27 Jul 2004 10:52:07 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark, Sorry for the mis-information on Find and Replace. I see Drew's already come up with a more through solution, but for those who are interested, below is a down and dirty DAO based sub to do what you want. You could easily extend to save the results in a table, search multiple databases, etc. Jim Dettman (315) 699-3443 jimdettman at earthlink.net Option Compare Database Option Explicit Public Sub FindItem(strSearchFor As String) Dim curDB As DAO.Database Dim rs As DAO.Recordset Dim intK As Integer Dim intI As Integer Dim lngCount As Long Set curDB = CurrentDb() ' Table loop For intK = 0 To curDB.TableDefs.Count - 1 Set rs = curDB.OpenRecordset(curDB.TableDefs(intK).Name, dbOpenForwardOnly) lngCount = 1 Do While rs.EOF = False ' Loop for fields For intI = 0 To rs.Fields.Count - 1 If InStr(1, rs(intI), strSearchFor) > 0 Then Debug.Print "Table: "; curDB.TableDefs(intK).Name; " Record: "; lngCount; " Field: "; rs(intI).Name End If Next intI rs.MoveNext lngCount = lngCount + 1 Loop Next intK Debug.Print "Complete" End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 27 10:13:26 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 11:13:26 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B13A@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6D2@ADGSERVER> Hi Jim, That did not work either. I think that I'll pass parameters to the queries so that I can process the data in chunks. Thanks for trying, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Tuesday, July 27, 2004 10:18 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Weird query execution problem. Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. 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 DWUTKA at marlow.com Tue Jul 27 10:13:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 10:13:00 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B0@main2.marlow.com> Whoops, I did, didn't I. Apparently I was a little out of it yesterday. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Tuesday, July 27, 2004 1:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Tue Jul 27 10:18:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 15:18:58 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Yes I tried the compact and repair. It didn't seem to help. Each time I run the query...I get different results...is there something about the sub-query I am missing? Thanks, Mark A. Matte >From: "Stuart McLachlan" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and >problemsolving >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:01:07 +1000 > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > Hello All, > > > > Thanks for the feedback...but I'm still a little confused...If I am >running > > the same SQL against the same table...back to back...why am I getting > > different results? > > > > >A corrupt index? Have you tried a compact and repair? > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System Support. > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee? Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From DWUTKA at marlow.com Tue Jul 27 10:33:14 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 10:33:14 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B3@main2.marlow.com> (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. From cfoust at infostatsystems.com Tue Jul 27 10:56:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jul 2004 08:56:24 -0700 Subject: [AccessD] Query giving different results each time Message-ID: I missed the part of thread where you mentioned a sub-query. Have you posted the SQL for this query/subquery? Charlotte Foust -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Tuesday, July 27, 2004 7:19 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Yes I tried the compact and repair. It didn't seem to help. Each time I run the query...I get different results...is there something about the sub-query I am missing? Thanks, Mark A. Matte >From: "Stuart McLachlan" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and >problemsolving >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:01:07 +1000 > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > Hello All, > > > > Thanks for the feedback...but I'm still a little confused...If I am >running > > the same SQL against the same table...back to back...why am I > > getting different results? > > > > >A corrupt index? Have you tried a compact and repair? > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System >Support. > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee(r) Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 27 11:03:50 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 27 Jul 2004 09:03:50 -0700 Subject: [AccessD] Error List Message-ID: <00c501c473f3$4ecf6b80$6601a8c0@HAL9002> Does anyone have a link to a list of VBA error? MTIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com From markamatte at hotmail.com Tue Jul 27 11:10:37 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 16:10:37 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I >run the query...I get different results...is there something about the >sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee? Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From clh at christopherhawkins.com Tue Jul 27 11:11:25 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Tue, 27 Jul 2004 10:11:25 -0600 Subject: [AccessD] FaceID master reference for CommandBars? Message-ID: <191280-220047227161125890@christopherhawkins.com> God, how I hate CommandBars. ;) Can anyone point me to a resource that lists the FaceID of each icon available for use on an Access Command Bar Button? -Christopher- From Lambert.Heenan at AIG.com Tue Jul 27 11:12:33 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 27 Jul 2004 12:12:33 -0400 Subject: [AccessD] Error List Message-ID: <1D7828CDB8350747AFE9D69E0E90DA1F1CA11F@xlivmbx21.aig.com> This code will create tables for you containing the error codes and descriptions... Option Compare Database Option Explicit Sub CreateErrorsTable() Dim dbs As Database, tdf As TableDef, fld As Field Dim rst As Recordset, lngCode As Long Const conAppObjectError = "Application-defined or object-defined error" ' Create Errors table with ErrorNumber and ErrorDescription fields. Set dbs = CurrentDb Set tdf = dbs.CreateTableDef("Errors") Set fld = tdf.CreateField("ErrorCode", dbLong) tdf.Fields.Append fld Set fld = tdf.CreateField("ErrorString", dbText, 255) tdf.Fields.Append fld dbs.TableDefs.Append tdf ' Open recordset on Errors table. Set rst = dbs.OpenRecordset("Errors") ' Loop through first 1000 Visual Basic error codes. For lngCode = 1 To 1000 On Error Resume Next ' Raise each error. Err.Raise lngCode DoCmd.Hourglass True ' Skip error codes that generate application or object-defined errors. If Err.Description <> conAppObjectError Then ' Add each error code and string to Errors table. rst.AddNew rst!ErrorCode = Err.Number rst!ErrorString = Err.Description rst.Update End If ' Clear Err object. Err.Clear Next lngCode ' Close recordset. rst.Close DoCmd.Hourglass False MsgBox "Errors table created." End Sub Function AccessAndJetErrorsTable() As Boolean Dim dbs As Database, tdf As TableDef, fld As Field Dim rst As Recordset, lngCode As Long Dim strAccessErr As String Const conAppObjectError = "Application-defined or object-defined error" On Error GoTo Error_AccessAndJetErrorsTable ' Create Errors table with ErrorNumber and ErrorDescription fields. Set dbs = CurrentDb Set tdf = dbs.CreateTableDef("AccessAndJetErrors") Set fld = tdf.CreateField("ErrorCode", dbLong) tdf.Fields.Append fld Set fld = tdf.CreateField("ErrorString", dbMemo) tdf.Fields.Append fld dbs.TableDefs.Append tdf ' Open recordset on Errors table. Set rst = dbs.OpenRecordset("AccessAndJetErrors") ' Loop through error codes. For lngCode = 0 To 3500 On Error Resume Next ' Raise each error. strAccessErr = AccessError(lngCode) DoCmd.Hourglass True ' Skip error numbers without associated strings. If strAccessErr <> "" Then ' Skip codes that generate application or object-defined errors. If strAccessErr <> conAppObjectError Then ' Add each error code and string to Errors table. rst.AddNew rst!ErrorCode = lngCode ' Append string to memo field. rst!ErrorString.AppendChunk strAccessErr rst.Update End If End If Next lngCode ' Close recordset. rst.Close DoCmd.Hourglass False RefreshDatabaseWindow MsgBox "Access and Jet errors table created." AccessAndJetErrorsTable = True Exit_AccessAndJetErrorsTable: Exit Function Error_AccessAndJetErrorsTable: MsgBox Err & ": " & Err.Description AccessAndJetErrorsTable = False Resume Exit_AccessAndJetErrorsTable End Function HTH Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 27, 2004 12:04 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Error List Does anyone have a link to a list of VBA error? MTIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Tue Jul 27 11:37:05 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Tue, 27 Jul 2004 12:37:05 -0400 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010a01c47395$0e0d23c0$48619a89@DDICK> Message-ID: <002701c473f7$f6f0d070$0201a8c0@COA3> How about changing: c:\Progra~1\Truman\Truman.mdb To: START c:\Progra~1\Truman\Truman.mdb Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 12:49 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy Thanks Stuart That sounds about right Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Tuesday, July 27, 2004 2:41 PM Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > So I thought I would just launch the app from the users desktop with > > a BATCH file. The batch file copies the new version each and every > > time (whether it's new or not) then sparks up the app, all from > > within the batch file Simple - on XP and WIN2000 at least > > > > Here is the batch file............... > > REM START BATCH FILE########################################### > > echo Updating your system to the latest Version of TruMan... copy > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > ########################################### > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > command or file name (Bugger it doesn't spark up the app) > > > > The S drive location of the new app is valid. The destination folder > > in Program files and the existence > > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > > > The on the Win 98 machine if I copy the line " > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > app as desired. So it works from Start|Run but not a > > batchfile?????!!!!!!! > > > > I'm stumped - any suggestions? > > > > IIRC, in Win9X, you need to specify the application in batch files > (and in > scheduled tasks?) so you will need something like: > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > Files\Truman\Truman.mdb" > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 27 12:16:57 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 27 Jul 2004 10:16:57 -0700 Subject: [AccessD] Error List References: <1D7828CDB8350747AFE9D69E0E90DA1F1CA11F@xlivmbx21.aig.com> Message-ID: <017501c473fd$8586ca60$6601a8c0@HAL9002> Heenan: Thanx. That did it! Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Heenan, Lambert" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 27, 2004 9:12 AM Subject: RE: [AccessD] Error List > This code will create tables for you containing the error codes and > descriptions... > > Option Compare Database > Option Explicit > > Sub CreateErrorsTable() > Dim dbs As Database, tdf As TableDef, fld As Field > Dim rst As Recordset, lngCode As Long > Const conAppObjectError = "Application-defined or object-defined error" > > ' Create Errors table with ErrorNumber and ErrorDescription fields. > Set dbs = CurrentDb > Set tdf = dbs.CreateTableDef("Errors") > Set fld = tdf.CreateField("ErrorCode", dbLong) > tdf.Fields.Append fld > Set fld = tdf.CreateField("ErrorString", dbText, 255) > tdf.Fields.Append fld > > dbs.TableDefs.Append tdf > ' Open recordset on Errors table. > Set rst = dbs.OpenRecordset("Errors") > ' Loop through first 1000 Visual Basic error codes. > For lngCode = 1 To 1000 > On Error Resume Next > ' Raise each error. > Err.Raise lngCode > DoCmd.Hourglass True > ' Skip error codes that generate application or object-defined > errors. > If Err.Description <> conAppObjectError Then > ' Add each error code and string to Errors table. > rst.AddNew > > rst!ErrorCode = Err.Number > rst!ErrorString = Err.Description > rst.Update > End If > ' Clear Err object. > Err.Clear > Next lngCode > ' Close recordset. > rst.Close > DoCmd.Hourglass False > MsgBox "Errors table created." > End Sub > > Function AccessAndJetErrorsTable() As Boolean > Dim dbs As Database, tdf As TableDef, fld As Field > Dim rst As Recordset, lngCode As Long > Dim strAccessErr As String > Const conAppObjectError = "Application-defined or object-defined error" > > On Error GoTo Error_AccessAndJetErrorsTable > ' Create Errors table with ErrorNumber and ErrorDescription fields. > Set dbs = CurrentDb > Set tdf = dbs.CreateTableDef("AccessAndJetErrors") > Set fld = tdf.CreateField("ErrorCode", dbLong) > > tdf.Fields.Append fld > Set fld = tdf.CreateField("ErrorString", dbMemo) > tdf.Fields.Append fld > > dbs.TableDefs.Append tdf > ' Open recordset on Errors table. > Set rst = dbs.OpenRecordset("AccessAndJetErrors") > ' Loop through error codes. > For lngCode = 0 To 3500 > On Error Resume Next > ' Raise each error. > strAccessErr = AccessError(lngCode) > DoCmd.Hourglass True > ' Skip error numbers without associated strings. > If strAccessErr <> "" Then > > ' Skip codes that generate application or object-defined errors. > If strAccessErr <> conAppObjectError Then > ' Add each error code and string to Errors table. > rst.AddNew > rst!ErrorCode = lngCode > ' Append string to memo field. > rst!ErrorString.AppendChunk strAccessErr > rst.Update > End If > End If > Next lngCode > ' Close recordset. > rst.Close > DoCmd.Hourglass False > RefreshDatabaseWindow > MsgBox "Access and Jet errors table created." > > AccessAndJetErrorsTable = True > > Exit_AccessAndJetErrorsTable: > Exit Function > > Error_AccessAndJetErrorsTable: > MsgBox Err & ": " & Err.Description > AccessAndJetErrorsTable = False > Resume Exit_AccessAndJetErrorsTable > End Function > > HTH > > Lambert > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - > Beach Access Software > Sent: Tuesday, July 27, 2004 12:04 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error List > > > Does anyone have a link to a list of VBA error? > > MTIA > > Rocky Smolin > Beach Access Software > http://www.e-z-mrp.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From michael.mattys at adelphia.net Tue Jul 27 12:26:01 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 27 Jul 2004 13:26:01 -0400 Subject: [AccessD] FaceID master reference for CommandBars? References: <191280-220047227161125890@christopherhawkins.com> Message-ID: <012701c473fe$cd21d350$6401a8c0@default> Christopher, Office CommandBars Enumeration on http://www.mainsoft.fr/freeware_en.htm ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Tuesday, July 27, 2004 12:11 PM Subject: [AccessD] FaceID master reference for CommandBars? > God, how I hate CommandBars. ;) > > Can anyone point me to a resource that lists the FaceID of each icon > available for use on an Access Command Bar Button? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Tue Jul 27 12:29:41 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 27 Jul 2004 13:29:41 -0400 Subject: [AccessD] FaceID master reference for CommandBars? References: <191280-220047227161125890@christopherhawkins.com> Message-ID: <012b01c473ff$50738820$6401a8c0@default> Display the available icons (FaceIds) for office commandbars Submitted By Andrew Baker The following code will create several toolbars containing all the icons available for use in office toolbars. 'Creates toolbars with 300 faces icons on each. Sub ShowAllToolbarIcons() Const clMaxFaceId As Long = 3900, clButtonsPerBar As Long = 300, clMaxToolbar As Long = 13 Dim lThisBar As Long, lFirstId As Long, lLastId As Long Dim lThisId As Long, oThisCtrl As CommandBarButton Dim oCmdBar As CommandBar, oClipIcon As StdPicture On Error GoTo ErrMaxID For lThisBar = 0 To clMaxToolbar 'Put 300 buttons on each bar lFirstId = lThisBar * clButtonsPerBar lLastId = lFirstId + clButtonsPerBar - 1 Set oCmdBar = CommandBars.Add For lThisId = lFirstId To lLastId Set oThisCtrl = oCmdBar.Controls.Add oThisCtrl.FaceId = lThisId oThisCtrl.TooltipText = "FaceId = " & lThisId Next oCmdBar.Name = ("Buttons with FaceIds " & CStr(lFirstId) & " to " & CStr(lLastId)) oCmdBar.Width = 591 oCmdBar.Visible = True Next Exit Sub 'Delete the button that caused the error and set toolbar name ErrMaxID: oThisCtrl.Delete oCmdBar.Name = ("Faces " & CStr(lFirstId) & " to " & CStr(lThisId - 1)) oCmdBar.Width = 591 oCmdBar.Visible = True End Sub ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Tuesday, July 27, 2004 12:11 PM Subject: [AccessD] FaceID master reference for CommandBars? > God, how I hate CommandBars. ;) > > Can anyone point me to a resource that lists the FaceID of each icon > available for use on an Access Command Bar Button? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jmoss111 at bellsouth.net Tue Jul 27 12:36:26 2004 From: jmoss111 at bellsouth.net (jmoss111 at bellsouth.net) Date: Tue, 27 Jul 2004 13:36:26 -0400 Subject: [AccessD] Updating subform with query value Message-ID: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the query values to display on the subforms? Thanks in advance for any assistance. Jim From DWUTKA at marlow.com Tue Jul 27 12:44:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 12:44:21 -0500 Subject: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B7@main2.marlow.com> No problem. By the way, if anyone has downloaded that link already, download it again. I just tweaked the code a little bit. I tried it on a reporting db we have, which has mainly ODBC linked tables to a massive Oracle database. It failed for two reasons, one, the table names had underscores in them, and a lot of tables had WAY too many text fields, so it was kicking back that the query was too complex. I fixed the code to wrap the table names with brackets, and now it only uses 5 OR statements per where clause (so you could have more then one SQL statement being run against a table, just with different where statements). With the fixes, it worked fine. Took about 30 minutes to run on that database. Not bad, earlier attempts to scan that thing before took hours, or longer. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Tuesday, July 27, 2004 7:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Thanks Drew. Meetings seem to be taking over my day so I will get back to you ASAP with any feedback. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, July 26, 2004 6:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 DWUTKA at marlow.com Tue Jul 27 12:47:26 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 12:47:26 -0500 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B8@main2.marlow.com> Just perusing this thread. Darren, didn't I send you my VB Front End updater? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Monday, July 26, 2004 11:30 PM To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 27 13:12:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jul 2004 14:12:56 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1B3@main2.marlow.com> Message-ID: <000201c47405$5bb9d3a0$80b3fea9@ColbyM6805> >Boy, that was actually fun to build! You GOTTA get a life! ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 13:26:06 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 13:26:06 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1BA@main2.marlow.com> Sure do. Unfortunately, I find it easier to deal with computers then people sometimes! LOL Just kidding. Actually, since I've moved to Dallas (after my separation), I've had a much more active social life. But you have to admit, there are always those little projects that are just plain COOL to write. Know what I mean? That feeling of wrapping your mind around a problem and wringing a solution out.....just can't beat it! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, July 27, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search >Boy, that was actually fun to build! You GOTTA get a life! ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Tue Jul 27 13:43:19 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Tue, 27 Jul 2004 14:43:19 -0400 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <20040727184318.ORJY1721.imf20aec.mail.bellsouth.net@SUSANONE> What kind of data's in effdt? Susan H. Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I run the query...I get different results...is there something about >the sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I > > > am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfeeR Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Tue Jul 27 13:56:39 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 27 Jul 2004 14:56:39 -0400 Subject: [AccessD] Replication Message-ID: I have an Access97 backend that I would like to replicate with an SQL server once per hour. Is this possible? Would you do this differently? Any help will be much appreciated. Some details... 1) The back-end is on a win95 laptop. The hardware is too old to upgrade any software. 2) We like the idea of keeping the back-end local because the network can be flakey at times. This application needs to run 24x7 with no down-time. 3) Currently, there are six of these machines that synchronize with a master copy on the network, once per hour. 4) I want to upsize the master to SQL Server so that a maintenance module can be written using ASP.NET. I know that you can open the network copy of the mdb in ASP.NET via ADO, I just prefer upsizing to SQL Server. 5) Eventually (could be years or sooner if the above goes well) these win95 laptops will be replaced and those front ends will be rewritten (probably ASP.NET if that is the technology we stick with). 6) I'm fairly familiar with replication at the mdb level, but not SQL Server level. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 From marcus at tsstech.com Tue Jul 27 14:08:40 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 27 Jul 2004 15:08:40 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 Mark, You WHERE clause is probably giving you some trouble because 'tblPRS_Pending_PHONE.bo_id = A.bo_id' are the same instance therefore giving random values. Try the following.... SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (((B.effdt)=(SELECT Max(A.effdt) FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id and B.profile_cm_seq = A.profile_cm_seq;)) AND ((B.primary_ind)="y")); -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, July 27, 2004 12:11 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I >run the query...I get different results...is there something about the >sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee(r) Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jul 27 16:22:25 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 27 Jul 2004 16:22:25 -0500 Subject: [AccessD] Hit the Wall? (Solved) In-Reply-To: <12346249.1090806732279.JavaMail.root@sniper8.usinternet.com> Message-ID: <003c01c4741f$d0bef440$de1811d8@danwaters> Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 16:41:07 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 16:41:07 -0500 Subject: [AccessD] Hit the Wall? (Solved) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1BE@main2.marlow.com> LOL. No problem. Just an FYI, drop the single integer to a Byte field. It won't change your code, or the values, but single integers are two bytes, so you'll be dropping an extra byte per field, per record. Bit comparison has it's advantages, but it also has disadvantages (a little more difficult to query, because an individual value isn't going to be indexed well, since it 1, 3, 7 all have the 1 bit turned on, but an index would see those as three different values, also it limits the viewing to a developed GUI, it would be a nightmare to try and explain how bits in a byte work to a user, so they could look directly at a querry's datasheet view! LOL). Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Tuesday, July 27, 2004 4:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? (Solved) Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 17:54:28 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 08:54:28 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <2F8793082E00D4119A1700B0D0216BF8031BB1B8@main2.marlow.com> Message-ID: <006f01c4742c$abf5eb20$48619a89@DDICK> nope would love a copy of it I was about to write something in VB myself Yours would definitely be better DD ----- Original Message ----- From: To: Sent: Wednesday, July 28, 2004 3:47 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Just perusing this thread. Darren, didn't I send you my VB Front End > updater? > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Monday, July 26, 2004 11:30 PM > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting > and it copies the 'new' version to the local machine. So for the current > session the user is using the 'old' version > but next time they spark up the app they are automatically using the 'new' > version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath > but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 18:27:51 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 18:27:51 -0500 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1C3@main2.marlow.com> Sent it to you off list. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 5:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy nope would love a copy of it I was about to write something in VB myself Yours would definitely be better DD ----- Original Message ----- From: To: Sent: Wednesday, July 28, 2004 3:47 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Just perusing this thread. Darren, didn't I send you my VB Front End > updater? > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Monday, July 26, 2004 11:30 PM > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting > and it copies the 'new' version to the local machine. So for the current > session the user is using the 'old' version > but next time they spark up the app they are automatically using the 'new' > version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath > but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 27 18:38:47 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jul 2004 19:38:47 -0400 Subject: [AccessD] Hit the Wall? (Solved) In-Reply-To: <003c01c4741f$d0bef440$de1811d8@danwaters> Message-ID: <000901c47432$e0c992b0$80b3fea9@ColbyM6805> Dan, If speed is not critical, always go for the minimum data size necessary for to hold the data. A byte will hold that data quite nicely and double the number of such fields you can fit in a given amount of memory. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Tuesday, July 27, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? (Solved) Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 19:17:16 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 10:17:16 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <200407270757.i6R7vKQ29697@databaseadvisors.com> Message-ID: <00f701c47438$3d06c160$48619a89@DDICK> Way cool many thanks Max I've been wanting to play with Vb scripts here we go Many thanks Darren ----- Original Message ----- From: "MG" To: ; "'Access Developers discussion and problem solving'" Sent: Tuesday, July 27, 2004 5:57 PM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Sorry, I should have said that the filename for the vbs code I just posted, > must end in .vbs so that your operating system can find it. Don't > know if it will run on 98 machines though. > > Max Sherman > > -----Original Message----- > From: MG [mailto:mgauk at btconnect.com] > Sent: 27 July 2004 08:48 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > > Here is the code that I use. I put in each person's c:\ root and then call > it in their startup menu. Adjust to suit. > Max Sherman > CODE: > ' Max Sherman Jan 2004 > ' Program to run (1) from Startup and (2) from User Desktop ' copies over > the version on the Server to the user's PC - It does not check for dates as > per Version 1. > ' It also synchonises times on all machine to agree with that on Server. > > Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, > fOnServerPC, fOnLocalPC > Dim strUser,objShell,objNetwork > > Set FSO = CreateObject("Scripting.FileSystemObject") > Set objShell = wscript.createobject("WScript.shell") > Set objNetwork = wscript.createobject("WScript.Network") > > strUser = objnetwork.userdomain > ' wscript.echo struser > > objShell.run("NET TIME \\Server /SET /YES") > > if strUser = "MAX" then > ' wscript.Echo "Skipped" > else > fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" > fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" > wscript.Echo ("Checking For MCM File Updates: Please Click OK and > then wait until the messagebox re-appears") > > ' Server File > If (FSO.FileExists(fOnServerPC)) Then > Set fServer = FSO.GetFile(fOnServerPC) > FSO.CopyFile fOnServerPC , fOnLocalPC > wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now > been copied onto your computer") > Else > wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is > missing from the Server. Please Report This Immediately") > End If > End if > > Set FSO = nothing > set objShell = nothing > set objNetworkl = nothing > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: 27 July 2004 05:30 > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting and it copies the 'new' version to > the local machine. So for the current session the user is using the 'old' > version but next time they spark up the app they are automatically using the > 'new' version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, all from within the batch file Simple - on > XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger > it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence of the 'old' version is valid. (Remember > this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and > paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it > works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > --- > Incoming mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 19:28:21 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 10:28:21 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <002701c473f7$f6f0d070$0201a8c0@COA3> Message-ID: <010f01c47439$c96fc600$48619a89@DDICK> Steve may thanks that works great Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? ----- Original Message ----- From: "Steve Conklin (Developer at UltraDNT)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 28, 2004 2:37 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > How about changing: > c:\Progra~1\Truman\Truman.mdb > To: > START c:\Progra~1\Truman\Truman.mdb > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Tuesday, July 27, 2004 12:49 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Thanks Stuart > That sounds about right > Many thanks > > Darren > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problemsolving" > > Sent: Tuesday, July 27, 2004 2:41 PM > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > > > > > So I thought I would just launch the app from the users desktop with > > > > a BATCH file. The batch file copies the new version each and every > > > time (whether it's new or not) then sparks up the app, all from > > > within the batch file Simple - on XP and WIN2000 at least > > > > > > Here is the batch file............... > > > REM START BATCH FILE########################################### > > > echo Updating your system to the latest Version of TruMan... copy > > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > > ########################################### > > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > > command or file name (Bugger it doesn't spark up the app) > > > > > > The S drive location of the new app is valid. The destination folder > > > > in Program files and the existence > > > of the 'old' version is valid. (Remember this works on XP and > WIN2000) > > > > > > The on the Win 98 machine if I copy the line " > > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > > app as desired. So it works from Start|Run but not a > > > batchfile?????!!!!!!! > > > > > > I'm stumped - any suggestions? > > > > > > > IIRC, in Win9X, you need to specify the application in batch files > > (and in > > scheduled tasks?) so you will need something like: > > > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > > Files\Truman\Truman.mdb" > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Tue Jul 27 23:54:58 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 28 Jul 2004 00:54:58 -0400 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010f01c47439$c96fc600$48619a89@DDICK> Message-ID: <000501c4745f$0b78d580$0201a8c0@COA3> If you can sit at the 98 machine, right-click the batch file, click Properties, and then check "Close On Exit." ... If you can't visit each 98 machine personally, I know I used do this via login script ...IIRC (this was a while ago!), I would click that property on from my workstation... Doing that would generate a .PIF (or .LNK ?) file. I would use the login script send that file to each users' C:\WINDOWS\COMMAND folder ... Then when they ran that particular batch, those PIF settings would kick in. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 8:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy Steve may thanks that works great Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? ----- Original Message ----- From: "Steve Conklin (Developer at UltraDNT)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 28, 2004 2:37 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > How about changing: > c:\Progra~1\Truman\Truman.mdb > To: > START c:\Progra~1\Truman\Truman.mdb > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Tuesday, July 27, 2004 12:49 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Thanks Stuart > That sounds about right > Many thanks > > Darren > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problemsolving" > > Sent: Tuesday, July 27, 2004 2:41 PM > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > > > > > So I thought I would just launch the app from the users desktop > > > with > > > > a BATCH file. The batch file copies the new version each and every > > > time (whether it's new or not) then sparks up the app, all from > > > within the batch file Simple - on XP and WIN2000 at least > > > > > > Here is the batch file............... > > > REM START BATCH FILE########################################### > > > echo Updating your system to the latest Version of TruMan... copy > > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > > ########################################### > > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > > command or file name (Bugger it doesn't spark up the app) > > > > > > The S drive location of the new app is valid. The destination > > > folder > > > > in Program files and the existence > > > of the 'old' version is valid. (Remember this works on XP and > WIN2000) > > > > > > The on the Win 98 machine if I copy the line " > > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > > app as desired. So it works from Start|Run but not a > > > batchfile?????!!!!!!! > > > > > > I'm stumped - any suggestions? > > > > > > > IIRC, in Win9X, you need to specify the application in batch files > > (and in > > scheduled tasks?) so you will need something like: > > > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > > Files\Truman\Truman.mdb" > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Wed Jul 28 02:52:27 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Wed, 28 Jul 2004 08:52:27 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Dear Experts I can divide in Access the days from a date() into years with a simple /365, but is there a way to have months and days ... so I have years, months and days, please? Cheers paul From gustav at cactus.dk Wed Jul 28 05:35:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:35:19 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <1509725644.20040728123519@cactus.dk> Hi Mark I would split it in two queries and test that. /gustav > SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, > tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, > tblPRS_Pending_PHONE.phone > FROM tblPRS_Pending_PHONE > WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt > FROM tblPRS_Pending_PHONE A > WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and > tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND > ((tblPRS_Pending_PHONE.primary_ind)="y")); From gustav at cactus.dk Wed Jul 28 05:41:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:41:20 +0200 Subject: [AccessD] Updating subform with query value In-Reply-To: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> References: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> Message-ID: <1410085912.20040728124120@cactus.dk> Hi Jim The easy route would be to move the parameters into the LinkMasterFields and LinkChildFields of the subform control. /gustav > In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the > query values to display on the subforms? From gustav at cactus.dk Wed Jul 28 05:38:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:38:17 +0200 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010f01c47439$c96fc600$48619a89@DDICK> References: <002701c473f7$f6f0d070$0201a8c0@COA3> <010f01c47439$c96fc600$48619a89@DDICK> Message-ID: <699903220.20040728123817@cactus.dk> Hi Darren > Steve may thanks > that works great > Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? Try: START /b c:\Progra~1\Truman\Truman.mdb /gustav From gustav at cactus.dk Wed Jul 28 05:56:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:56:25 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: References: Message-ID: <11810991404.20040728125625@cactus.dk> Hi Paul > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? That depends. For days, use DateDiff("d", datFrom, Date()) For banking months, these always have a day count of 30, and /365 is not reliable when including leap years. For calendar months and years it is slightly more complicated as "a month" is not always the same thing. We use these functions: Public Function Months( _ ByVal datDate1 As Date, _ ByVal datDate2 As Date) _ As Integer ' Returns the difference in full months between datDate1 and datDate2. ' ' Calculates correctly for: ' negative differences ' leap years ' dates of 29. February ' date/time values with embedded time values ' negative date/time values (prior to 1899-12-29) ' ' Gustav Brock, Cactus Data ApS. ' 2000-12-20. Dim intDay1 As Integer Dim intDay2 As Integer Dim intMonths As Integer Dim intDaysDiff As Integer Dim intReversed As Integer ' No special error handling. On Error Resume Next intMonths = DateDiff("m", datDate1, datDate2) If intMonths = 0 Then ' Both dates fall within the same month. Else intDay1 = Day(datDate1) intDay2 = Day(datDate2) If Month(datDate1) < Month(DateAdd("d", 1, datDate1)) Then ' Date datDate1 is ultimo. ' Decrease date datDate2 if day of datDate2 it is higher. If intDay2 > intDay1 Then datDate2 = DateAdd("d", intDay1 - intDay2, datDate2) intDay2 = Day(datDate2) End If End If If Month(datDate2) < Month(DateAdd("d", 1, datDate2)) Then ' Date datDate2 is ultimo. ' Decrease date datDate1 if day of datDate1 it is higher. If intDay1 > intDay2 Then datDate1 = DateAdd("d", intDay2 - intDay1, datDate1) intDay1 = Day(datDate1) End If End If ' Calculate day difference. intDaysDiff = intDay1 - intDay2 intReversed = Sgn(intMonths) ' Decrease count of months by one if dates are closer than one month. intMonths = intMonths - (intReversed * Abs((intReversed * intDaysDiff) > 0)) End If Months = intMonths End Function Public Function Years( _ ByVal datDate1 As Date, _ ByVal datDate2 As Date) _ As Integer ' Returns the difference in full years between datDate1 and datDate2. ' ' Calculates correctly for: ' negative differences ' leap years ' dates of 29. February ' date/time values with embedded time values ' negative date/time values (prior to 1899-12-29) ' ' Gustav Brock, Cactus Data ApS. ' 2000-11-03. ' 2000-12-16. Leap year correction modified to be symmetrical. ' Calculation of intDaysDiff simplified. ' Renamed from YearsDiff() to Years(). ' 2000-12-18. Added cbytMonthDaysMax. ' Constants for leap year calculation. Last normal date of February. Const cbytFebMonth As Byte = 2 Const cbytFebLastDay As Byte = 28 ' Maximum number of days in a month. Const cbytMonthDaysMax As Byte = 31 Dim intYears As Integer Dim intDaysDiff As Integer Dim intReversed As Integer ' No special error handling. On Error Resume Next intYears = DateDiff("yyyy", datDate1, datDate2) If intYears = 0 Then ' Both dates fall within the same year. Else ' Check for ultimo February and leap years. If (Month(datDate1) = cbytFebMonth) And (Month(datDate2) = cbytFebMonth) Then ' Both dates fall in February. ' Check if dates are at ultimo February. If (Day(datDate1) >= cbytFebLastDay) And (Day(datDate2) >= cbytFebLastDay) Then ' Both dates are at ultimo February. ' Check if the dates fall in leap years. If Day(DateSerial(Year(datDate1), cbytFebMonth + 1, 0)) = cbytFebLastDay Xor _ Day(DateSerial(Year(datDate2), cbytFebMonth + 1, 0)) = cbytFebLastDay Then ' Only one date falls within a leap year. ' Adjust both dates to day 28 of February. datDate1 = DateAdd("d", cbytFebLastDay - Day(datDate1), datDate1) datDate2 = DateAdd("d", cbytFebLastDay - Day(datDate2), datDate2) Else ' Both dates fall either in leap years or non leap years. ' No adjustment needed. End If End If End If ' Calculate day difference using months and days as Days() will fail when ' comparing leap years with non leap years for dates after February. intDaysDiff = (Month(datDate1) * cbytMonthDaysMax + Day(datDate1)) - (Month(datDate2) * cbytMonthDaysMax + Day(datDate2)) intReversed = Sgn(intYears) ' Decrease count of years by one if dates are closer than one year. intYears = intYears + (intReversed * ((intReversed * intDaysDiff) > 0)) End If Years = intYears End Function /gustav From andy at minstersystems.co.uk Wed Jul 28 06:10:05 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 12:10:05 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: <20040728111013.3569E2577C2@smtp.nildram.co.uk> Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > 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 jmoss111 at bellsouth.net Wed Jul 28 06:11:41 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Wed, 28 Jul 2004 06:11:41 -0500 Subject: [AccessD] Updating subform with query value In-Reply-To: <1410085912.20040728124120@cactus.dk> Message-ID: Gustav, Thanks for the answer. I worked this out last night and what I did was hide the subforms on load and then did a .requery and .visible on the subforms in the text box AfterUpdate event. I didnt think that I could use a text box as master to the childs query column, but it appears that I could. Once again, thanks for your help. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 5:41 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Updating subform with query value Hi Jim The easy route would be to move the parameters into the LinkMasterFields and LinkChildFields of the subform control. /gustav > In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the > query values to display on the subforms? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 06:15:39 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 07:15:39 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: You said you already have days and years(Years is (days/365)). That leaves months and weeks. Months should be (days/365)*12. Weeks should be (days/365)*52. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Rodgers Sent: Wednesday, July 28, 2004 3:52 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Dear Experts I can divide in Access the days from a date() into years with a simple /365, but is there a way to have months and days ... so I have years, months and days, please? Cheers paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 06:26:44 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 07:26:44 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: Andy, The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. Years would be DateDiff("d",begindate,enddate)/365 Months would be (DateDiff("d",begindate,enddate)/365)*12 Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 Days would be DateDiff("d",begindate,enddate) Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, July 28, 2004 7:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Wed Jul 28 06:44:45 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 07:44:45 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <001901c4734d$db144030$80b3fea9@ColbyM6805> Message-ID: <00cc01c47498$47ec8370$6601a8c0@rock> Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Wed Jul 28 06:53:56 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 28 Jul 2004 21:53:56 +1000 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: <41082074.20199.19EB930@lexacorp.com.pg> On 28 Jul 2004 at 8:52, Paul Rodgers wrote: > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, No you can't because Leap Years don't have 365 days :-( > but is there a way to have months and days ... so I have years, months > and days, please? > First, you need to determine what answers you want. Take 28 Feb 03 to 1 Apr 03 as an example: Is that 1 month and 1 day (end of Feb to end of Mar + 1 day) or 1 month and 4 days (28 Feb to 28 Mar + 4 days) You will need to develop functions based on which interpretation you want. Here's one I've just knocked up that will return the second answer. I'll leave it to you to work out a method if you want the first answer. BTW, I've just copyrighted the word monthiversary :-) Function YMDDiff(Date1 As Date, Date2 As Date) As String Dim years As Long Dim months As Long Dim days As Long Dim monthiversary As Date months = DateDiff("m", Date1, Date2) years = Int(months / 12) monthiversary = DateAdd("m", months, Date1) If Date2 - monthiversary < 0 Then months = months - 1 days = Date2 - DateAdd("m", -1, monthiversary) Else days = Date2 - monthiversary End If months = months - (years * 12) YMDDiff = years & " years, " & months & " months" & " and " & days & " days" End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From marcus at tsstech.com Wed Jul 28 07:09:54 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 08:09:54 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: Here is a function that is approximate. You will need to add code for leap years... Public Function YMD(ByVal startdate As Date, ByVal enddate As Date) Dim intYears As Integer Dim intMonths As Integer Dim intDays As Integer intDays = DateDiff("d", startdate, enddate) intYears = intDays / 365 intMonths = (intDays / 365) * 12 - (intYears * 12) intDays = intDays - (intYears * 365) - ((intMonths / 12) * 365) YMD = "Years:" & intYears & " Months:" & intMonths & " Days:" & intDays End Function From doug at starntech.com Wed Jul 28 07:50:48 2004 From: doug at starntech.com (Douglas Barnes) Date: Wed, 28 Jul 2004 08:50:48 -0400 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: Try looking at the DATESERIAL function Function Age(Date1 As Date, Date2 As Date) As String Dim Y As Integer Dim M As Integer Dim D As Integer Dim Temp1 As Date Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) D = Day(Date2) - Day(Date1) If D < 0 Then M = M - 1 D = Day(DateSerial(Year(date2), Month(date2), 0)) + D End If Age = Y & " years " & M & " months " & D & " days" End Function Douglas Barnes Starn Technical Services P. O. 1172 Meadville, PA 16335 814.724.1045 doug at starntech.com www.starntech.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Scott Marcus Sent: July 28, 2004 8:10 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Here is a function that is approximate. You will need to add code for leap years... Public Function YMD(ByVal startdate As Date, ByVal enddate As Date) Dim intYears As Integer Dim intMonths As Integer Dim intDays As Integer intDays = DateDiff("d", startdate, enddate) intYears = intDays / 365 intMonths = (intDays / 365) * 12 - (intYears * 12) intDays = intDays - (intYears * 365) - ((intMonths / 12) * 365) YMD = "Years:" & intYears & " Months:" & intMonths & " Days:" & intDays End Function -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 08:02:12 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:02:12 +0000 Subject: [AccessD] Query giving different results each time Message-ID: It is a date...this app uses what they call "Effective Dating"...where the max of is the record that is currently active. Thanks, Mark >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:43:19 -0400 > >What kind of data's in effdt? > >Susan H. > > >Charlotte, > >The original post had the SQL...but here is what I am currently using...but >with the same inconsistant results. Any ideas would be greatly >appreciated. > >Thanks, > >Mark > >SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, >tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, >tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE >(((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM >tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and >tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND >((tblPRS_Pending_PHONE.primary_ind)="y")); > > > >From: "Charlotte Foust" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 08:56:24 -0700 > > > >I missed the part of thread where you mentioned a sub-query. Have you > >posted the SQL for this query/subquery? > > > >Charlotte Foust > > > > > >-----Original Message----- > >From: Mark A Matte [mailto:markamatte at hotmail.com] > >Sent: Tuesday, July 27, 2004 7:19 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Yes I tried the compact and repair. It didn't seem to help. Each time > >I run the query...I get different results...is there something about > >the sub-query I am missing? > > > >Thanks, > > > >Mark A. Matte > > > > > > >From: "Stuart McLachlan" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: Access Developers discussion and > > >problemsolving > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > > > Hello All, > > > > > > > > Thanks for the feedback...but I'm still a little confused...If I > > > > am > > >running > > > > the same SQL against the same table...back to back...why am I > > > > getting different results? > > > > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > > > >-- > > >Lexacorp Ltd > > >http://www.lexacorp.com.pg > > >Information Technology Consultancy, Software Development,System > > >Support. > > > > > > > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Is your PC infected? Get a FREE online computer virus scan from > >McAfee(r) > >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from McAfeeR >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ MSN Toolbar provides one-click access to Hotmail from any Web page ? FREE download! http://toolbar.msn.click-url.com/go/onm00200413ave/direct/01/ From gustav at cactus.dk Wed Jul 28 08:09:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 15:09:47 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <2818993401.20040728150947@cactus.dk> Hi Mark Does this "date" contain a time component? Or is it a clean date? /gustav > It is a date...this app uses what they call "Effective Dating"...where the > max of is the record that is currently active. From marcus at tsstech.com Wed Jul 28 08:12:00 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 09:12:00 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Do you try the following to see if it fixes your problem? SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.effdt=(SELECT Max(A.effdt) FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id AND B.profile_cm_seq = A.profile_cm_seq)) AND B.primary_ind="y"; Scott Marcus From markamatte at hotmail.com Wed Jul 28 08:26:52 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:26:52 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Scott, Thanks for the feedback...but the results of this sql are also inconsistant...I ran it 3 times...and got 3 different results...the reslults are typically close...for the last 3 tries...it returned 2365, 2369 and 2375...without changing anything...just re-running the sql??? I fell very confused...lol Any ideas? Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:12:00 -0400 > >Mark, > >Do you try the following to see if it fixes your problem? > >SELECT B.profile_cm_seq, > B.effdt, > B.bo_id, > B.primary_ind, > B.phone >FROM tblPRS_Pending_PHONE B >WHERE (B.effdt=(SELECT Max(A.effdt) > FROM tblPRS_Pending_PHONE A > WHERE B.bo_id = A.bo_id > AND > B.profile_cm_seq = A.profile_cm_seq)) > AND > B.primary_ind="y"; > > >Scott Marcus > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From markamatte at hotmail.com Wed Jul 28 08:27:32 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:27:32 +0000 Subject: [AccessD] Query giving different results each time Message-ID: It is just the date. Thanks, Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 15:09:47 +0200 > >Hi Mark > >Does this "date" contain a time component? Or is it a clean date? > >/gustav > > > > It is a date...this app uses what they call "Effective Dating"...where >the > > max of is the record that is currently active. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From gustav at cactus.dk Wed Jul 28 08:30:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 15:30:05 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: References: Message-ID: <18220211272.20040728153005@cactus.dk> Hi Douglas > Function Age(Date1 As Date, Date2 As Date) As String > Dim Y As Integer > Dim M As Integer > Dim D As Integer > Dim Temp1 As Date > Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) > Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) > M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) > D = Day(Date2) - Day(Date1) > If D < 0 Then > M = M - 1 > D = Day(DateSerial(Year(date2), Month(date2), 0)) + D > End If > Age = Y & " years " & M & " months " & D & " days" > End Function Just for the records - this Age() as well as quite a few other Age-functions will fail for those born on 29. Feb. Look up in the archive "Age Calc - How much have I forgotten" to see a reliable method. /gustav From marcus at tsstech.com Wed Jul 28 08:35:47 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 09:35:47 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Lets try a different route. Please explain what you have and what result you want. Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 9:27 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Scott, Thanks for the feedback...but the results of this sql are also inconsistant...I ran it 3 times...and got 3 different results...the reslults are typically close...for the last 3 tries...it returned 2365, 2369 and 2375...without changing anything...just re-running the sql??? I fell very confused...lol Any ideas? Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:12:00 -0400 > >Mark, > >Do you try the following to see if it fixes your problem? > >SELECT B.profile_cm_seq, > B.effdt, > B.bo_id, > B.primary_ind, > B.phone >FROM tblPRS_Pending_PHONE B >WHERE (B.effdt=(SELECT Max(A.effdt) > FROM tblPRS_Pending_PHONE A > WHERE B.bo_id = A.bo_id > AND > B.profile_cm_seq = A.profile_cm_seq)) > AND > B.primary_ind="y"; > > >Scott Marcus > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 09:34:36 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 14:34:36 +0000 Subject: [AccessD] Query giving different results each time Message-ID: I'll do my best... The table in question uses the following fields: bo_id...unique number string for each customer profile_cm_seq...unique number string for each phone number primary_ind...yes/no filed indicating primary Effdt...date row is active Phone...phone number Each time a phone number is added...or changed...multiple rows are added. If you have the following row bo pro_cm_seq Primary effdt phone 10 86547 Y 5/21/2004 888/555/1212 and you add a new PRIMARY number336/555/2222 today...the following rows will be added: bo pro_cm_seq Primary effdt phone 10 86547 N 7/28/2004 888/555/1212 10 11235 Y 7/28/2004 336/555/2222 So now...I need the most current PRIMARY Phone number...but I have 2 records that show as PRIMARY with 2 different numbers... I can't just do a max on the date because the phone numbers are different. I even went as far as islolating some of the records that showed in one pull but not the next...if I run the sql for just that bo_id...it pulls correctly everytime. The table only has 2967 records in it. All fields mentioned are TEXT except for the effdt...which is a date field. If I could not get the right number of rows in my output...I would just keep tweaking the sql...my concern is why the same sql keeps giving me different results. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:35:47 -0400 > >Lets try a different route. Please explain what you have and what result >you want. > >Scott Marcus > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 9:27 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Scott, > >Thanks for the feedback...but the results of this sql are also >inconsistant...I ran it 3 times...and got 3 different results...the >reslults >are typically close...for the last 3 tries...it returned 2365, 2369 and >2375...without changing anything...just re-running the sql??? > >I fell very confused...lol > >Any ideas? > >Thanks, > >Mark > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > >Mark, > > > >Do you try the following to see if it fixes your problem? > > > >SELECT B.profile_cm_seq, > > B.effdt, > > B.bo_id, > > B.primary_ind, > > B.phone > >FROM tblPRS_Pending_PHONE B > >WHERE (B.effdt=(SELECT Max(A.effdt) > > FROM tblPRS_Pending_PHONE A > > WHERE B.bo_id = A.bo_id > > AND > > B.profile_cm_seq = A.profile_cm_seq)) > > AND > > B.primary_ind="y"; > > > > > >Scott Marcus > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ From andy at minstersystems.co.uk Wed Jul 28 09:36:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 15:36:18 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: <20040728143614.C99A925DE14@smtp.nildram.co.uk> True. Sorry. Should engage brain before fingers. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Date: 28/07/04 11:26 > > Andy, > > The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. > > Years would be DateDiff("d",begindate,enddate)/365 > Months would be (DateDiff("d",begindate,enddate)/365)*12 > Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 > Days would be DateDiff("d",begindate,enddate) > > Scott Marcus > TSS Technologies, Inc. > marcus at tsstech.com > (513) 772-7000 > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Wednesday, July 28, 2004 7:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Dividing days into years and months > > Hi Paul > > I'm guessing here but it sounds like you're talking about the number of > years etc between two dates. If that's true then check out the DateDiff > function and DateAdd functions. What you could do then is calc the DateDiff > in years, use DateAdd to add that number of years back onto your first date > then get the DateDiff between the new date and the original last date in > Months, then repeat to get the remaining number of days. > > If I've misinterpreted what you want I'm sorry. If I'm right but you need > more help let me/us know. > > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > <accessd at databaseadvisors.com> > To: 'Access Developers discussion and problem solving' > <accessd at databaseadvisors.com> > Subject: [AccessD] Dividing days into years and months > Date: 28/07/04 07:55 > > > > > Dear Experts > > > > I can divide in Access the days from a date() into years with a simple > > /365, but is there a way to have months and days ... so I have years, > months > > and days, please? > > > > Cheers paul > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > -- > _______________________________________________ > 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 marcus at tsstech.com Wed Jul 28 10:05:07 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:05:07 -0400 Subject: [AccessD] Query giving different results each time Message-ID: I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated records. Here they are... qry1: SELECT tblTest.bo_id, tblTest.pro_cm_seq, Count(tblTest.bo_id) AS CountOfbo_id FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); qry2: SELECT tblTest.bo_id, tblTest.pro_cm_seq, tblTest.Primary, tblTest.effdt, tblTest.Phone FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 10:35 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time I'll do my best... The table in question uses the following fields: bo_id...unique number string for each customer profile_cm_seq...unique number string for each phone number primary_ind...yes/no filed indicating primary Effdt...date row is active Phone...phone number Each time a phone number is added...or changed...multiple rows are added. If you have the following row bo pro_cm_seq Primary effdt phone 10 86547 Y 5/21/2004 888/555/1212 and you add a new PRIMARY number336/555/2222 today...the following rows will be added: bo pro_cm_seq Primary effdt phone 10 86547 N 7/28/2004 888/555/1212 10 11235 Y 7/28/2004 336/555/2222 So now...I need the most current PRIMARY Phone number...but I have 2 records that show as PRIMARY with 2 different numbers... I can't just do a max on the date because the phone numbers are different. I even went as far as islolating some of the records that showed in one pull but not the next...if I run the sql for just that bo_id...it pulls correctly everytime. The table only has 2967 records in it. All fields mentioned are TEXT except for the effdt...which is a date field. If I could not get the right number of rows in my output...I would just keep tweaking the sql...my concern is why the same sql keeps giving me different results. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:35:47 -0400 > >Lets try a different route. Please explain what you have and what result >you want. > >Scott Marcus > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 9:27 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Scott, > >Thanks for the feedback...but the results of this sql are also >inconsistant...I ran it 3 times...and got 3 different results...the >reslults >are typically close...for the last 3 tries...it returned 2365, 2369 and >2375...without changing anything...just re-running the sql??? > >I fell very confused...lol > >Any ideas? > >Thanks, > >Mark > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > >Mark, > > > >Do you try the following to see if it fixes your problem? > > > >SELECT B.profile_cm_seq, > > B.effdt, > > B.bo_id, > > B.primary_ind, > > B.phone > >FROM tblPRS_Pending_PHONE B > >WHERE (B.effdt=(SELECT Max(A.effdt) > > FROM tblPRS_Pending_PHONE A > > WHERE B.bo_id = A.bo_id > > AND > > B.profile_cm_seq = A.profile_cm_seq)) > > AND > > B.primary_ind="y"; > > > > > >Scott Marcus > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 10:07:07 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 11:07:07 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, You want to select the record where the PRIMARY_IND = Y for EACH BO ? Correct? SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.bo_id,B.effdt) IN(SELECT a.bo_id, Max(a.effdt) FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) AND B.primary_ind="Y" ---- If the backend is Access 97 you may have to split this into 2 queries HTH Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > > I'll do my best... > > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary Effdt...date > row is active Phone...phone number > > Each time a phone number is added...or changed...multiple > rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > > and you add a new PRIMARY number336/555/2222 today...the > following rows will be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > > > So now...I need the most current PRIMARY Phone number...but I > have 2 records > that show as PRIMARY with 2 different numbers... I can't just > do a max on > the date because the phone numbers are different. > > I even went as far as islolating some of the records that > showed in one pull > but not the next...if I run the sql for just that bo_id...it > pulls correctly > everytime. > > The table only has 2967 records in it. All fields mentioned > are TEXT except > for the effdt...which is a date field. > > If I could not get the right number of rows in my output...I > would just keep > tweaking the sql...my concern is why the same sql keeps > giving me different > results. > > Thanks, > > Mark > From gustav at cactus.dk Wed Jul 28 10:13:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 17:13:20 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <1126406520.20040728171320@cactus.dk> Hi Mark I vote for qry1. It is probably the fastest and it could even be reduced to: SELECT tblTest.bo_id, tblTest.pro_cm_seq, FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); /gustav > I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated > records. > Here they are... > qry1: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > qry2: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > I'll do my best... > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. > If I could not get the right number of rows in my output...I would just keep > tweaking the sql...my concern is why the same sql keeps giving me different > results. > Thanks, > Mark From markamatte at hotmail.com Wed Jul 28 10:20:23 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 15:20:23 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Scott, This does not filter the correct records. I only need 1 primary number for each bo_id...it gave me primary and non primary...and sometimes more than 1 number for the bo_id...I can create multiple tables/queries to get to the data I need...but I'm still curious as to why/what access is interpretting different each time it executes this sql. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From marcus at tsstech.com Wed Jul 28 10:23:00 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:23:00 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, This doen't give you the Phone Number so a second query is needed. I have however found a solution in one query... SELECT tblTest.bo_id, tblTest.Primary, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, Last(tblTest.effdt) DESC; -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 11:13 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query giving different results each time Hi Mark I vote for qry1. It is probably the fastest and it could even be reduced to: SELECT tblTest.bo_id, tblTest.pro_cm_seq, FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); /gustav > I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated > records. > Here they are... > qry1: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > qry2: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > I'll do my best... > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. > If I could not get the right number of rows in my output...I would just keep > tweaking the sql...my concern is why the same sql keeps giving me different > results. > Thanks, > Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 10:26:28 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:26:28 -0400 Subject: [AccessD] Query giving different results each time Message-ID: <From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don't just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 10:28:45 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 11:28:45 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Be Careful using LAST it will not always give you what you expect. It will give you the last one it encounters which may not be the MAX date !!! See help files and knowledge base Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Scott Marcus > Sent: Wednesday, July 28, 2004 11:23 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Query giving different results each time > > Gustav, > > This doen't give you the Phone Number so a second query is needed. > > I have however found a solution in one query... > > SELECT tblTest.bo_id, > tblTest.Primary, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest > GROUP BY tblTest.bo_id, tblTest.Primary HAVING > (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, > Last(tblTest.effdt) DESC; > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Wednesday, July 28, 2004 11:13 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Query giving different results each time > > > Hi Mark > > I vote for qry1. > It is probably the fastest and it could even be reduced to: > > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > > /gustav > > > > I have two queries that working together may give you the > result you > > want. Just run qry2. They work as predicted on my machine. > It is an alternate method that assumes matching pairs for > outdated records. > > > Here they are... > > > qry1: > > SELECT tblTest.bo_id, > > tblTest.pro_cm_seq, > > Count(tblTest.bo_id) AS CountOfbo_id FROM tblTest GROUP BY > > tblTest.bo_id, > > tblTest.pro_cm_seq > > HAVING (((Count(tblTest.bo_id))=1)); > > > qry2: > > SELECT tblTest.bo_id, > > tblTest.pro_cm_seq, > > tblTest.Primary, > > tblTest.effdt, > > tblTest.Phone > > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = > qry1.pro_cm_seq; > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mark A Matte > > Sent: Wednesday, July 28, 2004 10:35 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Query giving different results each time > > > > I'll do my best... > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > profile_cm_seq...unique > > number string for each phone number primary_ind...yes/no filed > > indicating primary Effdt...date row is active Phone...phone number > > > Each time a phone number is added...or changed...multiple > rows are added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows will be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but > I have 2 > > records that show as PRIMARY with 2 different numbers... I > can't just > > do a max on the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one pull but not the next...if I run the sql for just that > bo_id...it > > pulls correctly everytime. > > > The table only has 2967 records in it. All fields > mentioned are TEXT > > except for the effdt...which is a date field. > > > If I could not get the right number of rows in my output...I would > > just keep tweaking the sql...my concern is why the same sql keeps > > giving me different results. > > > Thanks, > > > Mark > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From marcus at tsstech.com Wed Jul 28 10:30:53 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:30:53 -0400 Subject: [AccessD] Query giving different results each time Message-ID: You can shorten it to... SELECT tblTest.bo_id, tblTest.Primary, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Scott Marcus Sent: Wednesday, July 28, 2004 11:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Query giving different results each time <From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don't just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/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 marcus at tsstech.com Wed Jul 28 10:34:41 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:34:41 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Ok. I'll be more careful... SELECT tblTest.bo_id, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, Last(tblTest.effdt); -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, Patricia (OTDA) Sent: Wednesday, July 28, 2004 11:29 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Query giving different results each time Be Careful using LAST it will not always give you what you expect. It will give you the last one it encounters which may not be the MAX date !!! See help files and knowledge base Patti From gustav at cactus.dk Wed Jul 28 10:57:27 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 17:57:27 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <10529053516.20040728175727@cactus.dk> Hi Mark and Scott Maybe I'm dense but - given your example data - this gives you exactly what you are asking for: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING Count(pro_cm_seq)=1; /gustav > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. From KIsmert at TexasSystems.com Wed Jul 28 10:59:44 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Wed, 28 Jul 2004 10:59:44 -0500 Subject: [AccessD] Early and Late-Binding Redux Message-ID: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm From marcus at tsstech.com Wed Jul 28 11:12:26 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 12:12:26 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, That works unless you want more of the fields in the query. If he wants only the phone number...yes. Maybe I'm being dense(it won't be the first time...or the last). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query giving different results each time Hi Mark and Scott Maybe I'm dense but - given your example data - this gives you exactly what you are asking for: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING Count(pro_cm_seq)=1; /gustav > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 11:11:02 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:11:02 +0000 Subject: [AccessD] Query giving different results each time Message-ID: wow...ok...I still don't understand why I would get different results from the same sql...but I'm ok with that for now... Scott, the sql below and the 2 query approach did give different results(about 300 difference). The sql below did give the number I expected...but as Patricia pointed out...it did not always give the max of the date...although it provided the correct number of records...they were not always the correct ones...So I tried to change the 'last' on the effdt to 'max'...but the results do vary...I get the last phone number...but the max date...with this approach the date and phone don't necessarily correspond anymore. So close...I can feel it. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:34:41 -0400 > >Ok. I'll be more careful... > >SELECT tblTest.bo_id, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE >FROM tblTest >GROUP BY tblTest.bo_id, tblTest.Primary >HAVING (((tblTest.Primary)=True)) >ORDER BY tblTest.bo_id, Last(tblTest.effdt); > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, >Patricia (OTDA) >Sent: Wednesday, July 28, 2004 11:29 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Query giving different results each time > > >Be Careful using LAST it will not always give you what you expect. It >will give you the last one it encounters which may not be the MAX date >!!! > >See help files and knowledge base > >Patti > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From markamatte at hotmail.com Wed Jul 28 11:17:01 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:17:01 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > > profile_cm_seq...unique number string for each phone number > > primary_ind...yes/no filed indicating primary > > Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From markamatte at hotmail.com Wed Jul 28 11:18:31 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:18:31 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Just the bo and phone would be fine...I pulled in the date just to verify I was getting the correct record. >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 12:12:26 -0400 > >Gustav, > >That works unless you want more of the fields in the query. If he wants >only the phone number...yes. > >Maybe I'm being dense(it won't be the first time...or the last). > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock >Sent: Wednesday, July 28, 2004 11:57 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Query giving different results each time > > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > > profile_cm_seq...unique number string for each phone number > > primary_ind...yes/no filed indicating primary > > Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From artful at rogers.com Wed Jul 28 11:27:54 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 12:27:54 -0400 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: <011d01c474bf$d60df130$6601a8c0@rock> While on this subject, I'd like to poll the readers for their clients' typical definition of a month. In my case, all clients interpret a month to mean "increment the month number while preserving the day number; if the month is 12, go to 1 and increase the year number". However, some of my clients break this rule when the day in question is EoM(): in that case they want to go to the next EoM(); i.e., the next date following Feb 29, 2004 is March 31, 2004; and conversely, the next date after Jan 31, 2004 is Feb 29, 2004. Any other non-logical variants? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Scott Marcus Sent: Wednesday, July 28, 2004 7:27 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Andy, The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. Years would be DateDiff("d",begindate,enddate)/365 Months would be (DateDiff("d",begindate,enddate)/365)*12 Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 Days would be DateDiff("d",begindate,enddate) Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, July 28, 2004 7:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Wed Jul 28 11:29:18 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 12:29:18 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <00cc01c47498$47ec8370$6601a8c0@rock> Message-ID: <011e01c474c0$084eeeb0$6601a8c0@rock> Oops. I'm wrong. Sorry about that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 7:45 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jul 28 11:30:12 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 18:30:12 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <18331018802.20040728183012@cactus.dk> OK Mark, but it is a bit difficult if we only get bits and pieces. How about a "true" sample of data - to stop guessing? As for this new information this will do: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING (Count(pro_cm_seq) MOD 2) = 1; /gustav > Gustav, > This does not give the results I need. I believe it is because this does > not take into consideration a phone number being made primary...a second > time...There may be a number of rows for the same pro_cm_seq...and the last > one is now set to primary. > Sorry for the confusion... > Thanks, > Mark > P.S...This is something the company bought...It's not my monster...just > something I was handed...lol >>From: Gustav Brock >>Reply-To: Access Developers discussion and problem >>solving >>To: Access Developers discussion and problem >>solving >>Subject: Re: [AccessD] Query giving different results each time >>Date: Wed, 28 Jul 2004 17:57:27 +0200 >> >>Hi Mark and Scott >> >>Maybe I'm dense but - given your example data - this gives you exactly >>what you are asking for: >> >> SELECT >> bo, >> phone >> FROM >> tblPhone >> GROUP BY >> bo, >> phone >> HAVING Count(pro_cm_seq)=1; >> >>/gustav >> >> >> > The table in question uses the following fields: >> > bo_id...unique number string for each customer >> > profile_cm_seq...unique number string for each phone number >> > primary_ind...yes/no filed indicating primary >> > Effdt...date row is active >> > Phone...phone number >> >> > Each time a phone number is added...or changed...multiple rows are >>added. >> > If you have the following row >> > bo pro_cm_seq Primary effdt phone >> > 10 86547 Y 5/21/2004 888/555/1212 >> >> > and you add a new PRIMARY number336/555/2222 today...the following rows >>will >> > be added: >> > bo pro_cm_seq Primary effdt phone >> > 10 86547 N 7/28/2004 888/555/1212 >> > 10 11235 Y 7/28/2004 336/555/2222 >> >> >> > So now...I need the most current PRIMARY Phone number...but I >> > have 2 records that show as PRIMARY with 2 different numbers... I >> > can't just do a max on the date because the phone numbers are >> > different. >> >> > I even went as far as islolating some of the records that showed >> > in one pull but not the next...if I run the sql for just that >> > bo_id...it pulls correctly everytime. >> >> > The table only has 2967 records in it. All fields mentioned are >> > TEXT except for the effdt...which is a date field. From marcus at tsstech.com Wed Jul 28 11:32:27 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 12:32:27 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Any possibility on sending that table to me? If so, zip it up. Scott -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 12:11 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time wow...ok...I still don't understand why I would get different results from the same sql...but I'm ok with that for now... Scott, the sql below and the 2 query approach did give different results(about 300 difference). The sql below did give the number I expected...but as Patricia pointed out...it did not always give the max of the date...although it provided the correct number of records...they were not always the correct ones...So I tried to change the 'last' on the effdt to 'max'...but the results do vary...I get the last phone number...but the max date...with this approach the date and phone don't necessarily correspond anymore. So close...I can feel it. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:34:41 -0400 > >Ok. I'll be more careful... > >SELECT tblTest.bo_id, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE >FROM tblTest >GROUP BY tblTest.bo_id, tblTest.Primary >HAVING (((tblTest.Primary)=True)) >ORDER BY tblTest.bo_id, Last(tblTest.effdt); > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, >Patricia (OTDA) >Sent: Wednesday, July 28, 2004 11:29 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Query giving different results each time > > >Be Careful using LAST it will not always give you what you expect. It >will give you the last one it encounters which may not be the MAX date >!!! > >See help files and knowledge base > >Patti > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Wed Jul 28 11:31:40 2004 From: lists at theopg.com (MarkH) Date: Wed, 28 Jul 2004 17:31:40 +0100 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <001301c474c0$5c7682f0$560b6bd5@netboxxp> Have you tried using sub-selects...? mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: 28 July 2004 17:17 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Query giving different results each time Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: bo_id...unique > > number string for each customer profile_cm_seq...unique number > > string for each phone number primary_ind...yes/no filed indicating > > primary Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a > > max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are > > TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From lists at theopg.com Wed Jul 28 11:31:47 2004 From: lists at theopg.com (MarkH) Date: Wed, 28 Jul 2004 17:31:47 +0100 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <001401c474c0$608d1ca0$560b6bd5@netboxxp> Have you tried using sub-selects...? mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: 28 July 2004 17:17 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Query giving different results each time Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: bo_id...unique > > number string for each customer profile_cm_seq...unique number > > string for each phone number primary_ind...yes/no filed indicating > > primary Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a > > max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are > > TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From gustav at cactus.dk Wed Jul 28 11:42:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 18:42:23 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: <011d01c474bf$d60df130$6601a8c0@rock> References: <011d01c474bf$d60df130$6601a8c0@rock> Message-ID: <7831749773.20040728184223@cactus.dk> Hi Arthur That's the definition we stick to. Even when you say "30 days" it means "a month" because in general terms it means a banking month which counts as 30 days always, giving 360 "days" a year. The major difference comes when talking about, say, four weeks or 28 days; that is taking literally. /gustav > While on this subject, I'd like to poll the readers for their clients' > typical definition of a month. In my case, all clients interpret a month > to mean "increment the month number while preserving the day number; if > the month is 12, go to 1 and increase the year number". However, some of > my clients break this rule when the day in question is EoM(): in that > case they want to go to the next EoM(); i.e., the next date following > Feb 29, 2004 is March 31, 2004; and conversely, the next date after Jan > 31, 2004 is Feb 29, 2004. > Any other non-logical variants? > Arthur From gustav at cactus.dk Wed Jul 28 12:09:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 19:09:55 +0200 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> References: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <2933401669.20040728190955@cactus.dk> Thanks Ken! Very useful. It is this kind of work you often wish to do but seldom find the time for (not speaking for Drew of course). /gustav > After reading with interest the thread "More on early versus late binding", > the questions posed by the various responders prompted me to do some > research. This rather long post is the result. I have divided this post into > two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM > Binding. > -Ken From gustav at cactus.dk Wed Jul 28 12:14:54 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 19:14:54 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <18033700739.20040728191454@cactus.dk> Hi Mark > This does not give the results I need. I believe it is because this does > not take into consideration a phone number being made primary...a second > time...There may be a number of rows for the same pro_cm_seq...and the last > one is now set to primary. Hmmm, by second thought I should have figured that out myself ... busy day here. /gustav From jwcolby at colbyconsulting.com Wed Jul 28 12:21:05 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jul 2004 13:21:05 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <011e01c474c0$084eeeb0$6601a8c0@rock> Message-ID: <004601c474c7$471a33f0$80b3fea9@ColbyM6805> Don't make it a habit. We are paid these exorbitant rates to be right. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 12:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Oops. I'm wrong. Sorry about that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 7:45 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jul 28 12:35:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jul 2004 13:35:56 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <004701c474c9$59c07490$80b3fea9@ColbyM6805> Wow. Could you expand on all this just a little? ;-) Are you publishing this in an ezine? In any case, good job. And I shall be reading the online references. Thanks for taking the time to write this up. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 12:46:53 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 13:46:53 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Is this any closer(I'm just taking stabs now)? Save both queries and run the second one. qry1: SELECT tblPRS_Pending_PHONE.bo_id, Max(tblPRS_Pending_PHONE.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE WHERE tblPRS_Pending_PHONE.Primary=True GROUP BY tblPRS_Pending_PHONE.bo_id; qry2: SELECT tblPRS_Pending_PHONE.bo_id, Last(tblPRS_Pending_PHONE.Phone) AS Phone_Number FROM tblTest INNER JOIN Query4 ON (tblPRS_Pending_PHONE.effdt = qry1.MaxOfeffdt) AND (tblPRS_Pending_PHONE.bo_id = qry1.bo_id) WHERE tblPRS_Pending_PHONE.Primary=True GROUP BY tblPRS_Pending_PHONE.bo_id; Until I have a copy of the data, I cannot be sure this is 100% correct. Scott From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 13:00:01 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 14:00:01 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, If the backend is Access, you are going to have to do 2 queries because Access does not allow multiple fields in a subselect. I am not sure whether SQL SERVER Will allow multiple. In ORACLE the following will give you what you want - I have to do something similar every day SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.bo_id,B.effdt) IN(SELECT a.bo_id, Max(a.effdt) FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) AND B.primary_ind="Y" --- With Access QUERY 1: SELECT a.bo_id, Max(a.effdt) as MAX_DT FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id QUERY 2: SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE as B INNER JOIN QUERY1 as Q1 on B.bo_id = q1.BO_ID AND b.EffDt = q1.MAX_DT WHERE b.PRIMARY_IND = "Y" ---- Another ORACLE OPTION SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B, (SELECT a.bo_id, Max(a.effdt) MaxDt FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) Q1 WHERE (B.bo_id = q1.BO_ID AND b.effdt = q1.MAX_DT) AND B.primary_ind = "Y" ---- Hope this helps Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: Wednesday, July 28, 2004 12:11 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > > wow...ok...I still don't understand why I would get different > results from the same sql...but I'm ok with that for now... > > Scott, the sql below and the 2 query approach did give > different results(about 300 difference). > > The sql below did give the number I expected...but as > Patricia pointed out...it did not always give the max of the > date...although it provided the correct number of > records...they were not always the correct ones...So I tried > to change the 'last' on the effdt to 'max'...but the results > do vary...I get the last phone number...but the max > date...with this approach the date and phone don't > necessarily correspond anymore. > > So close...I can feel it. > > Thanks, > > Mark > > > > From accessd at shaw.ca Wed Jul 28 13:15:19 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 28 Jul 2004 11:15:19 -0700 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Hi Ken: Great research. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 9:00 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 28 13:18:42 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jul 2004 14:18:42 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Ken, You should forward this one of the Access Newsletter. Might get it published. Nice work. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 13:26:41 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 18:26:41 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, Thanks for all of the feedback...some of the more recent suggestions where actually where my post began...I was trying to use a sub query to get to the data I wanted...my problem wasn't that I couldn't get the data that I wanted...I would run the same sql againts a small, local table in an A97 db(no BE or links just 1 db)...and each time I ran the sql...I would get a different number of records back. My question was why...I tried all of the single and multiple queries suggested...but I could already get to the data with multiple queries...and the single queries suggested did not provide the correct data. Here is the sql that would give different counts each time: SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE AS B WHERE (((B.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id;)) AND ((B.primary_ind)="y")); I was dealing with less than 3000 records locally...so I didn't worry about creating indexes on this temp table. I have since indexed the bo_id and effdt fields. Now...the above sql runs everytime with the same number of rows returned. I cannot send the table because it is customer info...but below is a 'modified' sample of the data I have to work with...but...on a recordset this size...the above sql gave me exactly what I expected. Does anyone know why adding the indexes would return different results? Thanks, Mark bo_id profile_cm_seq primary_ind effdt phone 10 84562 Y 14-Jul-04 555/481-5549 10 2588 Y 22-Nov-03 555/363-2290 10 2588 N 22-Jan-04 555/363-2290 10 4444444 N 22-Nov-03 555/796-3360 10 4444444 N 22-Jan-04 555/796-3360 10 4444444 N 14-Jul-04 555/796-3360 10 65542 Y 22-Jan-04 555/363-4490 10 84562 N 22-Jan-04 555/781-5549 >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 13:46:53 -0400 > >Mark, > >Is this any closer(I'm just taking stabs now)? Save both queries and run >the second one. > >qry1: >SELECT tblPRS_Pending_PHONE.bo_id, > Max(tblPRS_Pending_PHONE.effdt) AS MaxOfeffdt >FROM tblPRS_Pending_PHONE >WHERE tblPRS_Pending_PHONE.Primary=True >GROUP BY tblPRS_Pending_PHONE.bo_id; > >qry2: >SELECT tblPRS_Pending_PHONE.bo_id, > Last(tblPRS_Pending_PHONE.Phone) AS Phone_Number >FROM tblTest INNER JOIN Query4 ON (tblPRS_Pending_PHONE.effdt = >qry1.MaxOfeffdt) > AND (tblPRS_Pending_PHONE.bo_id = qry1.bo_id) >WHERE tblPRS_Pending_PHONE.Primary=True >GROUP BY tblPRS_Pending_PHONE.bo_id; > >Until I have a copy of the data, I cannot be sure this is 100% correct. > >Scott > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From gustav at cactus.dk Wed Jul 28 13:35:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 20:35:13 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: <18331018802.20040728183012@cactus.dk> References: <18331018802.20040728183012@cactus.dk> Message-ID: <9338519037.20040728203513@cactus.dk> Hi Mark and Patti If you need all info, this single query will do, no subquery: SELECT bo, pro_cm_seq, Max(effdt) AS lasteffdt, phone FROM tblPhone GROUP BY bo, pro_cm_seq, phone HAVING (Count(pro_cm_seq) Mod 2)=1; /gustav > OK Mark, but it is a bit difficult if we only get bits and pieces. > How about a "true" sample of data - to stop guessing? > As for this new information this will do: > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING > (Count(pro_cm_seq) MOD 2) = 1; > /gustav >> Gustav, >> This does not give the results I need. I believe it is because this does >> not take into consideration a phone number being made primary...a second >> time...There may be a number of rows for the same pro_cm_seq...and the last >> one is now set to primary. >> Sorry for the confusion... >> Thanks, >> Mark >> P.S...This is something the company bought...It's not my monster...just >> something I was handed...lol >>>Hi Mark and Scott >>> >>>Maybe I'm dense but - given your example data - this gives you exactly >>>what you are asking for: >>> >>> SELECT >>> bo, >>> phone >>> FROM >>> tblPhone >>> GROUP BY >>> bo, >>> phone >>> HAVING Count(pro_cm_seq)=1; >>> >>>/gustav >>> >>> >>> > The table in question uses the following fields: >>> > bo_id...unique number string for each customer >>> > profile_cm_seq...unique number string for each phone number >>> > primary_ind...yes/no filed indicating primary >>> > Effdt...date row is active >>> > Phone...phone number >>> >>> > Each time a phone number is added...or changed...multiple rows >>> > are added. >>> > If you have the following row >>> > bo pro_cm_seq Primary effdt phone >>> > 10 86547 Y 5/21/2004 888/555/1212 >>> >>> > and you add a new PRIMARY number336/555/2222 today...the >>> > following rows will be added: >>> > bo pro_cm_seq Primary effdt phone >>> > 10 86547 N 7/28/2004 888/555/1212 >>> > 10 11235 Y 7/28/2004 336/555/2222 >>> >>> >>> > So now...I need the most current PRIMARY Phone number...but I >>> > have 2 records that show as PRIMARY with 2 different numbers... I >>> > can't just do a max on the date because the phone numbers are >>> > different. >>> >>> > I even went as far as islolating some of the records that showed >>> > in one pull but not the next...if I run the sql for just that >>> > bo_id...it pulls correctly everytime. >>> >>> > The table only has 2967 records in it. All fields mentioned are >>> > TEXT except for the effdt...which is a date field. From gustav at cactus.dk Wed Jul 28 13:50:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 20:50:32 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <10139438289.20040728205032@cactus.dk> Hi Mark Don't you miss the initial record here? The first must be a Y record. And all numbers except the currently used must be represented an equal number of times. And you have four records for 22-Jan-04 but three Ns and only one Y and three phone numbers - something must be missing? > bo_id profile_cm_seq primary_ind effdt phone > 10 84562 Y 14-Jul-04 555/481-5549 > 10 2588 Y 22-Nov-03 555/363-2290 > 10 2588 N 22-Jan-04 555/363-2290 > 10 4444444 N 22-Nov-03 555/796-3360 > 10 4444444 N 22-Jan-04 555/796-3360 > 10 4444444 N 14-Jul-04 555/796-3360 > 10 65542 Y 22-Jan-04 555/363-4490 > 10 84562 N 22-Jan-04 555/781-5549 Rearranged: > bo_id profile_cm_seq primary_ind effdt phone > 10 4444444 N 22-Nov-03 555/796-3360 > 10 2588 Y 22-Nov-03 555/363-2290 > 10 2588 N 22-Jan-04 555/363-2290 > 10 65542 Y 22-Jan-04 555/363-4490 > 10 84562 N 22-Jan-04 555/781-5549 > 10 4444444 N 22-Jan-04 555/796-3360 > 10 4444444 N 14-Jul-04 555/796-3360 > 10 84562 Y 14-Jul-04 555/481-5549 /gustav From bheid at appdevgrp.com Wed Jul 28 13:56:39 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Wed, 28 Jul 2004 14:56:39 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B170@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6D9@ADGSERVER> Just to let you know, I had to make the query accept parameters so that it would only operate on a range or payroll records. I my initial testing, I broke the payroll ID filed into 4 ranges and ran it on each range. It works fine now. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 11:13 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Weird query execution problem. Hi Jim, That did not work either. I think that I'll pass parameters to the queries so that I can process the data in chunks. Thanks for trying, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Tuesday, July 27, 2004 10:18 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Weird query execution problem. Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jul 28 14:00:12 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 20:00:12 +0100 Subject: [AccessD] Dividing days into years and months In-Reply-To: <011d01c474bf$d60df130$6601a8c0@rock> Message-ID: <004e01c474d5$201c7b10$b274d0d5@minster33c3r25> I find the same. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Arthur Fuller > Sent: 28 July 2004 17:28 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Dividing days into years and months > > > While on this subject, I'd like to poll the readers for their > clients' typical definition of a month. In my case, all > clients interpret a month to mean "increment the month number > while preserving the day number; if the month is 12, go to 1 > and increase the year number". However, some of my clients > break this rule when the day in question is EoM(): in that > case they want to go to the next EoM(); i.e., the next date > following Feb 29, 2004 is March 31, 2004; and conversely, the > next date after Jan 31, 2004 is Feb 29, 2004. > > Any other non-logical variants? > > Arthur > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Scott Marcus > Sent: Wednesday, July 28, 2004 7:27 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Dividing days into years and months > > > Andy, > > The problem with DateDiff is that > DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. > > Years would be DateDiff("d",begindate,enddate)/365 > Months would be (DateDiff("d",begindate,enddate)/365)*12 > Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or > DateDiff("d",begindate,enddate)/7 Days would be > DateDiff("d",begindate,enddate) > > Scott Marcus > TSS Technologies, Inc. > marcus at tsstech.com > (513) 772-7000 > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Wednesday, July 28, 2004 7:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Dividing days into years and months > > Hi Paul > > I'm guessing here but it sounds like you're talking about the > number of years etc between two dates. If that's true then > check out the DateDiff function and DateAdd functions. What > you could do then is calc the DateDiff in years, use DateAdd > to add that number of years back onto your first date then > get the DateDiff between the new date and the original last > date in Months, then repeat to get the remaining number of days. > > If I've misinterpreted what you want I'm sorry. If I'm right > but you need more help let me/us know. > > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Dividing days into years and months > Date: 28/07/04 07:55 > > > > > Dear Experts > > > > I can divide in Access the days from a date() into years > with a simple > > > /365, but is there a way to have months and days ... so I > have years, > months > > and days, please? > > > > Cheers paul > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From markamatte at hotmail.com Wed Jul 28 15:48:20 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 20:48:20 +0000 Subject: [AccessD] Query giving different results each time Message-ID: A phone number does not always have to be created as a Primary...so there won't always be the same number of records for each number...if there are 3 numbers...and 2 of them toggle back and forth as the primary...with each toggle of the primary setting...the app will write a record for each of the numbers affected. This thing writes a record evertime the wind blows. I actually found a table that gets 6 records everytime a reminder is set...but 5 of them are blank 99.9% of the time. Thanks, for the feedback... Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 20:50:32 +0200 > >Hi Mark > >Don't you miss the initial record here? >The first must be a Y record. And all numbers except the currently >used must be represented an equal number of times. > >And you have four records for 22-Jan-04 but three Ns and only one Y >and three phone numbers - something must be missing? > > > bo_id profile_cm_seq primary_ind effdt phone > > 10 84562 Y 14-Jul-04 555/481-5549 > > 10 2588 Y 22-Nov-03 555/363-2290 > > 10 2588 N 22-Jan-04 555/363-2290 > > 10 4444444 N 22-Nov-03 555/796-3360 > > 10 4444444 N 22-Jan-04 555/796-3360 > > 10 4444444 N 14-Jul-04 555/796-3360 > > 10 65542 Y 22-Jan-04 555/363-4490 > > 10 84562 N 22-Jan-04 555/781-5549 > >Rearranged: > > > bo_id profile_cm_seq primary_ind effdt phone > > 10 4444444 N 22-Nov-03 555/796-3360 > > 10 2588 Y 22-Nov-03 555/363-2290 > > 10 2588 N 22-Jan-04 555/363-2290 > > 10 65542 Y 22-Jan-04 555/363-4490 > > 10 84562 N 22-Jan-04 555/781-5549 > > 10 4444444 N 22-Jan-04 555/796-3360 > > 10 4444444 N 14-Jul-04 555/796-3360 > > 10 84562 Y 14-Jul-04 555/481-5549 > >/gustav > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From Subscriptions at servicexp.com Wed Jul 28 17:05:43 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 28 Jul 2004 18:05:43 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Very Nice Ken!!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Wed Jul 28 18:32:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 28 Jul 2004 19:32:42 -0400 Subject: [AccessD] Conversion Toolkit Message-ID: <20040728233240.OBNG1756.imf24aec.mail.bellsouth.net@SUSANONE> http://www.microsoft.com/downloads/details.aspx?familyid=2e861e76-5d89-450a- b977-980a9841111e &displaylang=en From HollisVJ at pgdp.usec.com Thu Jul 29 06:47:38 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jul 2004 06:47:38 -0500 Subject: [AccessD] Create a Search Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89B9@cntexchange.pgdp.usec.com> Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia From ssharkins at bellsouth.net Thu Jul 29 07:37:58 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 08:37:58 -0400 Subject: [AccessD] Create a Search In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89B9@cntexchange.pgdp.usec.com> Message-ID: <20040729123756.OOPO1721.imf16aec.mail.bellsouth.net@SUSANONE> Virginia, in truth this in an ambitious project. Do they want to search any field or can you restrict that much? Susan H. Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. From JHewson at karta.com Thu Jul 29 07:58:03 2004 From: JHewson at karta.com (Jim Hewson) Date: Thu, 29 Jul 2004 07:58:03 -0500 Subject: [AccessD] Create a Search Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E0F1@karta-exc-int.Karta.com> Virginia, I've done something similar in a database recording visit information for a healthcare ministry. There are over 70 geographic locations interfacing the database via the web. Data is recorded for individual visits as well as for events where multiple people are seen, such as a health fair. An Access front end of the database is used by the main office. There are three major report forms requesting information about visits, events, and a composite report. The most complex is the visit summary report form. This form has several criteria to choose from: the client data (gender, income status, literacy, marital status, employment, age, education level, ethnic group, and language), the place of service (office, home, telephone, etc.), nurse, region, team, location, whether contact was the first visit or a follow-up, and even down to the individual person. It also has the capability to choose the inclusive dates of the report (Thanks Drew, I use his calendar for the report form). I also have a memo field to add comments to the report (the client usually has at least a page or two of comments). On the form there is a text box that gives a continuous count of the number of records, so the user always knows how many records will be used in the report. The user also has the ability to export the data into an Excel spreadsheet. And finally, the user can save the criteria for the report (including comments) to regenerate the report at will. I placed a combo box on the report form to "fill in" the criteria for any given report when selected. In another database we use for resumes, the search form has three text fields that are used to search the text of a memo field. All this to say: the key to what you want to do is the criteria of the query. Criteria for date fields: between forms!frmSearch.datefield1 and forms!frmSearch.datefield2 Buttons to fill in the date fields for last quarter, last month, last week, yesterday, or today can be done. For those text fields they want to type in, I would recommend a list box or combo box. In the query, treat each field's search criteria separately. Ensure the nulls or zero length strings are captured and treated like a "*" in the criteria. Good luck. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hollis,Virginia Sent: Thursday, July 29, 2004 6:48 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Create a Search Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Stephen.Pickering at caremark.com Thu Jul 29 08:09:33 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Thu, 29 Jul 2004 08:09:33 -0500 Subject: [AccessD] Create a Search Message-ID: <35C4AC5A5AFD9642833200159C2581560A6A06@s98026.psd.caremark.int> Virginia, Have a look at Duane Hookom's DH Query by Form sample database. It can be found at (watch for wrapping): http://www.rogersaccesslibrary.com/OtherLibraries.asp Click on Duane Hookom's name (or scroll down) and click on the link for "DH Query By Form". It sounds like it might serve your needs. HTH, Steve -----Virginia Hollis' Original Message----- Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia From dwaters at usinternet.com Thu Jul 29 08:20:06 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 29 Jul 2004 08:20:06 -0500 Subject: [AccessD] Create a Search In-Reply-To: <32551579.1091102269911.JavaMail.root@sniper3.usinternet.com> Message-ID: <000d01c4756e$c3ec1d60$de1811d8@danwaters> Ken - I do exactly this with each business process and it works well. Contact me off-line and I can send you an example. Dan Waters ProMation Systems -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, July 29, 2004 6:48 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Create a Search Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Thu Jul 29 08:45:10 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Thu, 29 Jul 2004 14:45:10 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Many thanks, Stuart, that looks excellent. -----Original Message----- From: Stuart McLachlan [mailto:stuart at lexacorp.com.pg] Sent: Wednesday, July 28, 2004 12:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months On 28 Jul 2004 at 8:52, Paul Rodgers wrote: > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, No you can't because Leap Years don't have 365 days :-( > but is there a way to have months and days ... so I have years, months > and days, please? > First, you need to determine what answers you want. Take 28 Feb 03 to 1 Apr 03 as an example: Is that 1 month and 1 day (end of Feb to end of Mar + 1 day) or 1 month and 4 days (28 Feb to 28 Mar + 4 days) You will need to develop functions based on which interpretation you want. Here's one I've just knocked up that will return the second answer. I'll leave it to you to work out a method if you want the first answer. BTW, I've just copyrighted the word monthiversary :-) Function YMDDiff(Date1 As Date, Date2 As Date) As String Dim years As Long Dim months As Long Dim days As Long Dim monthiversary As Date months = DateDiff("m", Date1, Date2) years = Int(months / 12) monthiversary = DateAdd("m", months, Date1) If Date2 - monthiversary < 0 Then months = months - 1 days = Date2 - DateAdd("m", -1, monthiversary) Else days = Date2 - monthiversary End If months = months - (years * 12) YMDDiff = years & " years, " & months & " months" & " and " & days & " days" End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Thu Jul 29 08:47:08 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Thu, 29 Jul 2004 14:47:08 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Thanks, Douglas, appreciated very much. -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, July 28, 2004 2:30 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Douglas > Function Age(Date1 As Date, Date2 As Date) As String > Dim Y As Integer > Dim M As Integer > Dim D As Integer > Dim Temp1 As Date > Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) > Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) > M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) > D = Day(Date2) - Day(Date1) > If D < 0 Then > M = M - 1 > D = Day(DateSerial(Year(date2), Month(date2), 0)) + D > End If > Age = Y & " years " & M & " months " & D & " days" > End Function Just for the records - this Age() as well as quite a few other Age-functions will fail for those born on 29. Feb. Look up in the archive "Age Calc - How much have I forgotten" to see a reliable method. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jul 29 08:48:01 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 29 Jul 2004 13:48:01 +0000 Subject: [AccessD] Import File From UNIX box Message-ID: Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From lytlenj at yahoo.com Thu Jul 29 08:51:25 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 06:51:25 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Is there any way to lock only the controls in the Detail section of a form. The page header section has my filtering and navigation, and other standard buttons. All the data entry is done in the detail section. I would like to be able to open the form in two ways, one where the users can edit or add to the form data, another where they can search using the controls in the form header but they can't edit or add to the data in the detail section of the form, which also contains a subform. I have tried the following called in the Current event of the form (I also tried it in several other events and it didn't do any better): blnDisable is set in the OnClick event buttons used to open the form (from another form) for Data Entry or Open for Search only. Public blnDisable As Boolean ' in declaration section of a module Public Function fcnCheckDisable() If blnDisable = True Then Me.Section(acDetail).Locked = True Else Me.Section(acDetail).Locked = False End If End Function Any ideas appreciated, Thanks, Nancy Lytle From ssharkins at bellsouth.net Thu Jul 29 09:02:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 10:02:16 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Message-ID: <20040729140214.DMOC8009.imf17aec.mail.bellsouth.net@SUSANONE> Nancy, there may be a Detail event that you could use, but I don't think so. Have you considered renaming the controls? For instance, all the controls in the detail section might include a prefix or suffix "dtl" or something similar. That way you could loop through the entire form's collection and stop only when it finds the appropriate prefix or suffix. Susan H. Is there any way to lock only the controls in the Detail section of a form. From markamatte at hotmail.com Thu Jul 29 09:34:16 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 29 Jul 2004 14:34:16 +0000 Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: Nancy, This is a sample of how you might accomplish this...you would call this function after the form opens depending on a value you set when calling the form. You will have to add an if statement to exclude any command buttons...or items in the detail section that do not have the 'locked' property. Thanks, Mark A. Matte Sub TextBoxProperties(frm As Form) On Error GoTo Skip Dim ctl As Control ' Enumerate Controls collection. For Each ctl In frm.Controls Dim test Dim name name = ctl.ControlName test = ctl.Section With ctl 'Default = .DefaultValue If test = 0 Then ctl.Locked = True Else End If Skip: End With 'End If Next ctl End Sub >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Lock/Disable controls in the Detail section of a >form >Date: Thu, 29 Jul 2004 10:02:16 -0400 > >Nancy, there may be a Detail event that you could use, but I don't think >so. >Have you considered renaming the controls? For instance, all the controls >in >the detail section might include a prefix or suffix "dtl" or something >similar. That way you could loop through the entire form's collection and >stop only when it finds the appropriate prefix or suffix. > >Susan H. > >Is there any way to lock only the controls in the Detail section of a form. > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From CMackin at Quiznos.com Thu Jul 29 09:44:13 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Thu, 29 Jul 2004 08:44:13 -0600 Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: You can iterate through the controls in the detail using the Controls collection of the Detail section: For Each ctl in Me.Detail.Controls ctl.Locked = blnLock Next ctl -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Thursday, July 29, 2004 8:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Lock/Disable controls in the Detail section of a form Nancy, there may be a Detail event that you could use, but I don't think so. Have you considered renaming the controls? For instance, all the controls in the detail section might include a prefix or suffix "dtl" or something similar. That way you could loop through the entire form's collection and stop only when it finds the appropriate prefix or suffix. Susan H. Is there any way to lock only the controls in the Detail section of a form. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Thu Jul 29 09:44:47 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Thu, 29 Jul 2004 10:44:47 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Message-ID: Nancy, <> Sure. Function StdLockForm(frm As Form, intState As Integer) 'Lock/unlock all the fields in the detail section of the form that are enabled. Dim intL As Integer 'Generic loop counter Dim intCount As Integer 'Number of controls on the form intCount = frm.Count 'Find out how many controls are on the form On Error Resume Next For intL = 0 To intCount - 1 'Step thru all controls on the form If (frm(intL).Section = False) Then 'Don't do any control execpt those in the detail section If (frm(intL).Enabled = True) Then frm(intL).Locked = intState 'Set 'Locked' property to proper state End If Next intL On Error GoTo 0 End Function Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Nancy Lytle Sent: Thursday, July 29, 2004 9:51 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Lock/Disable controls in the Detail section of a form Is there any way to lock only the controls in the Detail section of a form. The page header section has my filtering and navigation, and other standard buttons. All the data entry is done in the detail section. I would like to be able to open the form in two ways, one where the users can edit or add to the form data, another where they can search using the controls in the form header but they can't edit or add to the data in the detail section of the form, which also contains a subform. I have tried the following called in the Current event of the form (I also tried it in several other events and it didn't do any better): blnDisable is set in the OnClick event buttons used to open the form (from another form) for Data Entry or Open for Search only. Public blnDisable As Boolean ' in declaration section of a module Public Function fcnCheckDisable() If blnDisable = True Then Me.Section(acDetail).Locked = True Else Me.Section(acDetail).Locked = False End If End Function Any ideas appreciated, Thanks, Nancy Lytle -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 29 09:51:11 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 10:51:11 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729145110.HRBS1789.imf25aec.mail.bellsouth.net@SUSANONE> Oh cool... I like that. :) Susan H. You can iterate through the controls in the detail using the Controls collection of the Detail section: For Each ctl in Me.Detail.Controls ctl.Locked = blnLock Next ctl From GregSmith at starband.net Thu Jul 29 09:54:22 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 29 Jul 2004 09:54:22 -0500 (CDT) Subject: [AccessD] Programmatically Lockout Right Mouse Click? In-Reply-To: References: Message-ID: <1757.216.43.21.235.1091112862.squirrel@cetus.email.starband.net> Hi Everyone! I'm still dinking around with menus and trying to keep prying eyes and mouse clicks out of the menubars. Thanks to Doris and others I've gotten the programming to get the right toolbar or menubar to show at the right time. The commandbar(s) command was the trick. Although the changeproperty would have been nice except that it only took effect on the NEXT opening of the app, so it was fairly useless programmatically. I'm looking for some way to disable the customize function or to disable the right mouse click on the Menubars/Toolbars. I don't want them selecting alternate toolbars or menubars, or customizing anything. I can disable the right mouse button on the form, but that has no effect on the menubars at the top. I need to be able to do this programmatically as well. If the users login, I don't want them having access to any of the menus except what I program to them, however, if I login, I need everything turned back on. Suggestions? Comments? Am I full of it trying to do this? Is there an easier way? This is a secure database, but that shouldn't change what I'm trying to do. It's currently written in Access97. Thanks in advance! Greg Smith gregsmith at starband.net From DWUTKA at marlow.com Thu Jul 29 10:39:44 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 10:39:44 -0500 Subject: [AccessD] Import File From UNIX box Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E0@main2.marlow.com> You'll need to find out what character it actually is, but then something like this would work: Dim f as Long Dim strTemp as string f=FreeFile Open "C:\Import.txt" for binary access read as f strTemp=Space(LOF(f)) Get f,,strTemp close f Kill "C:\Import.txt" f=FreeFile strTemp=Replace(strTemp,chr(13),vbCrLf) Open "C:\Import.txt" for Binary Access Write as f put f,,strTemp close f fourth from the last line has chr(13). You may need to replace that with either 8 or 9. (Haven't finished my first cup of coffee...I do know that between 8,9, and 13 you have CR, LF, and Tab. Just not awake enough to remember which is which (I know 13 isn't tab though......I think 8 is.) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Thursday, July 29, 2004 8:48 AM To: accessd at databaseadvisors.com Subject: [AccessD] Import File From UNIX box Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 29 10:46:15 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 10:46:15 -0500 Subject: [AccessD] Programmatically Lockout Right Mouse Click? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E1@main2.marlow.com> Move the menus to a form. (well, create a form to perform the menu functions). Then hide the Access window. You can set an AutoKeys macro to unhide access, if an Admin account is logged in. Only real issue with hiding the Access window, is that reports won't display on the desktop, only forms, so if you need to preview a report, you have to unhide Access, and then hide it when the report closes again. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Greg Smith Sent: Thursday, July 29, 2004 9:54 AM To: accessd at databaseadvisors.com Subject: [AccessD] Programmatically Lockout Right Mouse Click? Hi Everyone! I'm still dinking around with menus and trying to keep prying eyes and mouse clicks out of the menubars. Thanks to Doris and others I've gotten the programming to get the right toolbar or menubar to show at the right time. The commandbar(s) command was the trick. Although the changeproperty would have been nice except that it only took effect on the NEXT opening of the app, so it was fairly useless programmatically. I'm looking for some way to disable the customize function or to disable the right mouse click on the Menubars/Toolbars. I don't want them selecting alternate toolbars or menubars, or customizing anything. I can disable the right mouse button on the form, but that has no effect on the menubars at the top. I need to be able to do this programmatically as well. If the users login, I don't want them having access to any of the menus except what I program to them, however, if I login, I need everything turned back on. Suggestions? Comments? Am I full of it trying to do this? Is there an easier way? This is a secure database, but that shouldn't change what I'm trying to do. It's currently written in Access97. Thanks in advance! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Thu Jul 29 10:49:12 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 08:49:12 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729154912.62077.qmail@web53907.mail.yahoo.com> Thanks Jim, and Susan and Mark and Christopher, For now I am using: Dim ctl As Control On Error Resume Next 'This is the key I was 'missing For Each ctl In Me.Section("Detail").Controls ctl.Enabled = Not ctl.Enabled Next ctl This works well except for the fact that the subform I have has a tab control which also gets locked, but i'm sure that will be easy enough to exclude. But I really like what Jim did, and it is certainly more flexible, so I may try working it into my apps. Again, thanks everyone, you guys are the best, not to mention the meer speed of the replies. Nancy --- Jim Dettman wrote: > Nancy, > > < Detail section of a form.>> > > Sure. > > Function StdLockForm(frm As Form, intState As > Integer) > > 'Lock/unlock all the fields in the detail section > of the form that are > enabled. > > Dim intL As Integer 'Generic loop > counter > Dim intCount As Integer 'Number of > controls on the form > > intCount = frm.Count 'Find out how > many controls are on the > form > > On Error Resume Next > For intL = 0 To intCount - 1 'Step thru all > controls on the form > If (frm(intL).Section = False) Then 'Don't do > any control execpt those > in the detail section > If (frm(intL).Enabled = True) Then > frm(intL).Locked = intState > 'Set 'Locked' property to proper state > End If > Next intL > On Error GoTo 0 > > End Function > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Nancy Lytle > Sent: Thursday, July 29, 2004 9:51 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Lock/Disable controls in the > Detail section of a form > > > Is there any way to lock only the controls in the > Detail section of a form. > > The page header section has my filtering and > navigation, and other standard buttons. All the > data > entry is done in the detail section. > I would like to be able to open the form in two > ways, > one where the users can edit or add to the form > data, > another where they can search using the controls in > the form header but they can't edit or add to the > data > in the detail section of the form, which also > contains > a subform. > > I have tried the following called in the Current > event > of the form (I also tried it in several other events > and it didn't do any better): > > blnDisable is set in the OnClick event buttons used > to > open the form (from another form) for Data Entry or > Open for Search only. > > Public blnDisable As Boolean ' in declaration > section > of a module > > Public Function fcnCheckDisable() > If blnDisable = True Then > Me.Section(acDetail).Locked = True > Else > Me.Section(acDetail).Locked = False > End If > > End Function > > Any ideas appreciated, > Thanks, > Nancy Lytle > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From lytlenj at yahoo.com Thu Jul 29 10:50:33 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 08:50:33 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729155033.98997.qmail@web53910.mail.yahoo.com> Thanks Mark, that looks great. Nancy --- Mark A Matte wrote: > Nancy, > > This is a sample of how you might accomplish > this...you would call this > function after the form opens depending on a value > you set when calling the > form. You will have to add an if statement to > exclude any command > buttons...or items in the detail section that do not > have the 'locked' > property. > Thanks, > > Mark A. Matte > > Sub TextBoxProperties(frm As Form) > On Error GoTo Skip > Dim ctl As Control > ' Enumerate Controls collection. > For Each ctl In frm.Controls > Dim test > Dim name > name = ctl.ControlName > test = ctl.Section > With ctl > 'Default = .DefaultValue > If test = 0 Then > ctl.Locked = True > Else > End If > > Skip: > End With > 'End If > Next ctl > End Sub > > > >From: "Susan Harkins" > >Reply-To: Access Developers discussion and problem > >solving > >To: "'Access Developers discussion and problem > >solving'" > >Subject: RE: [AccessD] Lock/Disable controls in the > Detail section of a > >form > >Date: Thu, 29 Jul 2004 10:02:16 -0400 > > > >Nancy, there may be a Detail event that you could > use, but I don't think > >so. > >Have you considered renaming the controls? For > instance, all the controls > >in > >the detail section might include a prefix or suffix > "dtl" or something > >similar. That way you could loop through the entire > form's collection and > >stop only when it finds the appropriate prefix or > suffix. > > > >Susan H. > > > >Is there any way to lock only the controls in the > Detail section of a form. > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Discover the best of the best at MSN Luxury Living. > http://lexus.msn.com/ > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jul 29 10:59:10 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 29 Jul 2004 10:59:10 -0500 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: Message-ID: <000b01c47584$fcea4180$2a3ca8c0@TEXASSYSTEMS.COM> Gustav, John, Jim, Jim: Thanks. Any and all feedback (including criticism and potential errors) is appreciated. -Ken > After reading with interest the thread "More on early versus late binding", > the questions posed by the various responders prompted me to do some > research. This rather long post is the result. I have divided this post into > two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM > Binding. > > -Ken From pharold at proftesting.com Thu Jul 29 10:25:15 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 29 Jul 2004 11:25:15 -0400 Subject: [AccessD] Import File From UNIX box In-Reply-To: Message-ID: <000001c47580$3fc7f830$082da8c0@D58BT131> Mark I had a file that came from a mainframe and I did an exec call to Wordpad, made an edit and then closed and saved the file in Windows Text format. The resultant .txt file was then in Windows format so it could be imported. I used VB but I think VBA also allows the same. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Thursday, July 29, 2004 9:48 AM To: accessd at databaseadvisors.com Subject: [AccessD] Import File From UNIX box Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 12:50:43 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 10:50:43 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> Message-ID: I'm just not getting it. Writing SQL statements is not coming to me, so explain this in what I type into the grid view. Table name - tblCemeteries4Updating Field name - Surname Field name - MarrName In the update query grid, I have Field MarrName Surname Table tblCemeteries4Updating tblCemeteries4Updating Update To What do I type into Update To grid in order to copy the contents of MarrName field into the Surname field? (I don't want to change the Surname field to MarrName, as I need both - after doing this copy, I have to manually go through and del the contents of MarrName from all the males, and add the correct MarrName to all the females, as all the existing contents are "maiden names"} -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From DWUTKA at marlow.com Thu Jul 29 13:23:12 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 13:23:12 -0500 Subject: [AccessD] Update query copy one field to another Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E9@main2.marlow.com> Get rid of the MarrName field, and put [MarrName] in the Update To field under Surname. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Thursday, July 29, 2004 12:51 PM To: Access Developers discussion and problem solving Subject: [AccessD] Update query copy one field to another I'm just not getting it. Writing SQL statements is not coming to me, so explain this in what I type into the grid view. Table name - tblCemeteries4Updating Field name - Surname Field name - MarrName In the update query grid, I have Field MarrName Surname Table tblCemeteries4Updating tblCemeteries4Updating Update To What do I type into Update To grid in order to copy the contents of MarrName field into the Surname field? (I don't want to change the Surname field to MarrName, as I need both - after doing this copy, I have to manually go through and del the contents of MarrName from all the males, and add the correct MarrName to all the females, as all the existing contents are "maiden names"} -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 13:37:02 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 11:37:02 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1E9@main2.marlow.com> Message-ID: Thanks - I had it backwards - just wasn't getting it. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 11:23 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > under Surname. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 12:51 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Update query copy one field to another > > > I'm just not getting it. Writing SQL statements is not coming to me, so > explain this in what I type into the grid view. > > Table name - tblCemeteries4Updating > Field name - Surname > Field name - MarrName > > In the update query grid, I have > > Field MarrName Surname > Table tblCemeteries4Updating tblCemeteries4Updating > Update To > > What do I type into Update To grid in order to copy the contents > of MarrName > field into the Surname field? > > (I don't want to change the Surname field to MarrName, as I need both - > after doing this copy, I have to manually go through and del the > contents of > MarrName from all the males, and add the correct MarrName to all the > females, as all the existing contents are "maiden names"} > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 29 14:07:42 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 14:07:42 -0500 Subject: [AccessD] Update query copy one field to another Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1EA@main2.marlow.com> It is probably easier to just think in SQL terms. UPDATE tblMyTable SET SomeField=1, SomeOtherField=5*[SomeOtherField], SomeTextField=UCase([SomeTextField]), ThisField=ThatField WHERE ADateField>#2-13-04# If you look at the segments of the SQL, you have the actual command UPDATE. After update, you need to let it know what it's updating, which is tblMyTable. Then you need to let it know what you want to update within that table, so you have SET. Everything after SET are comma delimited Fields and their new values. So in the example above, we are setting 'SomeField' to 1, SomeOtherField to 5x it's value, 'SomeTextField' to All caps, and ThisField is being set to the value in ThatField. We also have a WHERE clause, which tells Jet to only perform this update on records that have an ADateField date after the 13th of February of this year. Now, if you look at the SQL that Access produces, it will be the same, but it will be cluttered with brackets, parentheses and full table references. That isn't bad, in fact it may even run just a hair faster (since everything is fully named), but it's a nightmare to try and actually see the basics being used. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Thursday, July 29, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Update query copy one field to another Thanks - I had it backwards - just wasn't getting it. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 11:23 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > under Surname. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 12:51 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Update query copy one field to another > > > I'm just not getting it. Writing SQL statements is not coming to me, so > explain this in what I type into the grid view. > > Table name - tblCemeteries4Updating > Field name - Surname > Field name - MarrName > > In the update query grid, I have > > Field MarrName Surname > Table tblCemeteries4Updating tblCemeteries4Updating > Update To > > What do I type into Update To grid in order to copy the contents > of MarrName > field into the Surname field? > > (I don't want to change the Surname field to MarrName, as I need both - > after doing this copy, I have to manually go through and del the > contents of > MarrName from all the males, and add the correct MarrName to all the > females, as all the existing contents are "maiden names"} > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 15:06:12 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 13:06:12 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1EA@main2.marlow.com> Message-ID: Drew, just making sure you got my off list message and that it didn't get caught in a spam filter. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 12:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > It is probably easier to just think in SQL terms. > > UPDATE tblMyTable SET SomeField=1, SomeOtherField=5*[SomeOtherField], > SomeTextField=UCase([SomeTextField]), ThisField=ThatField WHERE > ADateField>#2-13-04# > > If you look at the segments of the SQL, you have the actual > command UPDATE. > After update, you need to let it know what it's updating, which is > tblMyTable. Then you need to let it know what you want to update within > that table, so you have SET. Everything after SET are comma delimited > Fields and their new values. So in the example above, we are setting > 'SomeField' to 1, SomeOtherField to 5x it's value, 'SomeTextField' to All > caps, and ThisField is being set to the value in ThatField. We > also have a > WHERE clause, which tells Jet to only perform this update on records that > have an ADateField date after the 13th of February of this year. > > Now, if you look at the SQL that Access produces, it will be the same, but > it will be cluttered with brackets, parentheses and full table references. > That isn't bad, in fact it may even run just a hair faster (since > everything > is fully named), but it's a nightmare to try and actually see the basics > being used. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 1:37 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Update query copy one field to another > > > Thanks - I had it backwards - just wasn't getting it. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Thursday, July 29, 2004 11:23 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Update query copy one field to another > > > > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > > under Surname. > > > > Drew > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Thursday, July 29, 2004 12:51 PM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Update query copy one field to another > > > > > > I'm just not getting it. Writing SQL statements is not coming to me, so > > explain this in what I type into the grid view. > > > > Table name - tblCemeteries4Updating > > Field name - Surname > > Field name - MarrName > > > > In the update query grid, I have > > > > Field MarrName Surname > > Table tblCemeteries4Updating tblCemeteries4Updating > > Update To > > > > What do I type into Update To grid in order to copy the contents > > of MarrName > > field into the Surname field? > > > > (I don't want to change the Surname field to MarrName, as I need both - > > after doing this copy, I have to manually go through and del the > > contents of > > MarrName from all the males, and add the correct MarrName to all the > > females, as all the existing contents are "maiden names"} > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 29 15:16:18 2004 From: mkahelin at gorskibulk.com (mkahelin at gorskibulk.com) Date: Thu, 29 Jul 2004 16:16:18 -0400 Subject: Autoreply: RE: [AccessD] Update query copy one field to another Message-ID: I will be out of the office starting Aug. 8th returning Aug. 23. I will be viewing my messages when I have a chance. For urgent information please call Heather Evans at 519-727-1275. From michael at ddisolutions.com.au Thu Jul 29 23:15:21 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Fri, 30 Jul 2004 14:15:21 +1000 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AD8@ddi-pdc.ddisolutions.ddisolutions.com.au> Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M From stuart at lexacorp.com.pg Fri Jul 30 00:12:25 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jul 2004 15:12:25 +1000 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <6D8C24685B2A614481AD0BDAB0AC94F9113AD8@ddi-pdc.ddisolutions.ddisolutions.com.au> Message-ID: <410A6559.14457.F9DFA6@lexacorp.com.pg> On 30 Jul 2004 at 14:15, Michael Maddison wrote: > Hi list, > > I've been mainly working in SQL 2K for a while now and have grown to > love using derived tables in my sql statements. A shame you can't do > the same in Access! You thought so, well so did I. No we didn't. This seems to come up about once a year:-) Search the archives for John Barlow's message "Re: [AccessD] SQL in-line subquery" of Thu, 8 May 2003 11:45:56 -0500 which traces references going back a posting by someon called Paul in July 2001 -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Paul.Rogers at SummitMedia.co.uk Fri Jul 30 02:35:03 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Fri, 30 Jul 2004 08:35:03 +0100 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: Brilliant, Michael. Thanks very much. (If you're prepared to divulge the url sometime, be very pleased to use it.) Cheers paul -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Friday, July 30, 2004 5:15 AM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Fri Jul 30 11:35:14 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Fri, 30 Jul 2004 11:35:14 (MET DST) Subject: [AccessD] dim question Message-ID: <200407300935.i6U9ZEZl018562@mailhostC.plex.net> Hello Group, Why do i get different results with the function below when placing dim inside and outside the function. Option Compare Database Dim strLastPnr As String Dim lngPnrCount As Long Function NumberRecs(strPnr As String) As Long If strPnr <> strLastPnr Then lngPnrCount = 1 strLastPnr = strPnr NumberRecs = 1 Else lngPnrCount = lngPnrCount + 1 NumberRecs = lngPnrCount End If End Function as result i get Pnr field Exp1 0001 t1 1 0001 t2 2 0001 t3 3 0005 t1 1 0006 t1 1 Option Compare Database Function NumberRecs(strPnr As String) As Long Dim strLastPnr As String Dim lngPnrCount As Long If strPnr <> strLastPnr Then lngPnrCount = 1 strLastPnr = strPnr NumberRecs = 1 Else lngPnrCount = lngPnrCount + 1 NumberRecs = lngPnrCount End If End Function as result i get Pnr field Exp1 0001 t1 1 0001 t2 1 0001 t3 1 0005 t1 1 0006 t1 1 TIA Pedro Janssen From andy at minstersystems.co.uk Fri Jul 30 05:39:27 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 30 Jul 2004 11:39:27 +0100 Subject: [AccessD] dim question Message-ID: <20040730103925.6296A25FC61@smtp.nildram.co.uk> Pedro Not such a dim question I didn't think ;-) With the dim outside the function it doesn't get reinitialised for each call, so when you're adding to it it's starting from a value. You'd need to put: lngPnrCount=0 at the top of the function. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: AccessD at databaseadvisors.com Subject: [AccessD] dim question Date: 30/07/04 09:36 > > Hello Group, > > Why do i get different results with the function below when placing dim inside and outside the function. > > <code> > > Option Compare Database > > Dim strLastPnr As String > Dim lngPnrCount As Long > > Function NumberRecs(strPnr As String) As Long > > If strPnr <> strLastPnr Then > lngPnrCount = 1 > strLastPnr = strPnr > NumberRecs = 1 > Else > lngPnrCount = lngPnrCount + 1 > NumberRecs = lngPnrCount > End If > > End Function > > > <code> > > as result i get > > Pnr field Exp1 > 0001 t1 1 > 0001 t2 2 > 0001 t3 3 > 0005 t1 1 > 0006 t1 1 > > > > > <code> > > Option Compare Database > > Function NumberRecs(strPnr As String) As Long > > Dim strLastPnr As String > Dim lngPnrCount As Long > > > If strPnr <> strLastPnr Then > lngPnrCount = 1 > strLastPnr = strPnr > NumberRecs = 1 > Else > lngPnrCount = lngPnrCount + 1 > NumberRecs = lngPnrCount > End If > > End Function > > > <code> > > as result i get > > Pnr field Exp1 > 0001 t1 1 > 0001 t2 1 > 0001 t3 1 > 0005 t1 1 > 0006 t1 1 > > > > TIA > > Pedro Janssen > > -- > _______________________________________________ > 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 HollisVJ at pgdp.usec.com Fri Jul 30 06:40:46 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jul 2004 06:40:46 -0500 Subject: [AccessD] Create a Search Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> There are only a few fields they want to search and create the report from. Around 7 fields and a date field. Virginia ************ Virginia, in truth this in an ambitious project. Do they want to search any field or can you restrict that much? Susan H. Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. From Developer at UltraDNT.com Fri Jul 30 07:02:20 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 08:02:20 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: Message-ID: <001401c4762d$13fd9bd0$0201a8c0@COA3> Quite interesting, but, I'll admit, I don't see the application of this ... Could someone elaborate how I could make my applications better using this bit of sql in an app? Thanks, Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Rodgers Sent: Friday, July 30, 2004 3:35 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Brilliant, Michael. Thanks very much. (If you're prepared to divulge the url sometime, be very pleased to use it.) Cheers paul -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Friday, July 30, 2004 5:15 AM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 30 07:28:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 14:28:55 +0200 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <001401c4762d$13fd9bd0$0201a8c0@COA3> References: <001401c4762d$13fd9bd0$0201a8c0@COA3> Message-ID: <8423895479.20040730142855@cactus.dk> Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of this > ... Could someone elaborate how I could make my applications better > using this bit of sql in an app? From pedro at plex.nl Fri Jul 30 07:47:41 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jul 2004 14:47:41 +0200 Subject: [AccessD] dim question References: <20040730103925.6296A25FC61@smtp.nildram.co.uk> Message-ID: <003001c47633$67def090$f5c581d5@pedro> Hello Andy, Thanks for your help. Sometimes answers look so simple! Pedro ----- Original Message ----- From: "Andy Lacey" To: "Access Developers discussion and problem solving" Sent: Friday, July 30, 2004 12:39 PM Subject: Re: [AccessD] dim question > Pedro > Not such a dim question I didn't think ;-) > With the dim outside the function it doesn't get reinitialised for each > call, so when you're adding to it it's starting from a value. You'd need to > put: > > lngPnrCount=0 > > at the top of the function. > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > > To: AccessD at databaseadvisors.com > Subject: [AccessD] dim question > Date: 30/07/04 09:36 > > > > > Hello Group, > > > > Why do i get different results with the function below when placing dim > inside and outside the function. > > > > <code> > > > > Option Compare Database > > > > Dim strLastPnr As String > > Dim lngPnrCount As Long > > > > Function NumberRecs(strPnr As String) As Long > > > > If strPnr <> strLastPnr Then > > lngPnrCount = 1 > > strLastPnr = strPnr > > NumberRecs = 1 > > Else > > lngPnrCount = lngPnrCount + 1 > > NumberRecs = lngPnrCount > > End If > > > > End Function > > > > > > <code> > > > > as result i get > > > > Pnr field Exp1 > > 0001 t1 1 > > 0001 t2 2 > > 0001 t3 3 > > 0005 t1 1 > > 0006 t1 1 > > > > > > > > > > <code> > > > > Option Compare Database > > > > Function NumberRecs(strPnr As String) As Long > > > > Dim strLastPnr As String > > Dim lngPnrCount As Long > > > > > > If strPnr <> strLastPnr Then > > lngPnrCount = 1 > > strLastPnr = strPnr > > NumberRecs = 1 > > Else > > lngPnrCount = lngPnrCount + 1 > > NumberRecs = lngPnrCount > > End If > > > > End Function > > > > > > <code> > > > > as result i get > > > > Pnr field Exp1 > > 0001 t1 1 > > 0001 t2 1 > > 0001 t3 1 > > 0005 t1 1 > > 0006 t1 1 > > > > > > > > TIA > > > > Pedro Janssen > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From gustav at cactus.dk Fri Jul 30 08:10:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 15:10:32 +0200 Subject: [AccessD] Create a Search In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> References: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> Message-ID: <10826393131.20040730151032@cactus.dk> Hi Virginia This AddToWhere function should get you started: http://www.tek-tips.com/gfaqs.cfm/lev2/4/lev3/27/pid/702/fid/1177 You will need to refine it for date filtering. Just remember to specify any date/time as a String using the Lembit method: Public Function StrDateSQL(ByVal dat As Date) As String ' Formats full string of date/time in US format for SQL. ' Overrides local (non US) settings for date/time separators. ' Example output: ' ' #08/16/1998 04:03:36 PM# ' ' 1999-10-21. Cactus Data ApS, CPH. StrDateSQL = Format(dat, "\#mm\/dd\/yyyy hh\:nn\:ss AM/PM\#") End Function /gustav > There are only a few fields they want to search and create the report from. > Around 7 fields and a date field. > Virginia > ************ > Virginia, in truth this in an ambitious project. Do they want to search any > field or can you restrict that much? > Susan H. > Does anyone have an example of creating a report by selecting search > criteria from fields? I had a request today to add a custom report builder > to one of my databases. From Mark.Mitsules at ngc.com Fri Jul 30 09:07:20 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 30 Jul 2004 10:07:20 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jul 30 09:29:16 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 30 Jul 2004 09:29:16 -0500 Subject: [AccessD] Import File From UNIX box Message-ID: It has been my experience that transferring files to and from Unix to Windows worlds you almost always have to look at the record terminators in a Hex Editor to see what is there verses what should be there. Windows Text format should have a CR and a LF character at the end of each record. Unix generally has one or the other. Some Windows programs can handle these Unix version text files without any problems, but Access seems to be sensitive to them. It wants exactly one CR and one LF. Hex 0D and Hex 0A. I have seen the FTP process to transfer the files from Unix to Windows add CR/LF's and sometimes it would only do that if it had a dot txt file extension. Weird stuff. What I have seen is that since there is only the CR (or the LF) The Access text file import will see the file as ONE RECORD. One BIG record. This will cause it to blow up on big files or just not work right on smaller ones. I have used routines similar to the one posted below to "adjust" the cr/lf record terminators as needed. The basic logic is to parse fhe file one character at a time. If it's not a CR or LF character, you send it to the output buffer. If it is a CR or a LF, write the record, adding the CR/LF as needed - or NOT because just writing the record to the file may add that for you. I haven't done it for a while so I forget exactly if you need to add them explicitly or not. I see that this code has that addition commented out. Anyway, here's an example of my routine to straighten out a txt file, reading in one file and writing it out to a new file. Private Sub cmdFixFile_Click() ' On Error GoTo Err_cmdFixFile_Click Dim dRec As String Dim CharCounter As Long Dim RecordsWritten As Double Dim dtEndTime As Date Dim dtStartTime As Date Dim I As Long Dim O As Long Dim strBL As String Dim strImportPath As String Dim strOutputPath As String Dim strNL As String Dim MyChar As String Dim MyOutputRec As String Dim DisplayCounter As Long Dim TotalCharactersRead As Double Dim LineFeedSwitch As Boolean Dim str0D As String Dim str0A As String str0D = Chr(13) str0A = Chr(10) I = FreeFile O = FreeFile + 1 strNL = Chr(13) & Chr(10) strImportPath = "D:\aaaa\oracleconv\o200138JewelryOnly.txt" strOutputPath = "D:\aaaa\oracleconv\o200138JewelryOnlyCorrected.txt" Me!txtMessage = "Commencing Fix Process. " Me.Repaint dtStartTime = Now() Open strImportPath For Input As I Open strOutputPath For Output As O Do While Not EOF(I) MyChar = Input(1, #I) If MyChar = Chr(13) Or MyChar = Chr(10) Then If LineFeedSwitch = False Then MyOutputRec = MyOutputRec ' + strNL LineFeedSwitch = True Print #O, MyOutputRec MyOutputRec = "" RecordsWritten = RecordsWritten + 1 CharCounter = 0 DisplayCounter = DisplayCounter + 1 End If Else MyOutputRec = MyOutputRec + MyChar CharCounter = CharCounter + 1 TotalCharactersRead = TotalCharactersRead + 1 LineFeedSwitch = False End If ' If CharCounter = 655 Then ' MyOutputRec = MyOutputRec + strNL ' Print #O, MyOutputRec ' MyOutputRec = "" ' RecordsWritten = RecordsWritten + 1 ' CharCounter = 0 ' DisplayCounter = DisplayCounter + 1 ' End If If DisplayCounter = 500 Then Me!txtMessage = "Total Characters Read " & TotalCharactersRead & strNL & "Total Records Written " & RecordsWritten Me.Repaint DisplayCounter = 0 End If Loop Close #I Close #O Me!txtMessage = "Total Characters Read " & TotalCharactersRead & strNL & "Total Records Written " & RecordsWritten Me.Repaint MsgBox "All Done - " & RecordsWritten & " Records Written" Exit_cmdFixFile_Click: Exit Sub Err_cmdFixFile_Click: MsgBox Err.Description Resume Exit_cmdFixFile_Click End Sub Gary Kjos garykjos at hotmail.com >From: "Mark A Matte" >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: [AccessD] Import File From UNIX box >Date: Thu, 29 Jul 2004 13:48:01 +0000 > >Hello All, > >I have an A97 db that imports a text file. The text file was on a Windows >box...but now is generated and sent to a UNIX box. The UNIX version of >this text file has a CR or LF character after each record...and access sees >this as the end of the file. Any suggestions in using vba to convert this >file(or those characters) back to a Windows format/ > >Thanks, > >Mark A. Matte > >_________________________________________________________________ >Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN >Money. http://special.msn.com/money/0407debt.armx > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From fahooper at trapo.com Fri Jul 30 09:38:50 2004 From: fahooper at trapo.com (Fred Hooper) Date: Fri, 30 Jul 2004 10:38:50 -0400 Subject: [AccessD] Trouble moving A2K mdb to another computer Message-ID: <001901c47642$ee7942e0$f0bffea9@fred> I'm having trouble moving an A2K mdb to another computer. My computer runs W2K and has all Access programs from A97 through A2003 plus VB6, all up to date. The target computers have: (1) W98 Me & A2K; and, (2) W2K & A2K. Both are up-to-date. The most extreme problem was the latest version encountered a "VBE6.dll" file cannot be found. Going back to the previous version had no problems (the changes were minor). Returning to the new version gave the problems again. Six months or so ago I had no problems moving versions. But recently, there are *always* problems. I've compacted-repaired both in A2K and A2003, I've imported everything to a new container (but not recently). Does anybody have any similar experiences and/or any ideas? Thanks, Fred Hooper From gustav at cactus.dk Fri Jul 30 09:54:40 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 16:54:40 +0200 Subject: [AccessD] API: Look up user profile from ProfileList Message-ID: <7132640374.20040730165440@cactus.dk> Hi all API gurus In the registry a user profile can look like (two lines): HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\S-1-5-21-1614895754-920026266-1343024091-1003 HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\S-1-5-21-1614895754-920026266-1343024091-1005 All user profiles have their ID listed under ProfileList. How do I look up which profile is currently in use (the current user)? In this case it could be: S-1-5-21-1614895754-920026266-1343024091-1005 I've googled around on ProfileList and others but it seems I miss the magic key word ... /gustav From John.Clark at niagaracounty.com Fri Jul 30 09:57:52 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jul 2004 10:57:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! From Developer at UltraDNT.com Fri Jul 30 10:28:34 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 11:28:34 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <8423895479.20040730142855@cactus.dk> Message-ID: <000c01c47649$e3fb6490$0201a8c0@COA3> Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 30 10:30:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 08:30:24 -0700 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: We've discussed this trick before in the list. I found it back in A97, where it was problematic and had to be used with care, and I've used it in 2k and XP. There was a tip on this in the December 2001 Access-VB-SQL Advisor magazine, called "Create Derived Tables in Jet". As I recall, they are covered in O'Reilly's Access Database Design & Programming as well. Charlotte Foust -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Thursday, July 29, 2004 8:15 PM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Fri Jul 30 10:36:52 2004 From: marcus at tsstech.com (Scott Marcus) Date: Fri, 30 Jul 2004 11:36:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: The mathematical function you are talking about is XOR. If you can get a query that looks something like: Query3: Person_ID In_Query_1 In_Query_2 1 True True 2 False False 3 True False 4 False True The following query will give you what you want: SELECT Person_ID FROM Query3 WHERE (In_Query_1 XOR In_Query_2) = TRUE The result is the following: Person_ID 3 4 Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 30 10:44:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 08:44:00 -0700 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: It replaces a join to another table or query. So instead of SELECT * FROM Table1 INNER JOIN Query1 ... You use a derived table, which is a kind of subquery, in place of Query1. Does that make it clearer? Charlotte Foust -----Original Message----- From: Steve Conklin (Developer at UltraDNT) [mailto:Developer at ultradnt.com] Sent: Friday, July 30, 2004 7:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Fri Jul 30 10:55:51 2004 From: marcus at tsstech.com (Scott Marcus) Date: Fri, 30 Jul 2004 11:55:51 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: I miss understood your question. Couldn't you just union the two queries and count by the person? For example: SELECT Count(Person) AS Total_Number_Of_People FROM [SELECT Person FROM query1 UNION SELECT Person FROM query2]. I'm tying in the other thread (Undocumented Access SQL syntax). Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Fri Jul 30 11:09:24 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 12:09:24 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: Message-ID: <001201c4764f$984bb990$0201a8c0@COA3> Much clearer, thanks Charlotte. Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 30, 2004 11:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables It replaces a join to another table or query. So instead of SELECT * FROM Table1 INNER JOIN Query1 ... You use a derived table, which is a kind of subquery, in place of Query1. Does that make it clearer? Charlotte Foust -----Original Message----- From: Steve Conklin (Developer at UltraDNT) [mailto:Developer at ultradnt.com] Sent: Friday, July 30, 2004 7:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Fri Jul 30 11:18:31 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 30 Jul 2004 12:18:31 -0400 Subject: [AccessD] Trouble moving A2K mdb to another computer In-Reply-To: <001901c47642$ee7942e0$f0bffea9@fred> Message-ID: Fred, You need to open a module in design view and check the references on the computer that's having a problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Fred Hooper Sent: Friday, July 30, 2004 10:39 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Trouble moving A2K mdb to another computer I'm having trouble moving an A2K mdb to another computer. My computer runs W2K and has all Access programs from A97 through A2003 plus VB6, all up to date. The target computers have: (1) W98 Me & A2K; and, (2) W2K & A2K. Both are up-to-date. The most extreme problem was the latest version encountered a "VBE6.dll" file cannot be found. Going back to the previous version had no problems (the changes were minor). Returning to the new version gave the problems again. Six months or so ago I had no problems moving versions. But recently, there are *always* problems. I've compacted-repaired both in A2K and A2003, I've imported everything to a new container (but not recently). Does anybody have any similar experiences and/or any ideas? Thanks, Fred Hooper -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 30 11:40:58 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jul 2004 11:40:58 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1F8@main2.marlow.com> You didn't download the 'last' version. That not only wrapped the table names in brackets (ran into the same problem with linked Oracle tables), but it also breaks the searches down, so on tables with a lot of text and memo fields, you won't get a Query Too Complex error. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, July 30, 2004 9:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 30 11:51:21 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 30 Jul 2004 12:51:21 -0400 Subject: [AccessD] Multiple Table Search Message-ID: ...hmmm I saw your post about the new version...I thought I had downloaded it and copied it right over the previous version...I guess not:( Thanks again Drew, Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, July 30, 2004 12:41 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search You didn't download the 'last' version. That not only wrapped the table names in brackets (ran into the same problem with linked Oracle tables), but it also breaks the searches down, so on tables with a lot of text and memo fields, you won't get a Query Too Complex error. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, July 30, 2004 9:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jul 30 12:31:52 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jul 2004 13:31:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: Thanks Scott. This looks like it may do the trick. I may have to create several of these, because there are 14 rows in this column; all asking me to break it down a little more (i.e. how many are: over 75, frail, vets, white, asian, black, etc.). However, once I get to this point and find an accurrate number for the total, the rest is usually much simpler. I could not, however use your code exact; the count wouldn't work, so I made a separate query that counted this union query. My query ended up being: SELECT [xx-test1].kClientID FROM [xx-test1] UNION SELECT [xx-test2].kClientID FROM [xx-test2]; And then another: SELECT Count([qryTitleIII-New].kClientID) AS CountOfkClientID FROM [qryTitleIII-New]; Thanks again...it turned out pretty simple! John W Clark >>> marcus at tsstech.com 7/30/2004 11:55:51 AM >>> I miss understood your question. Couldn't you just union the two queries and count by the person? For example: SELECT Count(Person) AS Total_Number_Of_People FROM [SELECT Person FROM query1 UNION SELECT Person FROM query2]. I'm tying in the other thread (Undocumented Access SQL syntax). Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Fri Jul 30 12:46:25 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 12:46:25 -0500 (CDT) Subject: [AccessD] Programmatically Hide the DATABASE Window In-Reply-To: References: <001901c47642$ee7942e0$f0bffea9@fred> Message-ID: <1540.216.43.21.235.1091209585.squirrel@cetus.email.starband.net> Hello everyone, again. It's FRIDAY! Pretty much got the menu bar working (one issue with the "menu Bar"'s control box not showing up after being disabled then enabled...but that's not the point here). I want to hide the main database window (the one with the queries, tables, forms, etc., to be exact) on startup, but not using the Startup's checkbox, but through vb. The DBA Archives dance around the issue, but I can't find where it's addressed. Is there a way to do this through code or am I stuck with using the checkbox in the Startup menu? I'm using Access97 in this app. Thanks! Greg Smith gregsmith at starband.net From cfoust at infostatsystems.com Fri Jul 30 13:09:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 11:09:04 -0700 Subject: [AccessD] Programmatically Hide the DATABASE Window Message-ID: Try this: Public Function HideDBWindow() On Error GoTo HideDBWindow_err ' select a tab in the Database Window DoCmd.SelectObject acTable, , True ' Hide the database window DoCmd.RunCommand acCmdWindowHide HideDBWindow_exit: Exit Function HideDBWindow_err: MsgBox Err.Description & " (#" & Err & ")" Resume HideDBWindow_exit End Function Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Friday, July 30, 2004 9:46 AM To: accessd at databaseadvisors.com Subject: [AccessD] Programmatically Hide the DATABASE Window Hello everyone, again. It's FRIDAY! Pretty much got the menu bar working (one issue with the "menu Bar"'s control box not showing up after being disabled then enabled...but that's not the point here). I want to hide the main database window (the one with the queries, tables, forms, etc., to be exact) on startup, but not using the Startup's checkbox, but through vb. The DBA Archives dance around the issue, but I can't find where it's addressed. Is there a way to do this through code or am I stuck with using the checkbox in the Startup menu? I'm using Access97 in this app. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Fri Jul 30 13:14:49 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 30 Jul 2004 13:14:49 -0500 Subject: [AccessD] ShortCut Menu on specific controls only Message-ID: <003301c47661$1a86e590$de1811d8@danwaters> Hello All! I have a form where I've created a custom shortcut menu designed for just one control. I don't want any shortcut menus for the form itself or any other controls. Per Help, if I enter a string into the ShortcutMenuBar property of a control where that string does not equal the name of a shortcut menu, then no shortcut menu will be displayed. But - what actually happens is that first I get an error message stating that the shortcut menu can't be found, and then the default shortcut menu appears. What am I not doing? (AXP) Dan Waters From GregSmith at starband.net Fri Jul 30 13:48:30 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 13:48:30 -0500 (CDT) Subject: [AccessD] Programmatically Hide the DATABASE Window-Solved! In-Reply-To: References: Message-ID: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> Thanks Charlotte! It works perfectly! Greg. > Try this: > > Public Function HideDBWindow() > On Error GoTo HideDBWindow_err > ' select a tab in the Database Window > DoCmd.SelectObject acTable, , True > ' Hide the database window > DoCmd.RunCommand acCmdWindowHide > HideDBWindow_exit: > Exit Function > HideDBWindow_err: > MsgBox Err.Description & " (#" & Err & ")" > Resume HideDBWindow_exit > End Function > > Charlotte Foust > From GregSmith at starband.net Fri Jul 30 15:16:44 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 15:16:44 -0500 (CDT) Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) In-Reply-To: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> References: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> Message-ID: <1990.216.43.21.235.1091218604.squirrel@cetus.email.starband.net> I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net From jeffrey.demulling at usbank.com Fri Jul 30 15:24:33 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Fri, 30 Jul 2004 15:24:33 -0500 Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) Message-ID: You need to go into the toolbar using View, Toolbars, Customize. Select the toolbar in question and then click the properties button. From here you can deselect the allow customizing option. This should solve your problem. "Greg Smith" To: accessd at databaseadvisors.com Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) dvisors.com 07/30/2004 03:16 PM Please respond to "Access Developers discussion and problem solving" I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ------------------------------------------------------------------------------ Electronic Privacy Notice. This e-mail, and any attachments, contains information that is, or may be, covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510-2521, and is also confidential and proprietary in nature. If you are not the intended recipient, please be advised that you are legally prohibited from retaining, using, copying, distributing, or otherwise disclosing this information in any manner. Instead, please reply to the sender that you have received this communication in error, and then immediately delete it. Thank you in advance for your cooperation. ============================================================================== From pedro at plex.nl Fri Jul 30 16:10:22 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jul 2004 23:10:22 +0200 Subject: [AccessD] Import File From UNIX box References: Message-ID: <004601c47679$a18c66b0$f5c581d5@pedro> Hello Mark, i use VBA on Reflection FTP to send a unix file as an ascii file to an windows box. Then it is imported with no problems in access. If you want the code, let me know, i will send you this next week from my work. Pedro Janssen > >From: "Mark A Matte" > >Reply-To: Access Developers discussion and problem > >solving > >To: accessd at databaseadvisors.com > >Subject: [AccessD] Import File From UNIX box > >Date: Thu, 29 Jul 2004 13:48:01 +0000 > > > >Hello All, > > > >I have an A97 db that imports a text file. The text file was on a Windows > >box...but now is generated and sent to a UNIX box. The UNIX version of > >this text file has a CR or LF character after each record...and access sees > >this as the end of the file. Any suggestions in using vba to convert this > >file(or those characters) back to a Windows format/ > > > >Thanks, > > > >Mark A. Matte > > > >_________________________________________________________________ > >Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN > >Money. http://special.msn.com/money/0407debt.armx > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DWUTKA at marlow.com Fri Jul 30 17:04:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jul 2004 17:04:37 -0500 Subject: [AccessD] OT: Anyone have a SpeedStream 5260 DSL modem? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1FF@main2.marlow.com> Just curious. Had to jump through some hoops with my DSL provider, and in the end, I ended up with a new DSL account, which still has static IP's, but uses PPPoE. A complete pain. Didn't want to install EnterNet 300, so I bit the bullet, and tried the hack to upgrade my DSL modem into a full blown DSL Modem/Router (firewall, PPPoE, DNS, etc.). Had to do some web research to pull it off, but if anyone on the list has a SpeedStream 5260 (which has an actual model number that says 5660), let me know, I can give you exact steps (and the firmware upgrades you'll need) to pull off the upgrade. Drew From snegus at ovasia.org Sat Jul 31 06:24:37 2004 From: snegus at ovasia.org (Stephen Negus) Date: Sat, 31 Jul 2004 19:24:37 +0800 Subject: [AccessD] Hide Autonumber Message-ID: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen From rbgajewski at adelphia.net Sat Jul 31 07:59:06 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Sat, 31 Jul 2004 08:59:06 -0400 Subject: [AccessD] Hide Autonumber In-Reply-To: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Message-ID: Stephen This may not be exactly what you're looking for, but why don't you just set the entire control to Visible=False? Is there a reason that you need to show the existence of the field but not the value? Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Negus Sent: Saturday, July 31, 2004 07:25 To: AccessD Subject: [AccessD] Hide Autonumber Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Sat Jul 31 12:30:35 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 31 Jul 2004 13:30:35 -0400 Subject: [AccessD] Hide Autonumber In-Reply-To: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Message-ID: Stephen, I can't think of anyway of doing it with Format, but you can get what you want by defining a column as: Expr1: IIf(IsNumeric([]),[],"") in the underlying query of the form or report. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Negus Sent: Saturday, July 31, 2004 7:25 AM To: AccessD Subject: [AccessD] Hide Autonumber Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 31 17:28:40 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 31 Jul 2004 15:28:40 -0700 Subject: [AccessD] Urgent: Problem with mscomctl.ocx References: <200301141241.h0ECfrO22503@mailgate5.cinetic.de> Message-ID: <410C1D18.6080706@shaw.ca> Well mscomctl.ocx ver 6.0.81.77 is installed by Office 2000 and Office 2000 SR-1 ; ver 6.0.84.50 by Office 2000 developer 6.1.83.36 by various version of`SQL Server and 6.1.95.45 by Office XP SP2 and Office 2003 I don't know what mscmde.dll is (a typo) You can find this info at http://support.microsoft.com/default.aspx?scid=/servicedesks/fileversion/default.asp?vartarget=msdn If you really do need your version of the control, you might get away with installing the dll's in the same directory as your mdb, if they don't need to be registered. Maybe your Access program will run with the old controls. To get back the old versions your client will probably have to reinstall office 2000. How Access searches for reference libraries. ------------ First, Access searches for a RefLibPaths key in the following location in the Microsoft Windows Registry: HKEY_LOCAL_MACHINE\Software\Microsoft\Office\9.0\Access If the key exists, Access checks for the existence of a value name that matches the name of the referenced file. If it finds a matching value name, Access loads the reference from the path specified in the corresponding value data. If Access doesn't find a RefLibPaths key, it searches for the referenced file in the locations listed below in the following order: Application folder containing the application (the folder where Msaccess.exe is located). Current folder. System folders (the System and System32 folders located in the Windows or WINNT folder). Windows or WINNT folder. PATH environment variable. For more information about environment variables, see Windows Help. The folder that contains the Access file, and any subfolders located in that folder. If Access still can't find the reference after performing this search, you must fix the reference manually. --------------- This is why it is generally better to use SageKey Scripts for an install. michael.broesdorf at web.de wrote: >Dear group, > >I created a setup package for my a2K application. The app uses the treeview control. So I included mscomctl.ocx and MSCMCDE.DLL in my package. > >The installation at my clients works just fine and my app is running. But if they try to use MS Word or Excel, it keeps asking for the MS Office installation CD ROM. Rebooting the machine makes Word work, but Excel still asks for the CD. > >They use another application (which is obviously an Access app, too). Some of the forms in that app do not work anymore (it looks like they are using the treeview control). > >My client is using Microsoft Office 2000 Premium (no service packs applied) > >The Version of the treeview I distribute is 6.0 SP4. > >So it looks like the treeview control messes up my clients machines. > >Is there anything I can do to prevent that from happening? I thought installing the newest version should work in any case?! > >HELP!!! (please) > > >Michael > > >This list sponsored by Database Advisors Inc., a worldwide association of database developers. >Visit http://www.DatabaseAdvisors.com, the database developers' list portal and support site. > > > -- Marty Connelly Victoria, B.C. Canada From artful at rogers.com Sat Jul 31 21:07:22 2004 From: artful at rogers.com (Arthur Fuller) Date: Sat, 31 Jul 2004 22:07:22 -0400 Subject: [AccessD] finding duplicates among different departmental programs In-Reply-To: Message-ID: <008501c4776c$4858f7e0$6601a8c0@rock> Union. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Sat Jul 31 23:20:02 2004 From: GregSmith at starband.net (Greg Smith) Date: Sat, 31 Jul 2004 23:20:02 -0500 Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) In-Reply-To: Message-ID: <200408010420.i714KXQC005829@cepheus.email.starband.net> Jeffrey: Yes, that works, but I need to do it programmatically. Not using the interface, but through VB so I can turn it on and off depending on the user's name. Or the security group they belong to. I have the toolbars and menus to load the ones I want for the users or programmers, but I have to turn off the customizing through the program (vb) or they can very easily defeat my menus be adding their own stuff to the bars. If I try using the interface, it's local only and will not apply to other machines where the app is loaded. Greg -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Friday, July 30, 2004 3:25 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Disable Customizing of Menus in Code (Access 97) You need to go into the toolbar using View, Toolbars, Customize. Select the toolbar in question and then click the properties button. From here you can deselect the allow customizing option. This should solve your problem. "Greg Smith" To: accessd at databaseadvisors.com Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) dvisors.com 07/30/2004 03:16 PM Please respond to "Access Developers discussion and problem solving" I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ---------------------------------------------------------------------------- -- Electronic Privacy Notice. This e-mail, and any attachments, contains information that is, or may be, covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510-2521, and is also confidential and proprietary in nature. If you are not the intended recipient, please be advised that you are legally prohibited from retaining, using, copying, distributing, or otherwise disclosing this information in any manner. Instead, please reply to the sender that you have received this communication in error, and then immediately delete it. Thank you in advance for your cooperation. ============================================================================ == -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at touchtelindia.net Thu Jul 1 00:23:05 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 1 Jul 2004 10:53:05 +0530 Subject: [AccessD] text box array References: <009f01c45e3d$20c45410$0501a8c0@colbyws> <2009.24.187.38.171.1088558239.squirrel@heck.xuppa.com> Message-ID: <01a601c45f2b$9c263a80$eb1865cb@winxp> Oleg, The code given below should create an array of four text boxes named Txt_1 to Txt_4 on form named F_TestNewControlsArray. Regards, A.D.Tejpal --------------- =============================== Sub CreateNewControlsArray() Dim intLeft As Integer, intTop As Integer Dim Fnm As String, ctl(4) As Control, Cnt As Integer Fnm = "F_TestNewControlsArray" DoCmd.OpenForm Fnm, acDesign intLeft = 100 For Cnt = 1 To 4 If Cnt > 1 Then intTop = ctl(Cnt - 1).Top + ctl(Cnt - 1).Height + 100 Else intTop = 100 End If ' Cnt > 1 Set ctl(Cnt) = CreateControl(Fnm, acTextBox, , "", "", _ intLeft, intTop) ctl(Cnt).Name = "Txt_" & Cnt Next ' Cnt DoCmd.Close acForm, Fnm, acSaveYes DoCmd.OpenForm Fnm, acNormal DoCmd.Maximize Forms(Fnm).SetFocus For Cnt = 1 To 4 Set ctl(Cnt) = Nothing Next ' Cnt End Sub =============================== ----- Original Message ----- From: Oleg_123 at xuppa.com To: accessd at databaseadvisors.com Sent: Wednesday, June 30, 2004 06:47 Subject: [AccessD] text box array Hey I have to create text box array, and i don't qite remember how to go about it right now i am just trying to create textbox via code, and can't find anthing on it... Private Sub Command6_Click() Dim x As Control Dim y As TextBox Set y = New TextBox y.Width = 1 y.Height = 0.5 y.Left = 1 y.Top = 0.6 y.Visible = True End Sub From stuart at lexacorp.com.pg Thu Jul 1 00:30:30 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 15:30:30 +1000 Subject: [AccessD] SQL ANDs In-Reply-To: <012f01c45f23$d87c37d0$0100000a@mitmaster> Message-ID: <40E42E16.31870.6E02A8A@localhost> On 1 Jul 2004 at 14:28, Martin Caro wrote: > The first AND > will always have data (ie the date range and the TargetPestPlantID) but if > one (or more) of the remaining components are left vacant I do not want the > whole construct not to work. > > SELECT....................etc > FROM dbo_ViewPWLocations > > WHERE (((dbo_ViewPWLocations.ActivationDate) Between > [Forms]![frmReports]![RptStartDate] And [Forms]![frmReports]![rptEndDate]) > AND > ((dbo_ViewPWLocations.TargetPestPlantID)=[Forms]![frmReports]![TempPestID]) > AND ((dbo_ViewPWLocations.PremiseTypeID)=[Forms]![frmReports]![rptPremise]) Try AND iif(isnull([Forms]![frmReports]![rptPremise]),True,((dbo_ViewPWLocations.Premise TypeID)=[Forms]![frmReports]![rptPremise]) etc That way, if PremisesType is selected, you will only get one type, if none is selected, you will get all types. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 03:19:36 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 10:19:36 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <26619420.1088669976408.JavaMail.www@wwinf3005> To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From R.Griffiths at bury.gov.uk Thu Jul 1 03:37:12 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 1 Jul 2004 09:37:12 +0100 Subject: [AccessD] Help with subform/query Message-ID: Paul Try using the txtSearch_onchange event to place this code (Me.frmFindPersonnel_Sub.Requery). Richard -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: 01 July 2004 09:20 To: accessd Subject: [AccessD] Help with subform/query To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ 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 Jul 1 03:42:38 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 18:42:38 +1000 Subject: [AccessD] Help with subform/query In-Reply-To: <26619420.1088669976408.JavaMail.www@wwinf3005> Message-ID: <40E45B1E.19557.7901360@localhost> On 1 Jul 2004 at 10:19, paul.hartland at fsmail.net wrote: > To all, I have a form which contains just a single text box and a > subform (Continuous) which contains personnel details. > The subform has the following query: .... on the text box of the main > form (keypress event) I have: >Private Sub txtSearch_KeyPress(KeyAscii > As Integer) ' **** Filter personnel data based on criteria data **** You are updating your query before the textbox value has changed. The sequence of events is KeyDown>>Keypress>>Change>>Keyup So you selection won't appear Move the select to either the Change or Keyup events. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 03:42:56 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 10:42:56 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <6282478.1088671376442.JavaMail.www@wwinf3005> magic send button done the trick........I needed to add .[Text] to [Forms]![frmFindPersonnel]![txtSearch] Thanks anyway sir. Paul Message date : Jul 01 2004, 09:39 AM >From : "Griffiths, Richard" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Help with subform/query Paul Try using the txtSearch_onchange event to place this code (Me.frmFindPersonnel_Sub.Requery). Richard -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: 01 July 2004 09:20 To: accessd Subject: [AccessD] Help with subform/query To all, I have a form which contains just a single text box and a subform (Continuous) which contains personnel details. The subform has the following query: SELECT tblPersonnel.PayrollNo, [Forename] & " " & [Surname] AS Name, tblPersonnel.Address1, tblPersonnel.Postcode, tblPersonnel.NatInsNo, tblPersonnel.Telhome, tblPersonnel.TelMobile, tblPersonnel.FinishDate, tblPersonnel.Surname, tblPersonnel.Forename FROM tblPersonnel WHERE (((tblPersonnel.PayrollNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Forename) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.FinishDate) Is Null) AND ((tblPersonnel.Surname) Like [Forms]![frmFindPersonnel]![txtSearch] & '*')) OR (((tblPersonnel.Postcode) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.NatInsNo) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.Telhome) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) OR (((tblPersonnel.TelMobile) Like [Forms]![frmFindPersonnel]![txtSearch] & '*') AND ((tblPersonnel.FinishDate) Is Null)) ORDER BY tblPersonnel.Surname, tblPersonnel.Forename; (Sorry for any wrap around.) on the text box of the main form (keypress event) I have: Private Sub txtSearch_KeyPress(KeyAscii As Integer) ' **** Filter personnel data based on criteria data **** Me.frmFindPersonnel_Sub.Requery End Sub But the subform still returns all the records and not just the ones which contain the txtSearch text. What am I missing or am I going about this the wrong way. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Thu Jul 1 03:56:56 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 18:56:56 +1000 Subject: [AccessD] Help with subform/query In-Reply-To: <6282478.1088671376442.JavaMail.www@wwinf3005> Message-ID: <40E45E78.21326.79D2C19@localhost> On 1 Jul 2004 at 10:42, paul.hartland at fsmail.net wrote: > magic send button done the trick........I needed to add .[Text] to > [Forms]![frmFindPersonnel]![txtSearch] > > Thanks anyway sir. > Paul > It still won't give you what you want unless you move it to the Change or Keyup. It will always disregard the last character you are entering in txtSearch. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From paul.hartland at fsmail.net Thu Jul 1 04:02:16 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 11:02:16 +0200 (CEST) Subject: [AccessD] Help with subform/query Message-ID: <21679566.1088672536064.JavaMail.www@wwinf3005> Yes, sorry forgot to mention I had moved to the change event. Thanks again Paul Message date : Jul 01 2004, 10:00 AM >From : "Stuart McLachlan" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: RE: [AccessD] Help with subform/query On 1 Jul 2004 at 10:42, paul.hartland at fsmail.net wrote: > magic send button done the trick........I needed to add .[Text] to > [Forms]![frmFindPersonnel]![txtSearch] > > Thanks anyway sir. > Paul > It still won't give you what you want unless you move it to the Change or Keyup. It will always disregard the last character you are entering in txtSearch. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bheid at appdevgrp.com Thu Jul 1 06:08:22 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Thu, 1 Jul 2004 07:08:22 -0400 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA308E3920@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> Thanks for the reply. I deleted the indexes because I thought that they might be slowing it down with so many records being updated. There are usually between 5000 and 50000 payroll records. But even on the other larger databases, it did not take very long. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, June 30, 2004 4:57 PM To: 'Access Developers discussion and problem solving' Subject: RE: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE Plus, I neglected to mention that "MyTempQuery" is the name of an already existing query in the database. Lambert > -----Original Message----- > From: Heenan, Lambert [SMTP:Lambert.Heenan at aig.com] > Sent: Wednesday, June 30, 2004 4:44 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: Updated subject: Query failing to execute WAS: RE: > [AccessD] Combobox question UPDATE > > My 2 cents worth. > > 1/ Removing the indexes is a sure fire way to slow things down. 2/ If > this is running on a JET database then executing the SQL string > directly does not give the JET engine a chance to optimize the query. > Better to plug the SQL into a querydef and the run the query, as you > discovered. How to do that in code?... > > Dim Qd as QueryDef > Dim sSQL as String > > sSQL = "UPDATE Contract INNER JOIN [Payroll Line Items] ON > Contract.[Contract ID] = [Payroll Line Items].Contract ID] SET > [Payroll Line Items].PolicyID = [EnforceWCID] WHERE [Payroll Line > Items].CostType='WC' AND > Contract.EnforceWCID<>0;" > > Set Qd = CurrentDb.QueryDefs("MyTempQuery") > Qd.SQL = sSQL > Set Qd = Nothing > Docmd.OpenQuery "MyTempQuery" > > 3/ How many records were involved with the other databases? > > Lambert > > > -----Original Message----- > > From: Bobby Heid [SMTP:bheid at appdevgrp.com] > > Sent: Wednesday, June 30, 2004 3:31 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: Updated subject: Query failing to execute WAS: RE: > > [AccessD] Combobox question UPDATE > > > > I let it run during lunch and it finally did get through the query. > > It updated about 48000 records. > > > > I still do not know why it is taking so long. I even took off > > almost > all > > of > > the indexes of the payroll table and it still took a very long time. > > > > Any ideas? > > > > Thanks, > > Bobby > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby > > Heid > > Sent: Wednesday, June 30, 2004 11:41 AM > > To: 'Access Developers discussion and problem solving' > > Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] > > Combobox question > > > > > > Sorry about that. I forgot to change the subject. > > > > Bobby > > > > > > -----Original Message----- > > From: Bobby Heid [mailto:bheid at appdevgrp.com] > > Sent: Wednesday, June 30, 2004 11:40 AM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] Combo box question > > > > > > Hi all, > > > > I have a query that is run during a conversion of a database that > appears > > to > > be hanging on this one particular database. > > > > Here's the query: > > UPDATE Contract > > INNER JOIN [Payroll Line Items] > > ON Contract.[Contract ID] = [Payroll Line Items].[Contract ID] > > SET [Payroll Line Items].PolicyID = [EnforceWCID] > > WHERE [Payroll Line Items].CostType='WC' > > AND Contract.EnforceWCID<>0; > > > > This query is placed into a string and executed with: db.execute > > strSQL,dbfailonerror > > > > There are ~192,000 payroll records and ~3500 contract records. > > > > If I copy the SQL into the query designer and run it, it only takes > about > > 5 > > seconds or so to execute. I have let the version in the code run > > for > over > > 1/2 hour and have to end up killing access. > > > > Anyone have any ideas as to what may be happening? I am running AXP > sp2. > > The tables are linked. This code has ran fine on over 100 other > > conversions. > > > > Thanks, > > Bobby > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 1 06:18:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 1 Jul 2004 13:18:25 +0200 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD] Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> References: <916187228923D311A6FE00A0CC3FAA305BB655@ADGSERVER> Message-ID: <19416942522.20040701131825@cactus.dk> Hi Bobby Dropping/recreating indices is mainly used when _appending_ large amount of data to large tables. Perhaps that is what you had in mind? /gustav > Thanks for the reply. > I deleted the indexes because I thought that they might be slowing it down > with so many records being updated. > There are usually between 5000 and 50000 payroll records. But even on the > other larger databases, it did not take very long. > Thanks, > Bobby >> -----Original Message----- >> From: Heenan, Lambert [SMTP:Lambert.Heenan at aig.com] >> Sent: Wednesday, June 30, 2004 4:44 PM >> To: 'Access Developers discussion and problem solving' >> Subject: RE: Updated subject: Query failing to execute WAS: RE: >> [AccessD] Combobox question UPDATE >> >> My 2 cents worth. >> >> 1/ Removing the indexes is a sure fire way to slow things down. From rl_stewart at highstream.net Thu Jul 1 06:42:42 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 06:42:42 -0500 Subject: [AccessD] RE: design/development question on representing mtm relationships In-Reply-To: <20040630214603.XMIH1701.imf20aec.mail.bellsouth.net@SUSANO NE> References: <5.1.0.14.2.20040630131140.017cb8e0@pop3.highstream.net> Message-ID: <5.1.0.14.2.20040701063426.01697730@pop3.highstream.net> Susan, Ok, I see what you mean. And here is how I handle such things. There are two methods. All of the "lookup" type data, in your example, the publisher, would be a drop down list in a combobox. So, you would either use the not in list event to be able to add it, or a button to the right of the combobox labeled "Add" that would open a data entry form to do the add. I have done it both ways. And, there are pros and cons for doing it both ways. The biggest con for the not in list event is that it makes it too easy for people to enter things with an incorrect spelling. Oh, and a third way is to not make any of your forms modal. That way your users can navigate through your menu system and add records into the lookup tables without a hassle. I use a form that allows them to select the lookup table they want to edit rather than individual menu items for each lookup table maintenance form. And, in all of my currently developed systems, this last method is the one I use. But, in the past, I have used all three. Robert At 05:46 PM 30/06/2004 -0400, Susan Harkins wrote: >If you are going to maintain the relationship, you ALWAYS enter the one side >before the many side. I do not understand what you mean by unnatural when >you said that entering the one before the many felt unnatural. Can I have >line items for an order without the order itself? Can I have a home address >for a person before I have the person? > >==========Back to the simple books database -- you're entering book >information -- certainly, entering the title, ISBN, etc. is something you >want to enter first -- but then Ack! The publisher for the book you're >entering isn't in the publishers table yet -- that sort of issue. It's >clearly a thinking order -- meaning, "books" are the item you're tracking, >not publishers -- publisher is just supportive information. For instance, on >a paper form, publisher might be way down the list -- certainly the book >title would be the first line -- see what I mean? So yes, often to enter the >one value -- and often there are many one values supporting a many record -- >seems unnatural. > >Susan H. From stuart at lexacorp.com.pg Thu Jul 1 07:09:54 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 01 Jul 2004 22:09:54 +1000 Subject: [AccessD] RE: design/development question on representing mtm relationships In-Reply-To: <5.1.0.14.2.20040701063426.01697730@pop3.highstream.net> References: <20040630214603.XMIH1701.imf20aec.mail.bellsouth.net@SUSANO NE> Message-ID: <40E48BB2.25038.84DD5BE@localhost> On 1 Jul 2004 at 6:42, Robert L. Stewart wrote: > Susan, > > Ok, I see what you mean. And here is how I handle such things. There are > two methods. All of the "lookup" type data, in your example, the > publisher, would be a drop down list in a combobox. So, you would either > use the not in list event to be able to add it, or a button to the right of > the combobox labeled "Add" that would open a data entry form to do the > add. I have done it both ways. And, there are pros and cons for doing it > both ways. The biggest con for the not in list event is that it makes it > too easy for people to enter things with an incorrect spelling. I never use "autoadd" in the NotInList. The NotInList event triggers a msgbox to confirm whether they want to add a new record If they confirm, I open a modal Data Entry form with the entered data already filled in for the user to complete/confirm. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From ssharkins at bellsouth.net Thu Jul 1 07:13:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 1 Jul 2004 08:13:42 -0400 Subject: [AccessD] RE: design/development question on representing mtmrelationships In-Reply-To: <40E48BB2.25038.84DD5BE@localhost> Message-ID: <20040701121338.HKQB1701.imf20aec.mail.bellsouth.net@SUSANONE> I never use "autoadd" in the NotInList. The NotInList event triggers a msgbox to confirm whether they want to add a new record If they confirm, I open a modal Data Entry form with the entered data already filled in for the user to complete/confirm. =============This is a good idea and also solves the problem of required values, etc. that might also need to be entered. Susan H. From bheid at appdevgrp.com Thu Jul 1 07:39:45 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Thu, 1 Jul 2004 08:39:45 -0400 Subject: Updated subject: Query failing to execute WAS: RE: [AccessD]Combobox question UPDATE In-Reply-To: <916187228923D311A6FE00A0CC3FAA308E3A6B@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB657@ADGSERVER> Hi Gustav, It is. I was shooting in the dark. LOL. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 01, 2004 7:18 AM To: Access Developers discussion and problem solving Subject: Re: Updated subject: Query failing to execute WAS: RE: [AccessD]Combobox question UPDATE Hi Bobby Dropping/recreating indices is mainly used when _appending_ large amount of data to large tables. Perhaps that is what you had in mind? /gustav From artful at rogers.com Thu Jul 1 08:34:20 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 1 Jul 2004 09:34:20 -0400 Subject: [AccessD] SQL ANDs In-Reply-To: <00d601c45f10$220ed790$0100000a@mitmaster> Message-ID: <060f01c45f70$1d07e8d0$6601a8c0@rock> First of all, put some code in the open event that declares a few variables and assigns the form's controls' values to them, so that your query is testable and printable. Something like this: Dim x, y, z x = Forms!frm!txtBox1 y = Forms!frm!txtBox2 Etc. Then plug these vars into your query, so it looks something like: SELECT * FROM SomeTables WHERE (fld1 = x OR x IS NULL) AND (fld2 = y OR y IS NULL) AND ... etc Note that I'm removing the IsNull() tests out of the code and replacing them with SQL "IS NULL" tests. Now you can test the query on its own without worrying about the form at all. I think that the syntax above will give you what you want, but I wrote it in the Outlook compiler... :) HTH, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Wednesday, June 30, 2004 10:07 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] SQL ANDs Thanks for the suggestion Stephen but I tried inserting that syntax as criteria for each field but with no luck, it looked promising. Even when I tried just IsNull(Forms!frm!txtBox1) I got zero records when txtBox1 was empty. Any other thoughts? Martin ----- Original Message ----- From: "Stephen Bond" To: "Access Developers discussion and problem solving" Sent: Thursday, July 01, 2004 11:27 AM Subject: RE: [AccessD] SQL ANDs > How about ... > > WHERE > (fld1 = Forms!frm!txtBox1 OR IsNull(Forms!frm!txtBox1)) > AND > (fld2 = Forms!frm!txtBox2 OR IsNull(Forms!frm!txtBox2)) > AND ... etc > > Stephen Bond > > > -----Original Message----- > > From: Martin Caro [mailto:mcaro at bigpond.net.au] > > Sent: Thursday, 1 July 2004 10:30 a.m. > > To: Access Developers discussion and problem solving > > Subject: [AccessD] SQL ANDs > > > > > > Hi Folks > > > > I have a report query that has a WHERE followered by one or a number > > of ANDs. The components of the ANDs reference text boxes on a form > > each of which may or may not be populated. How can I get it to > > negate one or a number of the ANDs if the target box is Null? At the > > moment if any one of the AND components is Null no records are > > returned. I've played around with IIF to test each box first but no > > luck so far.... > > > > Thanks > > > > Martin > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Thu Jul 1 09:29:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 1 Jul 2004 16:29:21 +0200 (CEST) Subject: [AccessD] MSDE is now SQL Server Express Edition Message-ID: <24481732.1088692161511.JavaMail.www@wwinf3003> SQL Server 2005 Express Edition can be found at http://www.microsoft.com/sql/express/ Paul Hartland Message date : Jul 01 2004, 01:58 AM >From : "MartyConnelly" To : "Access Developers discussion and problem solving" Copy to : Subject : [AccessD] MSDE is now SQL Server Express Edition http://www.itworldcanada.com/Pages/Docbase/ViewArticle.aspx?ID=idgml-d69d0519-f389-41c0-a316-a8b92ed93714&Portal=Integrating%20IT If anyone knows where to download the beta's for Visual Basic 2005 Express Edition or Visual C# 2005 Express Edition due out next week I wouldn't mind knowing where to get them. -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Thu Jul 1 09:45:25 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 07:45:25 -0700 Subject: [AccessD] A2K vs AXP on record deletes References: Message-ID: <009001c45f7a$0ba26f20$6601a8c0@HAL9002> Mark: No memo fields. :( Any other ideas, anyone? TIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, June 30, 2004 12:27 PM Subject: RE: [AccessD] A2K vs AXP on record deletes > Rocky, > > You might check to see if this info pertains to your situation: > http://www.kbalertz.com/Feedback_302525.aspx > > Mark > > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Wednesday, June 30, 2004 2:52 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] A2K vs AXP on record deletes > > > Dear List: > > Is there an incompatibility between A2K and AXP on record deletes? > > I developed my app in A2K and the following line of code: > > DoCmd.RunCommand acCmdDeleteRecord > > works at the client's site on A2K machines, but blows on AXP machines with > an error "3709: The search key was not found in any record" > > MTIA, > > Rocky Smolin > Beach Access Software > http://www.e-z-mrp.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jul 1 09:48:15 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 10:48:15 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: <24481732.1088692161511.JavaMail.www@wwinf3003> References: <24481732.1088692161511.JavaMail.www@wwinf3003> Message-ID: <64330.68.161.26.217.1088693295.squirrel@heck.xuppa.com> Is it possible to create control (textbox) in a form i am already in at runtime ? Everything i find on the web seems to be about creating new forms and new controls in them. ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From mcaro at bigpond.net.au Thu Jul 1 08:46:24 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Thu, 1 Jul 2004 23:46:24 +1000 Subject: [AccessD] SQL ANDs References: <060f01c45f70$1d07e8d0$6601a8c0@rock> Message-ID: <005201c45f71$cd276230$0100000a@mitmaster> Thanks Arthur.... I'll have a play and let you known how it goes. I'm currently looking at building the form's Filter on the fly depending on the txtbBoxes with data (a bit like Filter by Form) but without using that functionality.. will look at several options. Martin ----- Original Message ----- From: "Arthur Fuller" To: "'Access Developers discussion and problem solving'" Sent: Thursday, July 01, 2004 11:34 PM Subject: RE: [AccessD] SQL ANDs > First of all, put some code in the open event that declares a few > variables and assigns the form's controls' values to them, so that your > query is testable and printable. Something like this: > > Dim x, y, z > x = Forms!frm!txtBox1 > y = Forms!frm!txtBox2 > Etc. > > Then plug these vars into your query, so it looks something like: > > SELECT * FROM SomeTables > WHERE > (fld1 = x OR x IS NULL) > AND > (fld2 = y OR y IS NULL) > AND ... etc > > Note that I'm removing the IsNull() tests out of the code and replacing > them with SQL "IS NULL" tests. > > Now you can test the query on its own without worrying about the form at > all. I think that the syntax above will give you what you want, but I > wrote it in the Outlook compiler... :) > > HTH, > Arthur > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro > Sent: Wednesday, June 30, 2004 10:07 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] SQL ANDs > > > Thanks for the suggestion Stephen but I tried inserting that syntax as > criteria for each field but with no luck, it looked promising. Even > when I tried just IsNull(Forms!frm!txtBox1) I got zero records when > txtBox1 was empty. > > Any other thoughts? > > Martin > > ----- Original Message ----- > From: "Stephen Bond" > To: "Access Developers discussion and problem solving" > > Sent: Thursday, July 01, 2004 11:27 AM > Subject: RE: [AccessD] SQL ANDs > > > > How about ... > > > > WHERE > > (fld1 = Forms!frm!txtBox1 OR IsNull(Forms!frm!txtBox1)) > > AND > > (fld2 = Forms!frm!txtBox2 OR IsNull(Forms!frm!txtBox2)) > > AND ... etc > > > > Stephen Bond > > > > > -----Original Message----- > > > From: Martin Caro [mailto:mcaro at bigpond.net.au] > > > Sent: Thursday, 1 July 2004 10:30 a.m. > > > To: Access Developers discussion and problem solving > > > Subject: [AccessD] SQL ANDs > > > > > > > > > Hi Folks > > > > > > I have a report query that has a WHERE followered by one or a number > > > > of ANDs. The components of the ANDs reference text boxes on a form > > > each of which may or may not be populated. How can I get it to > > > negate one or a number of the ANDs if the target box is Null? At the > > > > moment if any one of the AND components is Null no records are > > > returned. I've played around with IIF to test each box first but no > > > luck so far.... > > > > > > Thanks > > > > > > Martin > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 1 10:19:13 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 08:19:13 -0700 Subject: [AccessD] Create Control in Existing Form Message-ID: You can create a new control in design view. Why would you want to create one in an active form anyhow? It would make more sense to simply make an existing textbox visible. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Thursday, July 01, 2004 6:48 AM To: accessd at databaseadvisors.com Subject: Re: [AccessD] Create Control in Existing Form Is it possible to create control (textbox) in a form i am already in at runtime ? Everything i find on the web seems to be about creating new forms and new controls in them. ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 1 11:57:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 01 Jul 2004 09:57:14 -0700 Subject: [AccessD] MSDE is now SQL Server Express Edition References: Message-ID: <40E4426A.8040204@shaw.ca> Thks for the url's to get me started Main MSDN page for Visual Studio 2005 Developer http://lab.msdn.microsoft.com/vs2005/Default.aspx Main .net framework page http://msdn.microsoft.com/netframework but 2 downloads are here for Net Framework version 2.0 .NET Framework 2.0 SDK Beta 1 x86 setup.exe .NET Framework Version 2.0 Redistributable Package Beta 1 (x86) dotnetfx.exe http://www.microsoft.com/downloads/details.aspx?FamilyID=916ec067-8bdc-4737-9430-6cec9667655c&DisplayLang=en You must install the .NET Framework Redistributable Package dotnetfx.exe version 2.0 Beta 1 prior to running setup.exe There is also this freebie of vb.net components The Visual Basic .NET Resource Kit http://msdn.microsoft.com/vbasic/vbrkit/default.aspx JMoss wrote: >Here is the link to the base site, but what I can't find is the link to >download .net framework beta 2 which is required by all of the express >edition products. If anyone has a link to that, please enlighten me. > >http://lab.msdn.microsoft.com/vs2005/Default.aspx?did=1&t=4dBvzSBXOD8yXm8YdE >RN57qfMSadd7Wh3L2dyXz1zFLmUU9wzjwao!LqUCUvB19S9zlQOZ1ViA9yEyVoNxAT*vCg$$&p=4 >CUK6OY1LG688ZHBKzZKBJQgc!8AtWmEhxZUzMCDnBzxhyjZ9wlQYXsAtmcMDQrwh4oNEJNxj2TUV >dSm9Jr3ngPbT2taRnU7PjvAuEw41QYVtODGvt7EcW3PfI4HYn7!q967CpYvrksF0$ > >JM > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly >Sent: Wednesday, June 30, 2004 7:48 PM >To: Access Developers discussion and problem solving >Subject: [AccessD] MSDE is now SQL Server Express Edition > > >http://www.itworldcanada.com/Pages/Docbase/ViewArticle.aspx?ID=idgml-d69d051 >9-f389-41c0-a316-a8b92ed93714&Portal=Integrating%20IT > >If anyone knows where to download the beta's for Visual Basic 2005 >Express Edition or Visual C# 2005 Express Edition due out next week >I wouldn't mind knowing where to get them. > >-- >Marty Connelly >Victoria, B.C. >Canada > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From davide at dalyn.co.nz Thu Jul 1 12:29:03 2004 From: davide at dalyn.co.nz (David Emerson) Date: Fri, 02 Jul 2004 05:29:03 +1200 Subject: [AccessD] Limitations of ADP/SQL Message-ID: <5.2.0.9.0.20040702052645.00b3e958@mail.dalyn.co.nz> I have written an app for a company with an Access XP ADP F/E with an SQL2000 BE. The company wants to know what the limitations are with this set up (how many records/how large can the data base get) and what would be the "next step up". Does anyone have any pointer for information? Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (04) 478-7456 Mobile 027-280-9348 From accessd at shaw.ca Thu Jul 1 12:57:25 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 01 Jul 2004 10:57:25 -0700 Subject: [AccessD] Limitations of ADP/SQL In-Reply-To: <5.2.0.9.0.20040702052645.00b3e958@mail.dalyn.co.nz> Message-ID: Hi David: When considering the SQL2000, the limits are only on purchased licenses. The actual data size, extending over multiple servers, for one copy of SQL2000, is about 5 tera-bytes. The rest is limited by your skill and imagination. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of David Emerson Sent: Thursday, July 01, 2004 10:29 AM To: accessd at databaseadvisors.com Subject: [AccessD] Limitations of ADP/SQL I have written an app for a company with an Access XP ADP F/E with an SQL2000 BE. The company wants to know what the limitations are with this set up (how many records/how large can the data base get) and what would be the "next step up". Does anyone have any pointer for information? Regards David Emerson Dalyn Software Ltd 25 Cunliffe St, Churton Park Wellington, New Zealand Ph/Fax (04) 478-7456 Mobile 027-280-9348 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Thu Jul 1 13:16:33 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:16:33 -0500 Subject: [AccessD] Re: design/development question on representing mtm relationships In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701131424.017d8430@pop3.highstream.net> I do not use "AutoAdd" either. Did not think I even mentioned it. I always open a form because of the other constraints against lookup tables. At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 01 Jul 2004 22:09:54 +1000 >From: "Stuart McLachlan" >Subject: Re: [AccessD] RE: design/development question on representing > mtm relationships >To: Access Developers discussion and problem solving > >Message-ID: <40E48BB2.25038.84DD5BE at localhost> >Content-Type: text/plain; charset=US-ASCII > >On 1 Jul 2004 at 6:42, Robert L. Stewart wrote: > > > Susan, > > > > Ok, I see what you mean. And here is how I handle such things. There are > > two methods. All of the "lookup" type data, in your example, the > > publisher, would be a drop down list in a combobox. So, you would either > > use the not in list event to be able to add it, or a button to the > right of > > the combobox labeled "Add" that would open a data entry form to do the > > add. I have done it both ways. And, there are pros and cons for doing it > > both ways. The biggest con for the not in list event is that it makes it > > too easy for people to enter things with an incorrect spelling. > >I never use "autoadd" in the NotInList. The NotInList event triggers a >msgbox >to confirm whether they want to add a new record If they confirm, I open a >modal Data Entry form with the entered data already filled in for the user to >complete/confirm. From bchacc at san.rr.com Thu Jul 1 13:17:35 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 11:17:35 -0700 Subject: [AccessD] Outlook Object Broken References: Message-ID: <01d001c45f97$af129eb0$6601a8c0@HAL9002> V, Steve, Jim, etc.: It appears that late binding is the solution. Thanks for that. Always wondered what that late binding thing was good for. :) Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "vchas" To: "'Access Developers discussion and problem solving'" Sent: Monday, June 28, 2004 3:07 PM Subject: RE: [AccessD] Outlook Object Broken > > > Dim objOutlook As Object > Set objOutlook = CreateObject("Outlook.Application") > Set objOutlookMsg = objOutlook.CreateItem(0) > With objOutlookMsg > .To = "you at companyname.com" > .Cc = "them at companyname.com" > .Subject = "Hello World (one more time)..." > .Body = "body of message" > .HTMLBody = "HTML version of message" > .Attachments.Add ("c:\FileToSend.txt") > .Send > End With > Set objOutlookMsg = Nothing > Set objOutlook = Nothing > > HTH > > V > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky > > Smolin - Beach Access Software > > Sent: 28 June 2004 22:21 > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] Outlook Object Broken > > > > > > Doris: > > > > I declare the object variables like this: > > > > Dim objOutlook As Outlook.Application > > Dim objOutlookMsg As Outlook.MailItem > > Dim objOutlookRecip As Outlook.Recipient > > Dim objOutlookAttach As Outlook.Attachment > > > > Then it blows up on the very next line: > > > > ' Create the Outlook session. > > Set objOutlook = CreateObject("Outlook.Application") > > > > So I'm not referencing the specific Outlook 9.0 library. Is it > > possible that they changed the names of the properties or methods or > > whatever you call them in the Outlook 11 library - like changing > > .Application to .App or some other humorous trick to keep us fully > > employed? > > > > TIA > > > > is > > > > ----- Original Message ----- > > From: "Mike & Doris Manning" > > To: "'Access Developers discussion and problem solving'" > > > > Sent: Monday, June 28, 2004 1:11 PM > > Subject: RE: [AccessD] Outlook Object Broken > > > > > > > We ran into a similar problem because we have many > > different operating > > > systems in our organization. We got around it by not referencing a > > > particular Outlook object model. > > > > > > Doris Manning > > > Database Administrator > > > Hargrove Inc. > > > www.hargroveinc.com > > > > > > > > > -----Original Message----- > > > From: accessd-bounces at databaseadvisors.com > > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky > > > Smolin - Beach Access Software > > > Sent: Monday, June 28, 2004 1:16 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] Outlook Object Broken > > > > > > > > > Dear List: > > > > > > I provide an app to a client which uses the Outlook object to send > > > emails. In my version the reference is to the Microsoft Outlook 9.0 > > > Object > > Library. > > > They recently upgraded to A2003 and their reference is now to the > > Microsoft > > > Outlook 11.0 Object Library. > > > > > > When my app hits the line of code:Set objOutlook = > > > CreateObject("Outlook.Application") it blows up saying it > > is unable > > > to create the object. > > > > > > Is there an easy fix or workaround to this problem? > > > > > > MTIA, > > > > > > Rocky Smolin > > > Beach Access Software > > > http://www.e-z-mrp.com > > > > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From rl_stewart at highstream.net Thu Jul 1 13:19:44 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:19:44 -0500 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701131851.0182cca0@pop3.highstream.net> Rocky try: Application.RunCommand 223 You have to have a record "selected" in order to do this. Robert At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 07:45:25 -0700 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] A2K vs AXP on record deletes >To: "Access Developers discussion and problem solving" > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Mark: > >No memo fields. :( Any other ideas, anyone? > >TIA > >Rocky Smolin >Beach Access Software >http://www.e-z-mrp.com > > > >----- Original Message ----- >From: "Mitsules, Mark S. (Newport News)" >To: "'Access Developers discussion and problem solving'" > >Sent: Wednesday, June 30, 2004 12:27 PM >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > Rocky, > > > > You might check to see if this info pertains to your situation: > > http://www.kbalertz.com/Feedback_302525.aspx > > > > Mark > > > > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Wednesday, June 30, 2004 2:52 PM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > Dear List: > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > I developed my app in A2K and the following line of code: > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > works at the client's site on A2K machines, but blows on AXP machines >with > > an error "3709: The search key was not found in any record" > > > > MTIA, > > > > Rocky Smolin From rl_stewart at highstream.net Thu Jul 1 13:38:02 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:38:02 -0500 Subject: [AccessD] Re: SQL ANDs In-Reply-To: <200407010843.i618hpQ29365@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701133334.0186fd78@pop3.highstream.net> Martin, Create 2 identical queries. Suffix one with a 0 (zero) and the other with a 1. The 0 query is your base query. Then use the following code: dim qdf as dao.querydef set qdf=currentdb.querydefs("Query_0") dim strSQL as string set strsql = mid(qdf.sql,1,len(qdf.sql)-3) ' removes the ; at the end and 3 is the right number dim strWhere as string strwhere = " WHERE " if not isnull(me!textbox1) then strwhere = "YourColumn = " & me!TextBox1 & " and " end if if not isnull(me!textbox2) then strwhere = "YourColumn = " & me!TextBox2 & " and " end if if not isnull(me!textbox3) then strwhere = "YourColumn = " & me!TextBox3 & " and " end if ' remove trailing and strwhere = mid(strwhere,1,len(strwhere)-5) & ";" set qdf=currentdb.querydefs("Query_1") qdf.sql = strsql & strwhere qdf.close docmd.openreport "YourReportName" Query_1 is always going to be the source for the report. This method can be used for all reporting. Robert At 03:43 AM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 08:30:12 +1000 >From: "Martin Caro" >Subject: [AccessD] SQL ANDs >To: "Access Developers discussion and problem solving" > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> >Content-Type: text/plain; charset="iso-8859-1" > >Hi Folks > >I have a report query that has a WHERE followered by one or a number of >ANDs. The components of the ANDs reference text boxes on a form each of >which may or may not be populated. How can I get it to negate one or a >number of the ANDs if the target box is Null? At the moment if any one of >the AND components is Null no records are returned. I've played around >with IIF to test each box first but no luck so far.... > >Thanks > >Martin From rl_stewart at highstream.net Thu Jul 1 13:48:00 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Thu, 01 Jul 2004 13:48:00 -0500 Subject: [AccessD] Re: MSDE is now SQL Server Express Edition In-Reply-To: <200407011700.i61H0dQ14498@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040701134735.017f0928@pop3.highstream.net> You can try this for the framework: http://www.microsoft.com/downloads/details.aspx?familyid=f1232c37-0fee-4aa6-aa89-b6dcefc0873b&displaylang=en At 12:00 PM 01/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 16:29:21 +0200 (CEST) >From: paul.hartland at fsmail.net >Subject: Re: [AccessD] MSDE is now SQL Server Express Edition >To: Access Developers discussion and problem solving > >Message-ID: <24481732.1088692161511.JavaMail.www at wwinf3003> >Content-Type: text/plain; charset=iso-8859-1 > >SQL Server 2005 Express Edition can be found at >http://www.microsoft.com/sql/express/ >Paul Hartland From bchacc at san.rr.com Thu Jul 1 13:48:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 1 Jul 2004 11:48:20 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes References: <5.1.0.14.2.20040701131851.0182cca0@pop3.highstream.net> Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0@HAL9002> Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Thu Jul 1 14:06:56 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Thu, 1 Jul 2004 13:06:56 -0600 Subject: [AccessD] Re: A2K vs AXP on record deletes Message-ID: ? acCmdDeleteRecord In the command window will get you the numeric version of any constant like that. -Chris Mackin -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, July 01, 2004 12:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Thu Jul 1 14:22:44 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Thu, 1 Jul 2004 15:22:44 -0400 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: Message-ID: <000001c45fa0$c92dbb00$cc0aa845@hargrove.internal> You can also use the Object Browser to get this information. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mackin, Christopher Sent: Thursday, July 01, 2004 3:07 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Re: A2K vs AXP on record deletes ? acCmdDeleteRecord In the command window will get you the numeric version of any constant like that. -Chris Mackin -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Thursday, July 01, 2004 12:48 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: What's the 223? Is there a vb constant that goes with that? Or is there a place I can find out what the different codes are for Application.RunCommand? Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Sent: Thursday, July 01, 2004 11:19 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky try: > > Application.RunCommand 223 > > You have to have a record "selected" in order to do this. > > Robert > > > At 12:00 PM 01/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 07:45:25 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <009001c45f7a$0ba26f20$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Mark: > > > >No memo fields. :( Any other ideas, anyone? > > > >TIA > > > >Rocky Smolin > >Beach Access Software > >http://www.e-z-mrp.com > > > > > > > >----- Original Message ----- > >From: "Mitsules, Mark S. (Newport News)" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 30, 2004 12:27 PM > >Subject: RE: [AccessD] A2K vs AXP on record deletes > > > > > > > Rocky, > > > > > > You might check to see if this info pertains to your situation: > > > http://www.kbalertz.com/Feedback_302525.aspx > > > > > > Mark > > > > > > > > > -----Original Message----- > > > From: Rocky Smolin - Beach Access Software > > > [mailto:bchacc at san.rr.com] > > > Sent: Wednesday, June 30, 2004 2:52 PM > > > To: AccessD at databaseadvisors.com > > > Subject: [AccessD] A2K vs AXP on record deletes > > > > > > > > > Dear List: > > > > > > Is there an incompatibility between A2K and AXP on record deletes? > > > > > > I developed my app in A2K and the following line of code: > > > > > > DoCmd.RunCommand acCmdDeleteRecord > > > > > > works at the client's site on A2K machines, but blows on AXP > > > machines > >with > > > an error "3709: The search key was not found in any record" > > > > > > MTIA, > > > > > > Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Thu Jul 1 18:57:11 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 16:57:11 -0700 Subject: [AccessD] Multi-graphs on report Message-ID: We have a report with multiple subreports, each with a matching graph. If a user previews the report and tries to print anything but the full report, the graphs don't show up, or rather, the graphics don't show up, although the labels and legends do. Can anyone suggest a way to goose this report to make the full graph show up when only a specific range of pages is printed? Charlotte Foust From Oleg_123 at xuppa.com Thu Jul 1 19:09:44 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 20:09:44 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: References: Message-ID: <1964.24.187.38.171.1088726984.squirrel@heck.xuppa.com> thank you Charlotte, how can I move it ? what would be a correct way to do something like this if i want to move record txtA1 ? -- Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Visible = True End Sub > You can create a new control in design view. Why would you want to > create one in an active form anyhow? It would make more sense to simply > make an existing textbox visible. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 6:48 AM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Create Control in Existing Form > > > Is it possible to create control (textbox) in a form i am already in at > runtime ? Everything i find on the web seems to be about creating new > forms and new controls in them. > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From cfoust at infostatsystems.com Thu Jul 1 19:21:09 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 1 Jul 2004 17:21:09 -0700 Subject: [AccessD] Create Control in Existing Form Message-ID: That would be the way, although you might need to set the Left property as well to get it lined up as desired. We actually do this with some forms where we only show certain controls under specific circumstances. If you're going to do this, you may have to change the size of the form as well in the same code. Charlotte Foust -----Original Message----- From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] Sent: Thursday, July 01, 2004 4:10 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Create Control in Existing Form thank you Charlotte, how can I move it ? what would be a correct way to do something like this if i want to move record txtA1 ? -- Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Visible = True End Sub > You can create a new control in design view. Why would you want to > create one in an active form anyhow? It would make more sense to > simply make an existing textbox visible. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 6:48 AM > To: accessd at databaseadvisors.com > Subject: Re: [AccessD] Create Control in Existing Form > > > Is it possible to create control (textbox) in a form i am already in > at runtime ? Everything i find on the web seems to be about creating > new forms and new controls in them. > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Oleg_123 at xuppa.com Thu Jul 1 19:52:33 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Thu, 1 Jul 2004 20:52:33 -0400 (EDT) Subject: [AccessD] Create Control in Existing Form In-Reply-To: References: Message-ID: <2199.24.187.38.171.1088729553.squirrel@heck.xuppa.com> hmm, doesn't seem to be working, it bring it to uper left corner Private Sub Command9_Click() txtA1.Top = 0.33 txtA1.Left = 0.1667 txtA1.Visible = True End Sub > That would be the way, although you might need to set the Left property > as well to get it lined up as desired. We actually do this with some > forms where we only show certain controls under specific circumstances. > If you're going to do this, you may have to change the size of the form > as well in the same code. > > Charlotte Foust > > -----Original Message----- > From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] > Sent: Thursday, July 01, 2004 4:10 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Create Control in Existing Form > > > thank you Charlotte, how can I move it ? > what would be a correct way to do something like this if i want to move > record txtA1 ? -- > > Private Sub Command9_Click() > txtA1.Top = 0.33 > txtA1.Visible = True > > End Sub > > >> You can create a new control in design view. Why would you want to >> create one in an active form anyhow? It would make more sense to >> simply make an existing textbox visible. >> >> Charlotte Foust >> >> -----Original Message----- >> From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com] >> Sent: Thursday, July 01, 2004 6:48 AM >> To: accessd at databaseadvisors.com >> Subject: Re: [AccessD] Create Control in Existing Form >> >> >> Is it possible to create control (textbox) in a form i am already in >> at runtime ? Everything i find on the web seems to be about creating >> new forms and new controls in them. >> >> >> ----------------------------------------- >> Make Money and Find Love at Finally.com >> http://www.finally.com/?link=webmail >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com > > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From stuart at lexacorp.com.pg Thu Jul 1 20:26:05 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 11:26:05 +1000 Subject: [AccessD] Create Control in Existing Form In-Reply-To: <2199.24.187.38.171.1088729553.squirrel@heck.xuppa.com> References: Message-ID: <40E5464D.11754.B26B859@lexacorp.com.pg> On 1 Jul 2004 at 20:52, Oleg_123 at xuppa.com wrote: > hmm, doesn't seem to be working, it bring it to uper left corner > > Private Sub Command9_Click() > txtA1.Top = 0.33 > txtA1.Left = 0.1667 > txtA1.Visible = True > End Sub > That's because the Top and Left properties in are in Twips if you set them in code. Multipy by 567 to convert cms to twips or by 1440 to convert form inches. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Thu Jul 1 20:42:00 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Fri, 2 Jul 2004 11:42:00 +1000 Subject: [AccessD] SQL ANDs Message-ID: <006d01c45fd5$c4c31ad0$0100000a@mitmaster> Hi Folks After much time trying to build a multilevel AND construct in the query using references to form txtBoxes, I have decided to use code to build the Form's Filter on the fly depending if a txtBox(s) in the AND series is populated. So far have had more success this way plus it will give me a filter unique to the Form selections to then build my report. Thanks all for the suggestions Martin > >Date: Thu, 1 Jul 2004 08:30:12 +1000 > >From: "Martin Caro" > >Subject: [AccessD] SQL ANDs > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Hi Folks > > > >I have a report query that has a WHERE followered by one or a number of > >ANDs. The components of the ANDs reference text boxes on a form each of > >which may or may not be populated. How can I get it to negate one or a > >number of the ANDs if the target box is Null? At the moment if any one of > >the AND components is Null no records are returned. I've played around > >with IIF to test each box first but no luck so far.... > > > >Thanks > > From accessd at shaw.ca Thu Jul 1 22:34:25 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 01 Jul 2004 20:34:25 -0700 Subject: [AccessD] SQL ANDs In-Reply-To: <006d01c45fd5$c4c31ad0$0100000a@mitmaster> Message-ID: There is something to be said for simply getting down to it and coding a solution. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Caro Sent: Thursday, July 01, 2004 6:42 PM To: Access Developers discussion and problem solving Subject: [AccessD] SQL ANDs Hi Folks After much time trying to build a multilevel AND construct in the query using references to form txtBoxes, I have decided to use code to build the Form's Filter on the fly depending if a txtBox(s) in the AND series is populated. So far have had more success this way plus it will give me a filter unique to the Form selections to then build my report. Thanks all for the suggestions Martin > >Date: Thu, 1 Jul 2004 08:30:12 +1000 > >From: "Martin Caro" > >Subject: [AccessD] SQL ANDs > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <002b01c45ef1$cf262790$0100000a at mitmaster> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Hi Folks > > > >I have a report query that has a WHERE followered by one or a number of > >ANDs. The components of the ANDs reference text boxes on a form each of > >which may or may not be populated. How can I get it to negate one or a > >number of the ANDs if the target box is Null? At the moment if any one of > >the AND components is Null no records are returned. I've played around > >with IIF to test each box first but no luck so far.... > > > >Thanks > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:11:51 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:11:51 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From stuart at lexacorp.com.pg Fri Jul 2 00:18:32 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 15:18:32 +1000 Subject: [AccessD] Quick Syntax Question In-Reply-To: Message-ID: <40E57CC8.9690.BFB871C@lexacorp.com.pg> On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:38:12 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:38:12 +1000 Subject: [AccessD] Syntax question Message-ID: Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 13:41:54 +0800 Subject: [AccessD] Quick Syntax Question Message-ID: Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From andrew.curtis at wapl.com.au Fri Jul 2 00:43:19 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 13:43:19 +0800 Subject: [AccessD] Syntax question Message-ID: In this case use count(*) instead of specify field name. andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:38 PM To: accessd at databaseadvisors.com Subject: [AccessD] Syntax question Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:46:09 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:46:09 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 00:54:02 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 15:54:02 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, I tried using count(*) but that did not work either. I am about to give up and go home I think ... except I know I will spend all weekend trying to figure it out In this case use count(*) instead of specify field name. andrew Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Fri Jul 2 01:11:37 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Fri, 2 Jul 2004 14:11:37 +0800 Subject: [AccessD] Quick Syntax Question Message-ID: This is going to sound far out, Try it without the "; " on the end andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Andrew, I tried using count(*) but that did not work either. I am about to give up and go home I think ... except I know I will spend all weekend trying to figure it out In this case use count(*) instead of specify field name. andrew Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis Andrew, yes it is an integer, I tried declaring as a long as well but still got the error. Curtis, Andrew (WAPL) andrew.curtis at wapl.com.au Fri Jul 2 00:41:54 CDT 2004 Is AuthorityID in tblDAuthorityConditionSpecific an integer field? WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " Is saying that it must be if renewed is an integer. Another possibility is that the integer variables should be declared as LONG instead. Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, 2 July 2004 1:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question -- Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 01:15:18 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 16:15:18 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Andrew, Nope ... but geez I wish it had worked Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This is going to sound far out, Try it without the "; " on the end andrew This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andy at minstersystems.co.uk Fri Jul 2 01:51:26 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 2 Jul 2004 07:51:26 +0100 Subject: [AccessD] Syntax question In-Reply-To: Message-ID: <001001c46000$febcf780$b274d0d5@minster33c3r25> Connie When you are storing the return from the COUNT wrap an NZ( ,0) round it. Can't be more specific as you haven't shown the full code. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: 02 July 2004 06:38 > To: accessd at databaseadvisors.com > Subject: [AccessD] Syntax question > > > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch > because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > > at 15:11, connie.kamrowski at agric.nsw.go wrote: > > > > > Hi guys, > > > > Am trying to code an SQL statement behind a form as follows > > > > RenewID = Me.AuthorityRenewalID.Value > > Specific = "COUNT([SpecificCondition])FROM > [tblDAuthorityConditionSpecific] > > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & > RenewID & > > "; " > > > > The variables have been declared as integers but I am > getting a type > > mismatch error on the second sentence, The value for RenewID is > > working > but > > it won't let me past this > > > The only thing I can spot is a missing space before "FROM" > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software > Development,System Support. > > > > > > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify > sender. Views > expressed are those of the individual sender and are not > necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From stuart at lexacorp.com.pg Fri Jul 2 01:50:59 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 02 Jul 2004 16:50:59 +1000 Subject: [AccessD] Syntax question In-Reply-To: Message-ID: <40E59273.25152.C502C6B@lexacorp.com.pg> On 2 Jul 2004 at 15:38, connie.kamrowski at agric.nsw.go wrote: > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > Force it to be an impossible number if it is Null. Try Where WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & NZ(RenewID,-1) & "; " -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From connie.kamrowski at agric.nsw.gov.au Fri Jul 2 01:59:00 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Fri, 2 Jul 2004 16:59:00 +1000 Subject: [AccessD] Quick Syntax Question Message-ID: Thanks Guys, No luck so far .. am leaving for home with Database on CD and the Access97 handbook under one arm ... wish me luck Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Connie When you are storing the return from the COUNT wrap an NZ( ,0) round it. Can't be more specific as you haven't shown the full code. -- Andy Lacey http://www.minstersystems.co.uk This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From paul.hartland at fsmail.net Fri Jul 2 03:56:39 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 10:56:39 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <3732317.1088758599155.JavaMail.www@wwinf3006> To all, Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a database on SQL Server 2005 Express Edition. Thanks in advance for any help on this. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Fri Jul 2 04:18:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 2 Jul 2004 11:18:53 +0200 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <3732317.1088758599155.JavaMail.www@wwinf3006> References: <3732317.1088758599155.JavaMail.www@wwinf3006> Message-ID: <5510525885.20040702111853@cactus.dk> Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland From paul.hartland at fsmail.net Fri Jul 2 04:24:27 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 11:24:27 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <27973902.1088760267820.JavaMail.www@wwinf3006> ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jimdettman at earthlink.net Fri Jul 2 07:29:41 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 2 Jul 2004 08:29:41 -0400 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <27973902.1088760267820.JavaMail.www@wwinf3006> Message-ID: Paul, <<.but there doesn't seem to be any management tools like Enterprise manager etc>> Right. That's one of the differences between the full SQL Server product and the Express versions (aka SQL Desktop, aka MSDE). You need to use SQL statements to create tables or something like Access which can act as a front end interface. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 5:24 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] SQL Server 2005 Express ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jul 2 07:34:22 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 2 Jul 2004 14:34:22 +0200 (CEST) Subject: [AccessD] SQL Server 2005 Express Message-ID: <1416153.1088771662719.JavaMail.www@wwinf3006> that's cool, no problem there. How would you create the database to put the tables in though ? Message date : Jul 02 2004, 01:31 PM >From : "Jim Dettman" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: Re: [AccessD] SQL Server 2005 Express Paul, <<.but there doesn't seem to be any management tools like Enterprise manager etc>> Right. That's one of the differences between the full SQL Server product and the Express versions (aka SQL Desktop, aka MSDE). You need to use SQL statements to create tables or something like Access which can act as a front end interface. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 5:24 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] SQL Server 2005 Express ha ha, that's what I thought as well.....but there doesn't seem to be any management tools like Enterprise manager etc Message date : Jul 02 2004, 10:21 AM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] SQL Server 2005 Express Hi Paul This is a product for hobbyists and students so at your level you are supposed to be able easily to figure this out. Hey, it's Friday! /gustav > Date: 2004-07-02 10:56 > To all, > Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I?m used to SQL Server 7.0 and can?t for the life of me see how to create a > database on SQL Server 2005 Express Edition. > Thanks in advance for any help on this. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From michael.broesdorf at web.de Fri Jul 2 07:50:09 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 14:50:09 +0200 Subject: [AccessD] #Deleted#-Problem (Cross-posted) In-Reply-To: <1416153.1088771662719.JavaMail.www@wwinf3006> Message-ID: Dear group, I have a problem with my Access2000-App. The Backend is SQL Server 2000 A bound form is linked to Table A. Table A has an insert-trigger, that creates a record in table B. Both tables have an ID-Field (A_ID and B_ID). Whenever I save a new record in the bound form, it either immediately displays #Deleted# in every field, or displays an old record(!). However, the new record is created correctly. There's a knowledgebase article, describing that problem. It states, that Access tries to re-select the new record using the ID value. It looks like that it is using the ID-value of table B instead that of table A to do the re-select. If it finds a record with that ID it displays that in the new row on the bound form. If it does not find it, the form displays #Deleted#. Is there any way to tell the trigger on table A not to return the ID of the new record in table B? Michael From michael.broesdorf at web.de Fri Jul 2 08:21:42 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 15:21:42 +0200 Subject: Update: [AccessD] #Deleted#-Problem (Cross-posted) In-Reply-To: Message-ID: Using SQL Profile I found that Access indeed uses 'SELECT @@IDENTITY' to get the ID of the newly inserted record. Unfortunately this will return the new ID-value from table B. Using Scope_Identity could solve the problem. Is there a way to tell Access or the ODBC-Driver to use Scope_Identity instead of @@INSERTED? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Michael Br?sdorf Gesendet: Freitag, 2. Juli 2004 14:50 An: Access Developers discussion and problem solving Betreff: [AccessD] #Deleted#-Problem (Cross-posted) Dear group, I have a problem with my Access2000-App. The Backend is SQL Server 2000 A bound form is linked to Table A. Table A has an insert-trigger, that creates a record in table B. Both tables have an ID-Field (A_ID and B_ID). Whenever I save a new record in the bound form, it either immediately displays #Deleted# in every field, or displays an old record(!). However, the new record is created correctly. There's a knowledgebase article, describing that problem. It states, that Access tries to re-select the new record using the ID value. It looks like that it is using the ID-value of table B instead that of table A to do the re-select. If it finds a record with that ID it displays that in the new row on the bound form. If it does not find it, the form displays #Deleted#. Is there any way to tell the trigger on table A not to return the ID of the new record in table B? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Fri Jul 2 08:27:24 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 06:27:24 -0700 Subject: [AccessD] Quick Syntax Question In-Reply-To: Message-ID: Hi Connie: Could this work... RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " AND NOT ISNULL([SpecificCondition]);" HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Thursday, July 01, 2004 10:12 PM To: accessd at databaseadvisors.com Subject: [AccessD] Quick Syntax Question Hi guys, Am trying to code an SQL statement behind a form as follows RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " The variables have been declared as integers but I am getting a type mismatch error on the second sentence, The value for RenewID is working but it won't let me past this any suggestions Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 2 09:05:40 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jul 2004 09:05:40 -0500 Subject: [AccessD] SQL Server 2005 Express Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Paul, just checked out what http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the features of SQL Server 2005 Express Edition. It doesn't list a database creation tool, to I guess they just forgot to add that. Wouldn't be the first time Microsoft has forgotten to add a necessary feature, or have goofed an existing one. Hey, I agree, it's Friday! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 02, 2004 3:57 AM To: accessd Subject: [AccessD] SQL Server 2005 Express To all, Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone know how to create a database on it, I'm used to SQL Server 7.0 and can't for the life of me see how to create a database on SQL Server 2005 Express Edition. Thanks in advance for any help on this. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 2 09:10:24 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 2 Jul 2004 09:10:24 -0500 Subject: [AccessD] Syntax question Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0AB@main2.marlow.com> I don't think Count can return as Null (because a zero count is zero). However, just out of curiousity, is that the EXACT SQL you are using? If so, you need a space before FROM, and I would recommend using Count([SpecificCondition]) As CountOfSpecificCondition, thought I don't think that is absolutely necessary. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Friday, July 02, 2004 12:38 AM To: accessd at databaseadvisors.com Subject: [AccessD] Syntax question Hi Stuart et al , I have come to the conclusion I am getting the type mismatch because the Count can sometimes be a null value. Is there A way to stop it from falling over when the count is null? On 2 Jul 2004 at 15:11, connie.kamrowski at agric.nsw.go wrote: > > Hi guys, > > Am trying to code an SQL statement behind a form as follows > > RenewID = Me.AuthorityRenewalID.Value > Specific = "COUNT([SpecificCondition])FROM [tblDAuthorityConditionSpecific] > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > The variables have been declared as integers but I am getting a type > mismatch error on the second sentence, The value for RenewID is working but > it won't let me past this > The only thing I can spot is a missing space before "FROM" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rl_stewart at highstream.net Fri Jul 2 09:19:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 02 Jul 2004 09:19:36 -0500 Subject: [AccessD] Re: Limitations of ADP/SQL In-Reply-To: <200407020611.i626BRQ01303@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040702091627.017e44a8@pop3.highstream.net> David, If it is the full version of SQL Server, then it is the limits of SQL Server, which is pretty much disk space. I think clustered servers for the database would be the next step up. The ADP is simply the front end to it and is limited by the number of objects that it can contain, which I think is in the thousands. And, the tables, views, stored procs, etc are not included in the limit since they reside on the server. Robert At 01:11 AM 02/07/2004 -0500, you wrote: >Date: Fri, 02 Jul 2004 05:29:03 +1200 >From: David Emerson >Subject: [AccessD] Limitations of ADP/SQL >To: accessd at databaseadvisors.com >Message-ID: <5.2.0.9.0.20040702052645.00b3e958 at mail.dalyn.co.nz> >Content-Type: text/plain; format=flowed; charset=us-ascii > >I have written an app for a company with an Access XP ADP F/E with an >SQL2000 BE. The company wants to know what the limitations are with this >set up (how many records/how large can the data base get) and what would be >the "next step up". > >Does anyone have any pointer for information? > >Regards > >David Emerson From rl_stewart at highstream.net Fri Jul 2 09:23:36 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Fri, 02 Jul 2004 09:23:36 -0500 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <200407020611.i626BRQ01303@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040702092054.01824ea8@pop3.highstream.net> Rocky, The constant is: acCmdDeleteRecord I have had trouble using the constant the way I do, so I just use the value 223. Use the object browser to see and find the others. Robert At 01:11 AM 02/07/2004 -0500, you wrote: >Date: Thu, 1 Jul 2004 11:48:20 -0700 >From: "Rocky Smolin - Beach Access Software" >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes >To: "Access Developers discussion and problem solving" > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> >Content-Type: text/plain; charset="iso-8859-1" > >Robert: > >What's the 223? Is there a vb constant that goes with that? Or is there a >place I can find out what the different codes are for >Application.RunCommand? > >Regards, > >Rocky Smolin From michael.broesdorf at web.de Fri Jul 2 09:29:47 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 2 Jul 2004 16:29:47 +0200 Subject: [AccessD] Unbound forms In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0AB@main2.marlow.com> Message-ID: Dear group, there was a lot of messages concerning bound forms vs. unbound forms every once in a while on the list - I don't want to get the discussion about pros and cons started again ;-)) My question is: is there any comprehensive resource on the web showing a proven design of unbound forms? (e.g. how to update records, how to identify/handle conflicts in multi user environments, error handling etc.) Michael From Stephen.Pickering at caremark.com Fri Jul 2 10:17:18 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Fri, 2 Jul 2004 10:17:18 -0500 Subject: [AccessD] SQL Server 2005 Express Message-ID: <35C4AC5A5AFD9642833200159C2581560A69B8@s98026.psd.caremark.int> Can you use it as a backend and create a database from an Access Data Project? Steve -----DWUTKA at marlow.com's Original Message----- Paul, just checked out what http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the features of SQL Server 2005 Express Edition. It doesn't list a database creation tool, to I guess they just forgot to add that. Wouldn't be the first time Microsoft has forgotten to add a necessary feature, or have goofed an existing one. Hey, I agree, it's Friday! Drew From djkr at msn.com Fri Jul 2 10:43:16 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Fri, 2 Jul 2004 16:43:16 +0100 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Message-ID: <000301c4604b$4aa88bb0$3500a8c0@dabsight> Maybe you're meant to use MSDE's database creation tool? John ;-) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > DWUTKA at marlow.com > Sent: 02 July 2004 15:06 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] SQL Server 2005 Express > > > Paul, just checked out what > http://lab.msdn.microsoft.com/express/sql/default.aspx which > has all of the features of SQL Server 2005 Express Edition. > It doesn't list a database creation tool, to I guess they > just forgot to add that. Wouldn't be the first time > Microsoft has forgotten to add a necessary feature, or have > goofed an existing one. Hey, I agree, it's Friday! > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > paul.hartland at fsmail.net > Sent: Friday, July 02, 2004 3:57 AM > To: accessd > Subject: [AccessD] SQL Server 2005 Express > > > To all, > > Has anyone downloaded the SQL Server 2005 Express Edition, if > so does anyone know how to create a database on it, I'm used > to SQL Server 7.0 and can't for the life of me see how to > create a database on SQL Server 2005 Express Edition. > > Thanks in advance for any help on this. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 2 11:04:51 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 2 Jul 2004 17:04:51 +0100 Subject: [AccessD] Syntax question Message-ID: <20040702160447.C2074255120@smtp.nildram.co.uk> Connie I'm sure someone could help but your actual code would make it easier, like the lines which use the SQL string in Specific, what you are trying to do with the result (and how), and what line is failing. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: RE: [AccessD] Syntax question Date: 02/07/04 14:13 > > I don't think Count can return as Null (because a zero count is zero). > However, just out of curiousity, is that the EXACT SQL you are using? If > so, you need a space before FROM, and I would recommend using > Count([SpecificCondition]) As CountOfSpecificCondition, thought I don't > think that is absolutely necessary. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: Friday, July 02, 2004 12:38 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] Syntax question > > > Hi Stuart et al , > > I have come to the conclusion I am getting the type mismatch because the > Count can sometimes be a null value. Is there A way to stop it from > falling over when the count is null? On 2 Jul 2004 > > at 15:11, connie.kamrowski at agric.nsw.go wrote: > > > > > Hi guys, > > > > Am trying to code an SQL statement behind a form as follows > > > > RenewID = Me.AuthorityRenewalID.Value > > Specific = "COUNT([SpecificCondition])FROM > [tblDAuthorityConditionSpecific] > > WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & "; " > > > > The variables have been declared as integers but I am getting a type > > mismatch error on the second sentence, The value for RenewID is working > but > > it won't let me past this > > > The only thing I can spot is a missing space before "FROM" > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > > > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From accessd at shaw.ca Fri Jul 2 12:26:44 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 10:26:44 -0700 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <000301c4604b$4aa88bb0$3500a8c0@dabsight> Message-ID: There is suppose to be a 'Express Manager' tool on it way from Microsoft but it is not ready for release yet. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DJK(John) Robinson Sent: Friday, July 02, 2004 8:43 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] SQL Server 2005 Express Maybe you're meant to use MSDE's database creation tool? John ;-) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > DWUTKA at marlow.com > Sent: 02 July 2004 15:06 > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] SQL Server 2005 Express > > > Paul, just checked out what > http://lab.msdn.microsoft.com/express/sql/default.aspx which > has all of the features of SQL Server 2005 Express Edition. > It doesn't list a database creation tool, to I guess they > just forgot to add that. Wouldn't be the first time > Microsoft has forgotten to add a necessary feature, or have > goofed an existing one. Hey, I agree, it's Friday! > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > paul.hartland at fsmail.net > Sent: Friday, July 02, 2004 3:57 AM > To: accessd > Subject: [AccessD] SQL Server 2005 Express > > > To all, > > Has anyone downloaded the SQL Server 2005 Express Edition, if > so does anyone know how to create a database on it, I'm used > to SQL Server 7.0 and can't for the life of me see how to > create a database on SQL Server 2005 Express Edition. > > Thanks in advance for any help on this. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Fri Jul 2 13:21:36 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 11:21:36 -0700 Subject: [AccessD] Unbound forms In-Reply-To: Message-ID: Hi Michael: In most cases, it is not necessary to use unbound records with MDBs. Unbound forms work much better with larger sequel DBs that have their own internal data management systems. (transaction logging and roll-back.) If you are using unbound forms you will have to manage the locking through the recordset(s) that actually access the data. The basic methodology is: 1. The specific record called should use the dynamic-link method. 2. Set the 'lock-record' property. 3. Monitoring the resultant error codes when accessing and especially when attempting to delete or updating. Take the appropriate action...(inform user, pause and retry, abandon, overwrite, write code to handle differences between the fields of the updated and current record(s) etc.) Time-stamping a record can be important in managing data conflicts, backup/archiving copies on mission-critical systems is another process worthy of consideration and transaction logging. (These can be good reasons for rolling-your-on unbound application.) If you decide to go this route and have a specific question, I can help you out. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 02, 2004 7:30 AM To: Access Developers discussion and problem solving Subject: [AccessD] Unbound forms Dear group, there was a lot of messages concerning bound forms vs. unbound forms every once in a while on the list - I don't want to get the discussion about pros and cons started again ;-)) My question is: is there any comprehensive resource on the web showing a proven design of unbound forms? (e.g. how to update records, how to identify/handle conflicts in multi user environments, error handling etc.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 2 14:37:07 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 2 Jul 2004 15:37:07 -0400 Subject: [AccessD] Big Modules v. Small Modules Message-ID: <002a01c4606b$f62084f0$6601a8c0@rock> I have heard and/or read that Access is smart enough to load only what it needs from any given module. This suggests that for multi-app reusable library code, you should just stuff it all into one huge module. OTOH, it will Access time to read said module and decide which components it needs in order to execute some specific chunk of code. (Once a module is loaded, it remains loaded and Access won't have to search again, as I understand the operations.) So, what is the prevailing experience and wisdom here? In my current project I have a dozen modules, each dedicated to a specific group of functionalities (for example, all the PDF support stuff resides in one, all the OutLook stuff in another, the API functions in another, etc.) Aside from the organizational benefits, am I gaining or losing anything with this approach? TIA, Arthur From bchacc at san.rr.com Fri Jul 2 20:32:46 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Fri, 2 Jul 2004 18:32:46 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes References: <5.1.0.14.2.20040702092054.01824ea8@pop3.highstream.net> Message-ID: <025501c4609d$a4fc32e0$6601a8c0@HAL9002> Robert: Well, it didn't work. I'm stumped. There's ways around it. I could execute a delete query. Or use DAO. But it makes me shaky about other differences between the two versions. Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Cc: Sent: Friday, July 02, 2004 7:23 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky, > > The constant is: acCmdDeleteRecord > > I have had trouble using the constant the way I do, so I just use the value > 223. > > Use the object browser to see and find the others. > > Robert > > At 01:11 AM 02/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 11:48:20 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Robert: > > > >What's the 223? Is there a vb constant that goes with that? Or is there a > >place I can find out what the different codes are for > >Application.RunCommand? > > > >Regards, > > > >Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From accessd at shaw.ca Fri Jul 2 23:18:27 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 02 Jul 2004 21:18:27 -0700 Subject: [AccessD] Re: A2K vs AXP on record deletes In-Reply-To: <025501c4609d$a4fc32e0$6601a8c0@HAL9002> Message-ID: Hi Rocky: My recommendation is to use sequel commands (queries..) where ever possible. I have had applications that have been migrated from A95 through to A2005 with little re-coding issues and I believe it is because I have always tried to avoid cmd functions where at all possible. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Friday, July 02, 2004 6:33 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: A2K vs AXP on record deletes Robert: Well, it didn't work. I'm stumped. There's ways around it. I could execute a delete query. Or use DAO. But it makes me shaky about other differences between the two versions. Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Robert L. Stewart" To: Cc: Sent: Friday, July 02, 2004 7:23 AM Subject: [AccessD] Re: A2K vs AXP on record deletes > Rocky, > > The constant is: acCmdDeleteRecord > > I have had trouble using the constant the way I do, so I just use the value > 223. > > Use the object browser to see and find the others. > > Robert > > At 01:11 AM 02/07/2004 -0500, you wrote: > >Date: Thu, 1 Jul 2004 11:48:20 -0700 > >From: "Rocky Smolin - Beach Access Software" > >Subject: Re: [AccessD] Re: A2K vs AXP on record deletes > >To: "Access Developers discussion and problem solving" > > > >Message-ID: <01fe01c45f9b$fb1d2f60$6601a8c0 at HAL9002> > >Content-Type: text/plain; charset="iso-8859-1" > > > >Robert: > > > >What's the 223? Is there a vb constant that goes with that? Or is there a > >place I can find out what the different codes are for > >Application.RunCommand? > > > >Regards, > > > >Rocky Smolin > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 3 02:15:03 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jul 2004 00:15:03 -0700 Subject: [AccessD] SQL Server 2005 Express References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> Message-ID: <40E65CF7.7070905@shaw.ca> Somewhere in the blurbs it says this feature is to be added in next few months. You might try this rather than messing around in OSQL can't guarantee it will work for everything http://www.asql.biz/DbaMgr.shtm DWUTKA at marlow.com wrote: >Paul, just checked out what >http://lab.msdn.microsoft.com/express/sql/default.aspx which has all of the >features of SQL Server 2005 Express Edition. It doesn't list a database >creation tool, to I guess they just forgot to add that. Wouldn't be the >first time Microsoft has forgotten to add a necessary feature, or have >goofed an existing one. Hey, I agree, it's Friday! > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >paul.hartland at fsmail.net >Sent: Friday, July 02, 2004 3:57 AM >To: accessd >Subject: [AccessD] SQL Server 2005 Express > > >To all, > >Has anyone downloaded the SQL Server 2005 Express Edition, if so does anyone >know how to create a database on it, I'm used to SQL Server 7.0 and can't >for the life of me see how to create a database on SQL Server 2005 Express >Edition. > >Thanks in advance for any help on this. > >Paul Hartland > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Sat Jul 3 02:51:02 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 03 Jul 2004 00:51:02 -0700 Subject: [AccessD] Unbound forms References: Message-ID: <40E66566.5040407@shaw.ca> You could try here under unbound sample mdb's http://www.rogersaccesslibrary.com/TableOfContents3.asp Michael Br?sdorf wrote: >Dear group, > >there was a lot of messages concerning bound forms vs. unbound forms every >once in a while on the list - I don't want to get the discussion about pros >and cons started again ;-)) > >My question is: is there any comprehensive resource on the web showing a >proven design of unbound forms? >(e.g. how to update records, how to identify/handle conflicts in multi user >environments, error handling etc.) > >Michael > > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sat Jul 3 05:26:14 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 12:26:14 +0200 Subject: [AccessD] Big Modules v. Small Modules In-Reply-To: <002a01c4606b$f62084f0$6601a8c0@rock> References: <002a01c4606b$f62084f0$6601a8c0@rock> Message-ID: <1131286910.20040703122614@cactus.dk> Hi Arthur This is not what I recall to have read, which is that by calling any function from a module the whole module is loaded. On the other hand, no module is read into memory until one of its functions is called. This should be one of the arguments for having multiple modules. Another is that a function can be declared Private within its module; that would be of no use, however, if a single mumbo module is used. A third argument is that by having multiple specialized modules you can easily reuse a module in another application. I - and I think most developers - do as you do. /gustav > I have heard and/or read that Access is smart enough to load only what > it needs from any given module. This suggests that for multi-app > reusable library code, you should just stuff it all into one huge > module. OTOH, it will Access time to read said module and decide which > components it needs in order to execute some specific chunk of code. > (Once a module is loaded, it remains loaded and Access won't have to > search again, as I understand the operations.) > So, what is the prevailing experience and wisdom here? In my current > project I have a dozen modules, each dedicated to a specific group of > functionalities (for example, all the PDF support stuff resides in one, > all the OutLook stuff in another, the API functions in another, etc.) > Aside from the organizational benefits, am I gaining or losing anything > with this approach? > TIA, > Arthur From andy at minstersystems.co.uk Sat Jul 3 06:44:56 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Sat, 3 Jul 2004 12:44:56 +0100 Subject: [AccessD] Big Modules v. Small Modules In-Reply-To: <1131286910.20040703122614@cactus.dk> Message-ID: <000201c460f3$29ca9c00$b274d0d5@minster33c3r25> I agree. Everything I've read says that Access loads all of a module once any sub or function within that module is required. So grouping functionally related code into a module has always seemed to me the way to go. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Gustav Brock > Sent: 03 July 2004 11:26 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Big Modules v. Small Modules > > > Hi Arthur > > This is not what I recall to have read, which is that by > calling any function from a module the whole module is loaded. > > On the other hand, no module is read into memory until one of > its functions is called. This should be one of the arguments > for having multiple modules. Another is that a function can > be declared Private within its module; that would be of no > use, however, if a single mumbo module is used. A third > argument is that by having multiple specialized modules you > can easily reuse a module in another application. > > I - and I think most developers - do as you do. > > /gustav > > > > I have heard and/or read that Access is smart enough to > load only what > > it needs from any given module. This suggests that for multi-app > > reusable library code, you should just stuff it all into one huge > > module. OTOH, it will Access time to read said module and > decide which > > components it needs in order to execute some specific chunk > of code. > > (Once a module is loaded, it remains loaded and Access > won't have to > > search again, as I understand the operations.) > > > So, what is the prevailing experience and wisdom here? In > my current > > project I have a dozen modules, each dedicated to a > specific group of > > functionalities (for example, all the PDF support stuff resides in > > one, all the OutLook stuff in another, the API functions in > another, > > etc.) Aside from the organizational benefits, am I gaining > or losing > > anything with this approach? > > > TIA, > > Arthur > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From gustav at cactus.dk Sat Jul 3 07:19:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 14:19:36 +0200 Subject: [AccessD] SQL Server 2005 Express In-Reply-To: <40E65CF7.7070905@shaw.ca> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> Message-ID: <1618088971.20040703141936@cactus.dk> Hi Marty I checked with Andrea if he will update the DbaMgr for SQL Server 2005 Express - but he is waiting to see this tool MS plans to ship. /gustav > Somewhere in the blurbs it says this feature is to be added in next few > months. > You might try this rather than messing around in OSQL > can't guarantee it will work for everything > http://www.asql.biz/DbaMgr.shtm From Oleg_123 at xuppa.com Sat Jul 3 13:37:23 2004 From: Oleg_123 at xuppa.com (Oleg_123 at xuppa.com) Date: Sat, 3 Jul 2004 14:37:23 -0400 (EDT) Subject: [AccessD] Frame question In-Reply-To: <1618088971.20040703141936@cactus.dk> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> Message-ID: <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> I have about 25 textboxes, which on a click on a button i want their context cleared, and half of them hidden is there a way to place them in 2 frames, and have all items inside 1 frame cleared, and 2nd frame hidden and cleared ? ----------------------------------------- Make Money and Find Love at Finally.com http://www.finally.com/?link=webmail From gustav at cactus.dk Sat Jul 3 13:56:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 3 Jul 2004 20:56:47 +0200 Subject: [AccessD] Frame question In-Reply-To: <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> Message-ID: <5331920459.20040703205647@cactus.dk> Hi Oleg > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden > is there a way to place them in 2 frames, and have all items inside 1 > frame cleared, and 2nd frame hidden and cleared ? Not that I know of, but you could let a rectangle cover the textboxes (bring it to front), then setting this rectangle's Visible property to True or False. /gustav From martyconnelly at shaw.ca Sun Jul 4 11:25:34 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 04 Jul 2004 09:25:34 -0700 Subject: [AccessD] SQL Server 2005 Express References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com> <40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> Message-ID: <40E82F7E.8070600@shaw.ca> There is also this freebie from BMC. SmartDBA Cockpit (2.0.01) You have to register the product once a year, I suppose that is to avoid old versions running around in the wild. Or more likely to have an uptodate customer list. It is supposed to manage SQL Server, Oracle and DB2 all at the same time. It is a Web enabled version. http://shop.bmc.com/product_moreinfo.cfm?id=2479&cpg=US00-1889GA Gustav Brock wrote: >Hi Marty > >I checked with Andrea if he will update the DbaMgr for SQL Server 2005 >Express - but he is waiting to see this tool MS plans to ship. > >/gustav > > > > >>Somewhere in the blurbs it says this feature is to be added in next few >>months. >>You might try this rather than messing around in OSQL >>can't guarantee it will work for everything >>http://www.asql.biz/DbaMgr.shtm >> >> > > > -- Marty Connelly Victoria, B.C. Canada From serbach at new.rr.com Sun Jul 4 17:53:27 2004 From: serbach at new.rr.com (serbach at new.rr.com) Date: Mon, 5 Jul 2004 00:53:27 +0200 Subject: [AccessD] Re: Re: Message Message-ID: <200407042301.i64N18Q29000@databaseadvisors.com> Please have a look at the attached file. From mike at welshfam.org Sun Jul 4 19:45:30 2004 From: mike at welshfam.org (Michael Welsh) Date: Sun, 4 Jul 2004 20:45:30 -0400 Subject: [AccessD] Frame question In-Reply-To: <5331920459.20040703205647@cactus.dk> Message-ID: <200407050045.i650jeQ00494@databaseadvisors.com> Oleg, I use a function that cycles thru the form controls. If the .tag property matches, the control is set to null (you could do anything to the control like set it to zero, as well). Call it NullTag("TagData") Public Sub NullTag( ByVal strTagData As String) As Boolean On Error GoTo Error_NullTag Dim ctrl As Control Dim frmForm As Form Set frmForm = Application.Screen.ActiveForm For gintReit = 0 To frmForm.Count - 1 Set ctrl = frmForm(gintReit) If InStr(1, ctrl.Tag, strTagData) Then ctrl = Null 'alter this line to set the control as needed End If Next gintReit I use a similar sub to make the control visible or invisible as needed. Call it in code ToggleControl "False", "TagData" to set all controls on the active form Visible = false if the tag data = "TagData". Use you own tagdata. Use True to make the controls visible. Public Sub ToggleControl( ByVal fSwitch As Boolean, ByVal strTagData As String) On Error GoTo Error_ToggleControl DoCmd.Hourglass True Dim ctrl As Control Dim frmMF As Form Set frmMF = Application.Screen.ActiveForm For gintReit = 0 To frmMF.Count - 1 Set ctrl = frmMF(gintReit) If ctrl.Tag = strTagData Then ctrl.Visible = fSwitch End If Next gintReit Hope this helps. Mike -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Saturday, July 03, 2004 2:57 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Frame question Hi Oleg > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden is there a way to place them > in 2 frames, and have all items inside 1 frame cleared, and 2nd frame > hidden and cleared ? Not that I know of, but you could let a rectangle cover the textboxes (bring it to front), then setting this rectangle's Visible property to True or False. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Sun Jul 4 19:51:19 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Mon, 5 Jul 2004 10:51:19 +1000 Subject: [AccessD] Re: Quick Syntax question Message-ID: Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From d.dick at uws.edu.au Sun Jul 4 20:04:45 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Mon, 5 Jul 2004 11:04:45 +1000 Subject: [AccessD] Frame question References: <2F8793082E00D4119A1700B0D0216BF8031BB0AA@main2.marlow.com><40E65CF7.7070905@shaw.ca> <1618088971.20040703141936@cactus.dk> <1094.24.187.38.171.1088879843.squirrel@heck.xuppa.com> Message-ID: <005101c4622c$108289d0$28669a89@DDICK> Hi Oleg I do stuff like this using the tag property of a control If a control can be cleared I give it a TAG property of say...1 if it can be invisible I give it a TAG property of 2 and if it can be both I give it a TAG property of 3 Then based on your circumstances of data entry run one of 3 code options eg to make invisible all the controls thatcan be be invisible try...ps_SetVisibles 1 or to clear all the controls that are allowed to be cleared try...ps_SetVisibles 2 or to clear and make invisible the controls you want cleared and invisible try ps_SetVisibles 3 eg Make a module on your form like this Private Sub ps_SetVisibles(intWhatValue As Integer) 'This code looks for all controls on a form that have a TAG that matches the 'intWhatValue passed to this sub then makes that control or controls visible or 'clears their contents or both Dim ctl As Control Select Case intWhatValue Case 1 For Each ctl In Me.Controls If ctl.Tag = 1 Then ctl.Visible = False End If Next Case 2 For Each ctl In Me.Controls If ctl.Tag = 2 Then ctl.Value = "" End If Next Case 3 For Each ctl In Me.Controls If ctl.Tag = 3 Then ctl.Visible = False ctl.Value = "" End If Next Case Else MsgBox "can only deal with values 1 2 or 3" End Select Hope this helps Darren ----- Original Message ----- From: To: Sent: Sunday, July 04, 2004 4:37 AM Subject: [AccessD] Frame question > I have about 25 textboxes, which on a click on a button i want their > context cleared, and half of them hidden > is there a way to place them in 2 frames, and have all items inside 1 > frame cleared, and 2nd frame hidden and cleared ? > > > > ----------------------------------------- > Make Money and Find Love at Finally.com > http://www.finally.com/?link=webmail > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andrew.curtis at wapl.com.au Sun Jul 4 20:09:38 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 09:09:38 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: Connie, Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" Read the lines above, you are in fact assigning the TEXT of the select to the variable "specific", you are not EXECUTING THE SQL at all, hence you get an error because the TEXT is not an integer. If you were executing the SQL, you would have: SQLtxt="SELECT COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" Db.execute SQLtext Then assign the RESULT to the "specific" variable. Any help? Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Monday, 5 July 2004 8:51 AM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From andrew.curtis at wapl.com.au Sun Jul 4 20:36:11 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 09:36:11 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: Additional to my last: Heres the solution, modify to suit your fields, this needs a reference to DAO. Dim sqltext, specific As Integer Dim db As dao.Database, rs As dao.Recordset Set db = CurrentDb() sqltext = "SELECT count([id]) as countMe FROM Table1;" Set rs = db.OpenRecordset(sqltext) specific = rs.Fields("countMe") rs.Close Set db = Nothing Andrew Curtis -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Monday, 5 July 2004 8:51 AM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From stuart at lexacorp.com.pg Sun Jul 4 20:56:40 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jul 2004 11:56:40 +1000 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: <40E941F8.14608.AD16881@lexacorp.com.pg> On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sun Jul 4 21:00:15 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 05 Jul 2004 12:00:15 +1000 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: <40E942CF.18278.AD4AF6F@lexacorp.com.pg> On 5 Jul 2004 at 10:51, connie.kamrowski at agric.nsw.go wrote: > > Specific = "COUNT([SpecificCondition]) FROM > [tblDAuthorityConditionSpecific] WHERE > [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" > You can do this with a simple DCOUNT: Specific = DCOUNT("SpecificCondition",tblDAuthorityConditionSpecific","AuthorityID = " & RenewID) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From andrew.curtis at wapl.com.au Sun Jul 4 21:28:04 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Mon, 5 Jul 2004 10:28:04 +0800 Subject: [AccessD] Re: Quick Syntax question Message-ID: At least you have the solution now! :) Andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Monday, 5 July 2004 10:00 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Re: Quick Syntax question On 5 Jul 2004 at 10:51, connie.kamrowski at agric.nsw.go wrote: > > Specific = "COUNT([SpecificCondition]) FROM > [tblDAuthorityConditionSpecific] WHERE > [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" > You can do this with a simple DCOUNT: Specific = DCOUNT("SpecificCondition",tblDAuthorityConditionSpecific","AuthorityID = " & RenewID) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From accessd at shaw.ca Mon Jul 5 00:10:32 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sun, 04 Jul 2004 22:10:32 -0700 Subject: [AccessD] Re: Quick Syntax question In-Reply-To: Message-ID: Hi Connie: IF ISNUMBER(RenewID) THEN RenewID = TRIM(STR(RenewID)) Specific = "COUNT(TACS.SpecificCondition) FROM tblDAuthorityConditionSpecific AS TACS WHERE NOT ISNULL(TACS.SpecificCondition) AND TACS.AuthorityID = " & RenewID & ";" I am not sure this would help but it will catch a couple of the obvious issues that have the potential to kill the above code. If the above line is really suppose to be a complete sequel statement then the following line would be more correct: Specific = "SELECT COUNT(TACS.SpecificCondition) FROM tblDAuthorityConditionSpecific AS TACS WHERE NOT ISNULL(TACS.SpecificCondition) AND TACS.AuthorityID = " & RenewID & ";" HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Sunday, July 04, 2004 5:51 PM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax question Ok guys here goes, I took over this database and am trying to finish teh work of a contractor who pulled out half way through, so I take no responsibility for structure. The database records animal details and I need to create an If statement on a sub report based on whether a specific condition is present ie. If Authority renewal ID is associated with a specific condition then show me the sub report, if no condition hide the sub report. The table which stores the specific condition contains 3 fields. AuthorityrenewalID(integer), SpecificConditionID (Autonumber) and specific condition(memo field). the problem being there can be more than one row associated with any one authorityrenewal and thus giving me multiple copies of the report based on a new subreport for each instance of that number in the table. So I need to count the rows associated with any given authority, store that as an integer variable and run my IF statement on the value of the variable. The syntax I provided before is being coded behind the main report in Access not in true SQL , it compiles Ok and I get no error messages on save but everytime I run the report I get a type mismatch error, hitting Debug I go straight to my Count. The types on the variables and the table fields match but the error keeps popping up. I get the msgbox for my RenewID and the value is correct but as soon as it hits the COUNT line crash All suggestions greatly appreciated. Code <------ Private Sub Report_Activate() Dim Specific As Integer Dim RenewID As Long RenewID = Me.AuthorityRenewalID.Value MsgBox RenewID RenewID = Me.AuthorityRenewalID.Value Specific = "COUNT([SpecificCondition]) FROM [tblDAuthorityConditionSpecific] WHERE [tblDAuthorityConditionSpecific].[AuthorityID] = " & RenewID & " ;" If Specific >= 1 Then Me.subreport4.Visible = True Else Me.subreport4.Visible = False End If MsgBox Specific End Sub ------> Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 5 04:02:55 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 5 Jul 2004 11:02:55 +0200 Subject: AW: [AccessD] Unbound forms In-Reply-To: <40E66566.5040407@shaw.ca> Message-ID: Thanks to all who responded - your help is a good starting point! Michael From michael.broesdorf at web.de Mon Jul 5 04:02:56 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 5 Jul 2004 11:02:56 +0200 Subject: [AccessD] Autonumber in SQL-Server In-Reply-To: <40E66566.5040407@shaw.ca> Message-ID: Hi, let's say I need an autonumber field in a table located on a SQL Sever 2000 but can't make it an ID-field. Using a trigger to fill in the value is no option either. Could I use a user defined function? Are there any know problem/limitations with that? Michael From Subscriptions at servicexp.com Mon Jul 5 15:14:34 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Mon, 5 Jul 2004 16:14:34 -0400 Subject: [AccessD] Auto-Update FE Over the Internet? In-Reply-To: Message-ID: Has anyone tried this? Robert Gracie www.servicexp.com From lists at jbsolutions.com.au Mon Jul 5 20:21:47 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 6 Jul 2004 11:21:47 +1000 Subject: [AccessD] Create Hyperlink Field in VBA Message-ID: <200407060121.i661LbQ13861@databaseadvisors.com> Hi Group Hoping someone can help me out here, I'm trying to create a Hyperlink Field in a table via VBA (Access 2K), the code looks like this... '=====================Begin Code Function addHyperlinkField(strDB as String) Dim db As DAO.Database Dim tbl As DAO.TableDef Dim newfld As DAO.Field Set db = OpenDatabase(strDB) Set tbl = db.TableDefs("tbl_Clients") Set newfld = tbl.CreateField("clnt_Website2", dbMemo, 233) tbl.Fields.Append newfld newfld.Attributes = dbHyperlinkField End Function '=====================End Code The code bombs out on the last line and gives me Error 3219 - "Invalid Operation". If anyone has any ideas, it would be most appreciated. Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-07-06 From lists at jbsolutions.com.au Mon Jul 5 21:08:40 2004 From: lists at jbsolutions.com.au (Joshua B) Date: Tue, 6 Jul 2004 12:08:40 +1000 Subject: [AccessD] Create Hyperlink Field in VBA Message-ID: <200407060208.i6628TQ14567@databaseadvisors.com> Nevermind, figured it out. I needed to set the attribute before appending... ======= At 2004-07-06, 11:21:00 I wrote: ======= >Hi Group > >Hoping someone can help me out here, I'm trying to create a Hyperlink Field in a table via VBA (Access 2K), the code looks like this... > >'=====================Begin Code >Function addHyperlinkField(strDB as String) > >Dim db As DAO.Database >Dim tbl As DAO.TableDef >Dim newfld As DAO.Field > > >Set db = OpenDatabase(strDB) > >Set tbl = db.TableDefs("tbl_Clients") >Set newfld = tbl.CreateField("clnt_Website2", dbMemo, 233) >tbl.Fields.Append newfld >newfld.Attributes = dbHyperlinkField > >End Function >'=====================End Code > >The code bombs out on the last line and gives me Error 3219 - "Invalid Operation". If anyone has any ideas, it would be most appreciated. = = = = = = = = = = = = = = = = = = = = Best regards. Joshua B lists at jbsolutions.com.au www.jbsolutions.com.au 2004-07-06 From martyconnelly at shaw.ca Mon Jul 5 21:10:05 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 05 Jul 2004 19:10:05 -0700 Subject: [AccessD] Auto-Update FE Over the Internet? References: Message-ID: <40EA09FD.1090508@shaw.ca> Well you can download the FrontEnd mdb via XMLHTTP, Inet or URLMON.DLL. Choose your poison. After that it is just manipulating as a disk file. Oh yes you can also use winHTTP object on Win98 and up This gives you finer control in a class http://www.mvps.org/emorcillo/vb6/inet/adl.shtml Download files asynchronously with URLMON.DLL or -------------- 3. Add a MS Inet control to the form (Inet1) 4. Add a textbox (Text1) 5. Set the textbox Text property to "http://images.ucomics.com/comics/ga/2003/ga030214.gif" 6. Add a command button (Command1) 7. In the Command1_Click event, add this code Dim strURL As String Dim bData() As Byte ' Data variable Dim intFile As Integer ' FreeFile variable Dim sFilename As String strURL = Text1.Text sFilename = "C:\Temp\" & Mid(Text1.Text, InStrRev(Text1.Text, "/") + 1) intFile = FreeFile() ' Set intFile to an unused file. ' The result of the OpenURL method goes into the Byte ' array, and the Byte array is then saved to disk. bData() = Inet1.OpenURL(strURL, icByteArray) Open sFilename For Binary Access Write As #intFile Put #intFile, , bData() Close #intFile or -------------- 'This code fires off request to specified WEB page 'returns html, asp, xml, or text page in text string then sent to file on disk 'Makes use of the XMLHTTPRequest object contained in msxml.dll. 'Check off Reference to MSXML Version 2.0 3.0 ' I am using latest Version of IE5 ' should also work with IE5.0 MSXML ver 2.0,2.6, 3.0 etc 'GrabTextFileFromWebSite "http://www5.brinkster.com/mconnelly/GenericDB/Excel Redshift.zip" Public Sub GrabTextFileFromWebSite(strMyURL As String) 'Dim oHttp As Object Dim oHttp As New MSXML2.XMLHTTP40 Dim strFileName As String Dim intfile As Integer Dim bData() As Byte 'make use of the XMLHTTPRequest object contained in msxml.dll ' Set oHttp = CreateObject("MSXML2.XMLHTTP40") 'Set oHttp = GetObject("MSXML2.XMLHTTP30") 'oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 'oHttp.setRequestHeader "Content-Type", "text/xml" 'oHttp.setRequestHeader "Content-Type", "multipart/form-data" oHttp.Open "GET", strMyURL, False ' stick in your web page above , file type can be anything asp txt xml html etc. 'depends partially on content type oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oHttp.send 'check the feedback Debug.Print "Ready State =" & oHttp.readyState 'normal state =4 Debug.Print "Status =" & oHttp.status 'normal status = 200 Debug.Print "Status Text =" & oHttp.statusText ' Debug.Print oHttp.getAllResponseHeaders() 'Debug.Print "Response Body =" & oHttp.responseBody ' Debug.Print "Response Body =" & StrConv(oHttp.responseBody, vbUnicode) 'Debug.Print "Response Text =" & oHttp.responseText 'Parse response text string here or send to file 'create directory structure if not in existance ' CreateDirectoryStruct ("c:\Accesshtmlstealer") strFileName = "c:\Accesshtmlstealer\Amazon" strFileName = strFileName & Format(Now, "yyyymmddhhmmss") & ".txt" ' WriteFile strFileName, oHttp.responseText 'Temporary storage intfile = FreeFile() ' The file will be saved in the temp folder with the name download.zip' Open "c:\temp\download.zip" For Binary Access Write As #intfile 'Put #intfile, , bData() bData() = oHttp.responseBody Put #intfile, , bData() Close #intfile ' Exit Sub ErrorHandler: MsgBox Err.Description & vbCrLf & Err.Number ' Resume Next End Sub Robert Gracie wrote: > Has anyone tried this? > > >Robert Gracie >www.servicexp.com > > > > -- Marty Connelly Victoria, B.C. Canada From connie.kamrowski at agric.nsw.gov.au Mon Jul 5 23:43:56 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Tue, 6 Jul 2004 14:43:56 +1000 Subject: [AccessD] Re: Quick Syntax Question - Solved Message-ID: Thanks guys , my sanity is saved. I used Andrews solution as it was the first I got. I haven't tried the rest but Andrews works fine. Regards Connie Kamrowski Message: 7 Date: Mon, 05 Jul 2004 11:56:40 +1000 From: "Stuart McLachlan" Subject: RE: [AccessD] Re: Quick Syntax question To: Access Developers discussion and problem solving Message-ID: <40E941F8.14608.AD16881 at lexacorp.com.pg> Content-Type: text/plain; charset=US-ASCII On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andrew.curtis at wapl.com.au Tue Jul 6 02:11:31 2004 From: andrew.curtis at wapl.com.au (Curtis, Andrew (WAPL)) Date: Tue, 6 Jul 2004 15:11:31 +0800 Subject: [AccessD] Re: Quick Syntax Question - Solved Message-ID: Connie, glad it helped. The other guys did have a valid solution as well with dcount. DCount is more friendly as there is no need for a DAO reference, however I was looking purely from SQL syntax perspective. If you never intend upsizing the app to SQL server or other database, Dcount is probably the easiest implementation. More of a personal preference thing really as the result is the goal and is achieved either way. Good luck with the rest of the app. Andrew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, 6 July 2004 12:44 PM To: accessd at databaseadvisors.com Subject: [AccessD] Re: Quick Syntax Question - Solved Thanks guys , my sanity is saved. I used Andrews solution as it was the first I got. I haven't tried the rest but Andrews works fine. Regards Connie Kamrowski Message: 7 Date: Mon, 05 Jul 2004 11:56:40 +1000 From: "Stuart McLachlan" Subject: RE: [AccessD] Re: Quick Syntax question To: Access Developers discussion and problem solving Message-ID: <40E941F8.14608.AD16881 at lexacorp.com.pg> Content-Type: text/plain; charset=US-ASCII On 5 Jul 2004 at 9:36, Curtis, Andrew (WAPL) wrote: > Additional to my last: > > Heres the solution, modify to suit your fields, this needs a reference > to DAO. > > Dim sqltext, specific As Integer > Dim db As dao.Database, rs As dao.Recordset > Set db = CurrentDb() > > sqltext = "SELECT count([id]) as countMe FROM Table1;" > Set rs = db.OpenRecordset(sqltext) > specific = rs.Fields("countMe") > rs.Close > Set db = Nothing > > Or more simply, just Dim Specific as Long Specific = DCOUNT("ID",Table1) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com CONFIDENTIAL COMMUNICATION If you receive this confidential communication by mistake, please contact the sender immediately by return electronic mail. Worsley Alumina Pty Ltd ABN 58 008 905 155 is the manager of the Worsley Joint Venture - Bauxite/Alumina Operation. Liability and responsibility of the Joint Venturers is several in accordance with the following schedule of participating interests: Billiton Aluminium (RAA) Pty Ltd 56 percent, Billiton Aluminium (Worsley) Pty Ltd 30 percent, Japan Alumina Associates (Australia) Pty Ltd 10 percent, Sojitz Alumina Pty Ltd 4 percent. From paul.hartland at fsmail.net Tue Jul 6 07:35:28 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 6 Jul 2004 14:35:28 +0200 (CEST) Subject: [AccessD] OT-Excel Show Decimal Places Only Message-ID: <18811147.1089117328414.JavaMail.www@wwinf3002> To all, I have some data in an Excel sheet (4.26, 3.04 etc) what I want in the column next to it is just the Decimal places part of the number (26, 04 etc). I'm sure that there is a way to do this but can't for the life of me think what it is. Paul -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Tue Jul 6 07:49:04 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 06 Jul 2004 22:49:04 +1000 Subject: [AccessD] OT-Excel Show Decimal Places Only In-Reply-To: <18811147.1089117328414.JavaMail.www@wwinf3002> Message-ID: <40EB2C60.26227.124D0F1F@lexacorp.com.pg> On 6 Jul 2004 at 14:35, paul.hartland at fsmail.net wrote: > To all, I have some data in an Excel sheet (4.26, 3.04 etc) what I want > in the column next to it is just the Decimal places part of the number > (26, 04 etc). I'm sure that there is a way to do this but can't for > the life of me think what it is. Paul > Assuming the number is in A1, in B1 put: (A1-Int(A1))*100 You will also need to format the cells as "Custom" with a Type of "00" to maintain the leading zeros. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From ppeters1 at cce.umn.edu Tue Jul 6 12:01:48 2004 From: ppeters1 at cce.umn.edu (Polly R Peterson) Date: Tue, 6 Jul 2004 12:01:48 -0500 Subject: [AccessD] How to stop Access from setting references Message-ID: > Problem Background > We develop Access applications for our users. We develop these > appliations as.ADP files and convert them to .ADE files before > deploying the application to our users. We currently develop in a > different MS Office environment than our users. Recently we > encountered some trouble with the DLL files. While in test, we > discovered that a user wasn't able to run our application without > error. The reason for this was that my pc had added an unnecessary > dll file to the application that our tester's pc didn't have. We > removed the reference and the application ran perfectly for her. We > continued to develop on that file, testing back and forth between > users without problem. When we went to launch the application, we > encountered the same problem-the dll reference had been automatically > added on my pc again. > > My question is how and when are dll references automatically added? > Is there a way for me to disable this function without manually > checking the references each time? > > Details > Developers: MS Office XP Developers, Microsoft Access 2002, we have > MS Front Page on our machines, users do not. > Users: MS Standard Office XP, Microsoft Access 2002 > > dll reference automatically being added: "Microsoft Office XP Web > Components" > (for an added twist, once I uncheck this reference, it disappears from > the reference list box and I can't even recheck it). > Thank You! Polly R. Peterson Office of Information Systems College of Continuing Education University of Minnesota, Twin Cities (t) 612.625.1578 (f) 612.625.2568 ppeters1 at cce.umn.edu From subs1847 at solution-providers.ie Tue Jul 6 15:06:31 2004 From: subs1847 at solution-providers.ie (Mark L. Breen) Date: Tue, 06 Jul 2004 20:06:31 -0000 Subject: [AccessD] VB.NET References: <1336268994.20040602113302@cactus.dk> Message-ID: <000001c46394$b802d700$0101a8c0@D8TZHN0J> Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something like > > Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 6 15:22:31 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jul 2004 13:22:31 -0700 Subject: [AccessD] VB.NET Message-ID: Yes, we are using the .Net version, although I'm not working with it myself. For the moment, I'm stuck in the Access world maintaining and upgrading our XP apps until we finish the model for the first .Net version. I don't have any idea on the upgrade but maybe someone else can help. Charlotte Foust -----Original Message----- From: Mark L. Breen [mailto:subs1847 at solution-providers.ie] Sent: Wednesday, June 02, 2004 3:24 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] VB.NET Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software > > [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something > > like Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 6 15:25:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 6 Jul 2004 13:25:34 -0700 Subject: [AccessD] How to stop Access from setting references Message-ID: We've run into something similar with MDBs. In MDBs, Access automatically adds the Web Components when you create a new database, perhaps to support the DAPs. If the reference breaks, it may NOT show up in the reference list, but you need to recompile the app to be sure it's gone. I had to actually remove the dll from my machine to be sure of finding and squashing all those references lurking in our apps. Charlotte Foust -----Original Message----- From: Polly R Peterson [mailto:ppeters1 at cce.umn.edu] Sent: Tuesday, July 06, 2004 9:02 AM To: AccessD at databaseadvisors.com Cc: Jerry Blixt Subject: [AccessD] How to stop Access from setting references > Problem Background > We develop Access applications for our users. We develop these > appliations as.ADP files and convert them to .ADE files before > deploying the application to our users. We currently develop in a > different MS Office environment than our users. Recently we > encountered some trouble with the DLL files. While in test, we > discovered that a user wasn't able to run our application without > error. The reason for this was that my pc had added an unnecessary > dll file to the application that our tester's pc didn't have. We > removed the reference and the application ran perfectly for her. We > continued to develop on that file, testing back and forth between > users without problem. When we went to launch the application, we > encountered the same problem-the dll reference had been automatically > added on my pc again. > > My question is how and when are dll references automatically added? Is > there a way for me to disable this function without manually checking > the references each time? > > Details > Developers: MS Office XP Developers, Microsoft Access 2002, we have > MS Front Page on our machines, users do not. > Users: MS Standard Office XP, Microsoft Access 2002 > > dll reference automatically being added: "Microsoft Office XP Web > Components" (for an added twist, once I uncheck this reference, it > disappears from the reference list box and I can't even recheck it). > Thank You! Polly R. Peterson Office of Information Systems College of Continuing Education University of Minnesota, Twin Cities (t) 612.625.1578 (f) 612.625.2568 ppeters1 at cce.umn.edu -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From hadyn at dataconcepts.co.nz Tue Jul 6 15:33:51 2004 From: hadyn at dataconcepts.co.nz (Hadyn Morgan) Date: Wed, 7 Jul 2004 08:33:51 +1200 Subject: [AccessD] VB.NET In-Reply-To: <000001c46394$b802d700$0101a8c0@D8TZHN0J> Message-ID: Hi Mark We evaluated ActiveReports for .NET and were happy with the results. The reason we purchased XtraReports from DevExpress instead is because of the licensing. You don't have to purchase another license to deploy a web app on a server. The other bonus is $100 cheaper and full source code supplied. Kind regards Hadyn -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark L. Breen Sent: Wednesday, 2 June 2004 23:24 To: Access Developers discussion and problem solving Subject: Re: [AccessD] VB.NET Hello Charlotte, I have used Active reports for a few years now and am very happy with them, one question, have you upgraded to the new .Net version? If so, what do you think of it. I have not upgraded yet, but am looking like I will have to, do you know whether you can get a version upgrade from the one I bought a few years ago? Thanks Mark ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Wednesday, June 02, 2004 10:33 AM Subject: Re: [AccessD] VB.NET > Good question Rocky! > > Charlotte, what is ActiveReports? > > /gustav > > > > Crystal or ActiveReports (we use the latter). There is also MS SQL > > Reports, although I'm not sure that is actually out yet. > > > Charlotte Foust > > > -----Original Message----- > > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > > Sent: Tuesday, June 01, 2004 11:48 AM > > To: Access Developers discussion and problem solving > > Subject: Re: [AccessD] VB.NET > > > > What reporting features are in vb.net? Or do you need something like > > Crystal to do reports? > > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dkalsow at yahoo.com Tue Jul 6 16:01:42 2004 From: dkalsow at yahoo.com (Dale Kalsow) Date: Tue, 6 Jul 2004 14:01:42 -0700 (PDT) Subject: [AccessD] Autonumber in queries In-Reply-To: Message-ID: <20040706210142.61768.qmail@web50402.mail.yahoo.com> Does any one know how to add a column in a query that is an autonumber column? Thanks! Dale --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From stuart at lexacorp.com.pg Tue Jul 6 16:42:52 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 07 Jul 2004 07:42:52 +1000 Subject: [AccessD] Autonumber in queries In-Reply-To: <20040706210142.61768.qmail@web50402.mail.yahoo.com> References: Message-ID: <40EBA97C.7002.1435C49E@lexacorp.com.pg> On 6 Jul 2004 at 14:01, Dale Kalsow wrote: > > Does any one know how to add a column in a query that is an autonumber column? > What sort of a query? Do you mean create an Autonumber field in a MakeTable query or just insert a sequential number column in a select query? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From martyconnelly at shaw.ca Tue Jul 6 17:56:57 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Tue, 06 Jul 2004 15:56:57 -0700 Subject: [AccessD] Unbound forms References: <40E66566.5040407@shaw.ca> Message-ID: <40EB2E39.1060103@shaw.ca> There are also simple unbound samples here for Access 2000 in the files area Just register NoMail if you don't want the mailing list. http://groups.yahoo.com/group/NYCAccessVB/files/ It is the NewYork City Access VB Group There is also the off spring .Net Developers group in NewYork http://www.nycdotnetdev.com/ They have general seminars usually twice a month. at Microsoft offices , 1290 Avenue of the Americas Worth a visit and a schmooze if you are in NewYork, you usually walk away with a full copy of Whidbey or something like that. You might even bump into Ken Getz or Stephen Forte. MartyConnelly wrote: > You could try here under unbound sample mdb's > http://www.rogersaccesslibrary.com/TableOfContents3.asp > > Michael Br?sdorf wrote: > >> Dear group, >> >> there was a lot of messages concerning bound forms vs. unbound forms >> every >> once in a while on the list - I don't want to get the discussion >> about pros >> and cons started again ;-)) >> >> My question is: is there any comprehensive resource on the web showing a >> proven design of unbound forms? >> (e.g. how to update records, how to identify/handle conflicts in >> multi user >> environments, error handling etc.) >> >> Michael >> >> >> > -- Marty Connelly Victoria, B.C. Canada From Subscriptions at servicexp.com Tue Jul 6 18:44:39 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Tue, 6 Jul 2004 19:44:39 -0400 Subject: [AccessD] Auto-Update FE Over the Internet? In-Reply-To: <40EA09FD.1090508@shaw.ca> Message-ID: Thank You Marty !! Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Monday, July 05, 2004 10:10 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Auto-Update FE Over the Internet? Well you can download the FrontEnd mdb via XMLHTTP, Inet or URLMON.DLL. Choose your poison. After that it is just manipulating as a disk file. Oh yes you can also use winHTTP object on Win98 and up This gives you finer control in a class http://www.mvps.org/emorcillo/vb6/inet/adl.shtml Download files asynchronously with URLMON.DLL or -------------- 3. Add a MS Inet control to the form (Inet1) 4. Add a textbox (Text1) 5. Set the textbox Text property to "http://images.ucomics.com/comics/ga/2003/ga030214.gif" 6. Add a command button (Command1) 7. In the Command1_Click event, add this code Dim strURL As String Dim bData() As Byte ' Data variable Dim intFile As Integer ' FreeFile variable Dim sFilename As String strURL = Text1.Text sFilename = "C:\Temp\" & Mid(Text1.Text, InStrRev(Text1.Text, "/") + 1) intFile = FreeFile() ' Set intFile to an unused file. ' The result of the OpenURL method goes into the Byte ' array, and the Byte array is then saved to disk. bData() = Inet1.OpenURL(strURL, icByteArray) Open sFilename For Binary Access Write As #intFile Put #intFile, , bData() Close #intFile or -------------- 'This code fires off request to specified WEB page 'returns html, asp, xml, or text page in text string then sent to file on disk 'Makes use of the XMLHTTPRequest object contained in msxml.dll. 'Check off Reference to MSXML Version 2.0 3.0 ' I am using latest Version of IE5 ' should also work with IE5.0 MSXML ver 2.0,2.6, 3.0 etc 'GrabTextFileFromWebSite "http://www5.brinkster.com/mconnelly/GenericDB/Excel Redshift.zip" Public Sub GrabTextFileFromWebSite(strMyURL As String) 'Dim oHttp As Object Dim oHttp As New MSXML2.XMLHTTP40 Dim strFileName As String Dim intfile As Integer Dim bData() As Byte 'make use of the XMLHTTPRequest object contained in msxml.dll ' Set oHttp = CreateObject("MSXML2.XMLHTTP40") 'Set oHttp = GetObject("MSXML2.XMLHTTP30") 'oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 'oHttp.setRequestHeader "Content-Type", "text/xml" 'oHttp.setRequestHeader "Content-Type", "multipart/form-data" oHttp.Open "GET", strMyURL, False ' stick in your web page above , file type can be anything asp txt xml html etc. 'depends partially on content type oHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oHttp.send 'check the feedback Debug.Print "Ready State =" & oHttp.readyState 'normal state =4 Debug.Print "Status =" & oHttp.status 'normal status = 200 Debug.Print "Status Text =" & oHttp.statusText ' Debug.Print oHttp.getAllResponseHeaders() 'Debug.Print "Response Body =" & oHttp.responseBody ' Debug.Print "Response Body =" & StrConv(oHttp.responseBody, vbUnicode) 'Debug.Print "Response Text =" & oHttp.responseText 'Parse response text string here or send to file 'create directory structure if not in existance ' CreateDirectoryStruct ("c:\Accesshtmlstealer") strFileName = "c:\Accesshtmlstealer\Amazon" strFileName = strFileName & Format(Now, "yyyymmddhhmmss") & ".txt" ' WriteFile strFileName, oHttp.responseText 'Temporary storage intfile = FreeFile() ' The file will be saved in the temp folder with the name download.zip' Open "c:\temp\download.zip" For Binary Access Write As #intfile 'Put #intfile, , bData() bData() = oHttp.responseBody Put #intfile, , bData() Close #intfile ' Exit Sub ErrorHandler: MsgBox Err.Description & vbCrLf & Err.Number ' Resume Next End Sub Robert Gracie wrote: > Has anyone tried this? > > >Robert Gracie >www.servicexp.com > > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jul 7 01:38:08 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 7 Jul 2004 07:38:08 +0100 Subject: [AccessD] Autonumber in queries In-Reply-To: <20040706210142.61768.qmail@web50402.mail.yahoo.com> Message-ID: <003b01c463ec$f7a2cd90$b274d0d5@minster33c3r25> Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > > Does any one know how to add a column in a query that is an > autonumber column? > > > > Thanks! > > > > Dale > > > > --------------------------------- > Do you Yahoo!? > New and Improved Yahoo! Mail - Send 10MB messages! > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From paul.hartland at fsmail.net Wed Jul 7 04:40:31 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 7 Jul 2004 11:40:31 +0200 (CEST) Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <15425661.1089193231392.JavaMail.www@wwinf3002> To all, Sorry for this but I am sure I have seen how to do this on one of the lists, but can't remember which one. I want to create a connection to Outlook via Access or Visual Basic, and write to a table every email address in my Outlook Global Address List. How can I go about doing this ? Thanks in advance. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Wed Jul 7 05:06:46 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 7 Jul 2004 12:06:46 +0200 Subject: [AccessD] OT-Outlook Email Addresses In-Reply-To: <15425661.1089193231392.JavaMail.www@wwinf3002> References: <15425661.1089193231392.JavaMail.www@wwinf3002> Message-ID: <5114345968.20040707120646@cactus.dk> Hi Paul You can link to that as a table - just pick Exchange() or Outlook() as tabletype in the dialog box where you choose which database to link to. /gustav > I want to create a connection to Outlook via Access or Visual Basic, > and write to a table every email address in my Outlook Global > Address List. > How can I go about doing this ? > Thanks in advance. > Paul Hartland From andy at minstersystems.co.uk Wed Jul 7 06:42:50 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 7 Jul 2004 12:42:50 +0100 Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <20040707114248.3564525420A@smtp.nildram.co.uk> Unless you're using Access 97, in which case I can probably dig out some code. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT-Outlook Email Addresses Date: 07/07/04 10:08 > > Hi Paul > > You can link to that as a table - just pick Exchange() or Outlook() as > tabletype in the dialog box where you choose which database to link > to. > > /gustav > > > > I want to create a connection to Outlook via Access or Visual Basic, > > and write to a table every email address in my Outlook Global > > Address List. > > How can I go about doing this ? > > > Thanks in advance. > > Paul Hartland > > -- > _______________________________________________ > 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 paul.hartland at fsmail.net Wed Jul 7 06:51:11 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Wed, 7 Jul 2004 13:51:11 +0200 (CEST) Subject: [AccessD] OT-Outlook Email Addresses Message-ID: <21913121.1089201071563.JavaMail.www@wwinf3002> Thanks, but using Office XP. Message date : Jul 07 2004, 12:48 PM >From : "Andy Lacey" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] OT-Outlook Email Addresses Unless you're using Access 97, in which case I can probably dig out some code. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT-Outlook Email Addresses Date: 07/07/04 10:08 > > Hi Paul > > You can link to that as a table - just pick Exchange() or Outlook() as > tabletype in the dialog box where you choose which database to link > to. > > /gustav > > > > I want to create a connection to Outlook via Access or Visual Basic, > > and write to a table every email address in my Outlook Global > > Address List. > > How can I go about doing this ? > > > Thanks in advance. > > Paul Hartland > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Wed Jul 7 08:11:21 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 09:11:21 -0400 Subject: [AccessD] Re: Re: Message Message-ID: <107660-22004737131121784@M2W096.mail2web.com> I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From Stephen.Pickering at caremark.com Wed Jul 7 09:07:17 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Wed, 7 Jul 2004 09:07:17 -0500 Subject: [AccessD] Re: Re: Message Message-ID: <35C4AC5A5AFD9642833200159C2581560A69C5@s98026.psd.caremark.int> Don't do it! I believe it is one of the viruses (virii) going around. If you do download it, scan it first! I have seen this message structure many times, but I forget which virus it is. I deleted it. Steve -----Rocky's Original Message----- I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From mwp.reid at qub.ac.uk Wed Jul 7 10:11:26 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: 07 Jul 2004 15:11:26 +0000 Subject: [AccessD] Pass Throughs Message-ID: I am setting up a system I created on my machine at home. I am currently in the USA. Access 2000 - SQL Server 2000. Is there away to automatically change the properties of all Pass Through Queries to reflect the local set up rather than doing it manually?? The server name is different but other than that all other areas are fine? I saved the properties locally at home. Rocky - see you on Sunday (<: Of course any other suggestions comments welcome. Martin From CMackin at Quiznos.com Wed Jul 7 10:43:44 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 09:43:44 -0600 Subject: [AccessD] Pass Throughs Message-ID: Martin, You should be able to loop through the query defs and update the .Connect property of all your Pass-Thru's Here's something I wrote to handle this in the past, you'll want to examine the current .Connect property and modify as needed. The code below can be used to set to the "new" settings and also used to convert back to production settings: Sub QDFUpdating(blnSetToNew As Boolean) Dim db As DAO.Database Dim qdf As DAO.QueryDef Dim strConnect As String If blnSetToNew Then strConnect = "ODBC;DSN=AFD_SQL;DATABASE=AFD;Trusted_Connection=Yes" Else strConnect = "ODBC;DSN=AFDStoreData;DATABASE=MFD;Trusted_Connection=Yes" End If Set db = CurrentDb For Each qdf In db.QueryDefs If Left(qdf.Connect, 4) = "ODBC" Then qdf.Connect = strConnect Next qdf Set qdf = Nothing Set db = Nothing End Sub -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 9:11 AM To: Access Developers discussion and problem solving Subject: [AccessD] Pass Throughs I am setting up a system I created on my machine at home. I am currently in the USA. Access 2000 - SQL Server 2000. Is there away to automatically change the properties of all Pass Through Queries to reflect the local set up rather than doing it manually?? The server name is different but other than that all other areas are fine? I saved the properties locally at home. Rocky - see you on Sunday (<: Of course any other suggestions comments welcome. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jarus at amerinet-gpo.com Wed Jul 7 11:54:09 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 11:54:09 -0500 Subject: [AccessD] AXP and Word Message-ID: I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From Developer at UltraDNT.com Wed Jul 7 12:48:10 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 7 Jul 2004 13:48:10 -0400 Subject: [AccessD] AXP and Word In-Reply-To: Message-ID: <001201c4644a$94c06210$6401a8c0@COA3> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 7 14:02:54 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 7 Jul 2004 13:02:54 -0600 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <322590-220047371925494@christopherhawkins.com> I am in a special hell called Goldmine. I managed to get roped into a Goldmine customization project and it's just...disgusting. I don't know if the things I'm being asked to do simply can't be done in Goldmine, or if I just don't know how to do them. I've been all over the built-in documentation, Goldmine for Dummies, and the hacker's Guide to Goldmine. I'm lost and I need help. Does anyone have any experience with Goldmine customizations? -C- From jarus at amerinet-gpo.com Wed Jul 7 14:29:08 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 14:29:08 -0500 Subject: [AccessD] AXP and Word Message-ID: That was way too easy. Thank you so much. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> Developer at ultradnt.com 07/07/04 12:48PM >>> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lister at actuarial-files.com Wed Jul 7 14:39:55 2004 From: lister at actuarial-files.com (Ralf Lister) Date: Wed, 7 Jul 2004 15:39:55 -0400 Subject: [AccessD] Report Message-ID: <000801c4645a$57e7f4b0$e5bc3ac8@ralf> Hello, I have a table with some data sets. I want to print a report only with the data from the last data set. How can I achieve this that the report is not from all the data sets, just from the last. Saludos de Bolivia Ralf From CMackin at Quiznos.com Wed Jul 7 14:51:59 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 13:51:59 -0600 Subject: [AccessD] AXP and Word Message-ID: One correction though on references. THey do NOT default to ADO, they default to the reference that is listed higher in the reference list. So if youhave your DAO reference above your ADO reference all your recordset objects default to DAO. Regardless, always Dim your objects with the DAO or ADO prefix if there's any chance of Access needing to decide for you which one it is. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 1:29 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] AXP and Word That was way too easy. Thank you so much. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> Developer at ultradnt.com 07/07/04 12:48PM >>> An unqualified Dim of a recordset will get you an ADO recordset, but the form's recordset is DAO, hence the type mismatch. Change: Dim rst As Recordset to: Dim rst As DAO.Recordset Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Terri Jarus Sent: Wednesday, July 07, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] AXP and Word I have set up Word Automation to create a really nice document that is created from pushing the button on a form. That, of course, creates the Word doc for the current record. Now I have a form that pulls back a select grouping of records based on a date and I want to send them to the same Word document. So I would have a continuous document moving through each record. I've tried Do...While, but I'm not getting it set up correctly. I get a type mismatch error on "Me.Recordset". Thanks for any help or suggestions. A sample of my code follows: Private Sub cmdAnnounce_Click() Dim objWord As Word.Application Dim filename As String Dim rst As Recordset Set rst = Me.Recordset Set objWord = New Word.Application filename = "U:\Suppliers\Reports\Contract Sales\EForm\ContInfoNEW\mktg_announce.dot" If Not (rst.BOF And rst.EOF) Then rst.MoveFirst Do With objWord On Error GoTo MsgInfo .Visible = True .Documents.Add _ Template:=filename, _ NewTemplate:=False .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="SupplierName" .Selection.TypeText _ Text:=SupplierPrintName .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="ContractNumber" .Selection.TypeText _ Text:=ContractNumber .Selection.GoTo _ What:=wdGoToBookmark, _ Name:="PDU" .Selection.TypeText _ Text:=Prog objWord.Selection.TypeParagraph objWord.Selection.MoveDown Unit:=wdLine .Quit End With rst.MoveNext Loop End If rst.Close Set objWord = Nothing MsgInfo: On Error Resume Next 'MsgBox "There is a required field missing information, please recheck your CDS data. Enter any required data into the Contract Info database." Exit Sub End Sub Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 ------------------------------------------------------------------------ --- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Wed Jul 7 15:11:04 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: 07 Jul 2004 20:11:04 +0000 Subject: [AccessD] Print Dialog Message-ID: Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin From jarus at amerinet-gpo.com Wed Jul 7 15:16:28 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Wed, 07 Jul 2004 15:16:28 -0500 Subject: [AccessD] AXP and Word Automation - Next Question Message-ID: Now my code works except I'm getting a new Word document for each record. I want to run the records continuously within one document. I had set up a Word template with bookmarks for each field - but they are only good for one record. How do I get the Word template set up so that it will repeat the bookmarks within the same document for the next record OR is that even a possibility? Thanks to anyone for suggestions. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From mikedorism at adelphia.net Wed Jul 7 16:07:35 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Wed, 7 Jul 2004 17:07:35 -0400 Subject: [AccessD] Print Dialog In-Reply-To: Message-ID: <000001c46466$6dceaec0$cc0aa845@hargrove.internal> Why not just add the standard Print button to your toolbar? Once you have it in there, you will be able to change the ToolTip. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 4:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Wed Jul 7 16:16:42 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Wed, 7 Jul 2004 15:16:42 -0600 Subject: [AccessD] Print Dialog Message-ID: Sure, If I understand you correctly, just set up a public sub like the following: Public Sub PrintIt docmd.RunCommand acCmdPrint End Sub Then in the Action properties of the toolbar object, set it to PrintIt, you can set the ToolTip and other properties as you see fit. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 2:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ 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 Jul 7 16:18:31 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 07:18:31 +1000 Subject: [AccessD] AXP and Word Automation - Next Question In-Reply-To: Message-ID: <40ECF547.9205.273D3E0@lexacorp.com.pg> On 7 Jul 2004 at 15:16, Terri Jarus wrote: > Now my code works except I'm getting a new Word document for each > record. Do you still have the Documents.Add in the same place as it was in the original code you posted? ie inside the DO..LOOP. If so, move it before the DO. > I want to run the records continuously within one document. I > had set up a Word template with bookmarks for each field - but they are > only good for one record. How do I get the Word template set up so that > it will repeat the bookmarks within the same document for the next > record OR is that even a possibility? > I'd guess that you need to create new bookmarks beyond the end of the current inserted content. How that will affect the formatting and you rtemplate is anyonees guess. Just as a matter of interest, why are you doing this rather than just creating a nicely formatted Access Report and outputting it as RTF? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From bchacc at san.rr.com Wed Jul 7 16:30:26 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 17:30:26 -0400 Subject: [AccessD] Re: Re: Message Message-ID: <130820-22004737213026503@M2W056.mail2web.com> Thanks for the heads up. Email is the only thing I'm really conservative about. Rocky Original Message: ----------------- From: Pickering, Stephen Stephen.Pickering at caremark.com Date: Wed, 07 Jul 2004 09:07:17 -0500 To: accessd at databaseadvisors.com Subject: RE: [AccessD] Re: Re: Message Don't do it! I believe it is one of the viruses (virii) going around. If you do download it, scan it first! I have seen this message structure many times, but I forget which virus it is. I deleted it. Steve -----Rocky's Original Message----- I can't get attachments where I am this week but I'll look at it when I get home. What's it all about? Rocky Original Message: ----------------- From: serbach at new.rr.com Date: Mon, 05 Jul 2004 00:53:27 +0200 To: accessd at databaseadvisors.com Subject: [AccessD] Re: Re: Message Please have a look at the attached file. -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From my.lists at verizon.net Wed Jul 7 16:38:26 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Wed, 07 Jul 2004 14:38:26 -0700 Subject: [AccessD] Multi Forms Message-ID: <40EC6D52.8040801@verizon.net> http://members.iinet.net.au/~allenbrowne/ser-35.html I'd like to make this code more re-useable but i seem to be stuck at this line I thought I'd be able to pass a variable and then just set the new object as a new "form" object. Is this not possible? Set frm = New Form_frmClient wasn't there a thread not too long ago about multiforms? -- -Francisco From DWUTKA at marlow.com Wed Jul 7 16:40:04 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 7 Jul 2004 16:40:04 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D0@main2.marlow.com> A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew From bchacc at san.rr.com Wed Jul 7 16:47:15 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Wed, 7 Jul 2004 17:47:15 -0400 Subject: [AccessD] Print Dialog Message-ID: <410-22004737214715335@M2W099.mail2web.com> Martin: Take a look at the custom toolbar I did for Br Tracks. Rocky -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid Sent: Wednesday, July 07, 2004 4:11 PM To: Access Developers discussion and problem solving Subject: [AccessD] Print Dialog Is it possible to add code to a toolbar button which opens the print dialog to allow me to set the print options for an Access report?? Is it also possible to change the tooltip for a for same toolbar. Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From ssharkins at bellsouth.net Wed Jul 7 17:41:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 7 Jul 2004 18:41:42 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> I'm using a Recordset to populate a list box. When I open the form, the CompanyName and CustomerID fields are transposed in the actual control -- anybody have any clue why? Susan H. Private Sub Form_Load() 'Use Recordset as list box control 'record source. Dim rst As ADODB.Recordset Dim lst As Access.ListBox Set rst = New ADODB.Recordset Set lst = lstPhone rst.Open "SELECT CustomerID, CompanyName, " & _ "Phone, Fax FROM Customers", CurrentProject.Connection, _ adOpenStatic, adLockPessimistic Set lst.Recordset = rst End Sub From cfoust at infostatsystems.com Wed Jul 7 18:00:15 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 7 Jul 2004 16:00:15 -0700 Subject: [AccessD] Multi Forms Message-ID: Are you trying to open multiple instances of the same form, or what? Charlotte Foust -----Original Message----- From: Francisco H Tapia [mailto:my.lists at verizon.net] Sent: Wednesday, July 07, 2004 1:38 PM To: AccessD Subject: [AccessD] Multi Forms http://members.iinet.net.au/~allenbrowne/ser-35.html I'd like to make this code more re-useable but i seem to be stuck at this line I thought I'd be able to pass a variable and then just set the new object as a new "form" object. Is this not possible? Set frm = New Form_frmClient wasn't there a thread not too long ago about multiforms? -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Wed Jul 7 18:37:32 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 7 Jul 2004 18:37:32 -0500 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D7@main2.marlow.com> What version? We have an older version of Goldmine (I think 5.0) and we are just now upgrading to a newer version. If you ask me, I would rather have my gums scraped, then work in goldmine! LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 07, 2004 2:03 PM To: accessd at databaseadvisors.com Subject: [AccessD] OT: Goldmine customization know-how, anyone? I am in a special hell called Goldmine. I managed to get roped into a Goldmine customization project and it's just...disgusting. I don't know if the things I'm being asked to do simply can't be done in Goldmine, or if I just don't know how to do them. I've been all over the built-in documentation, Goldmine for Dummies, and the hacker's Guide to Goldmine. I'm lost and I need help. Does anyone have any experience with Goldmine customizations? -C- -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 7 21:39:44 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 7 Jul 2004 20:39:44 -0600 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <148530-2200474823944132@christopherhawkins.com> Version 6.5. And I hear you on the gum-scraping thing. Although I must say, if I can overcome my pathological hatred for Goldmine, there might be some money in specializing in it. There seems to be quite a cottage industry built around customizing Goldmine. -C- ---- Original Message ---- From: DWUTKA at marlow.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Date: Wed, 7 Jul 2004 18:37:32 -0500 >What version? We have an older version of Goldmine (I think 5.0) >and we are >just now upgrading to a newer version. If you ask me, I would >rather have >my gums scraped, then work in goldmine! LOL. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, July 07, 2004 2:03 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > >I am in a special hell called Goldmine. I managed to get roped into >a Goldmine customization project and it's just...disgusting. I don't >know if the things I'm being asked to do simply can't be done in >Goldmine, or if I just don't know how to do them. > >I've been all over the built-in documentation, Goldmine for Dummies, >and the hacker's Guide to Goldmine. I'm lost and I need help. > >Does anyone have any experience with Goldmine customizations? > >-C- > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > From michael.mattys at adelphia.net Wed Jul 7 22:19:40 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Wed, 7 Jul 2004 23:19:40 -0400 Subject: [AccessD] OT: Goldmine customization know-how, anyone? References: <148530-2200474823944132@christopherhawkins.com> Message-ID: <00c301c4649a$698128f0$6401a8c0@default> I converted a DBCams database to Goldmine 5. What a pain! Try this site: http://support.frontrange.com/freesupport/gm_techdocs.asp ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Wednesday, July 07, 2004 10:39 PM Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? > Version 6.5. > > And I hear you on the gum-scraping thing. Although I must say, if I > can overcome my pathological hatred for Goldmine, there might be some > money in specializing in it. There seems to be quite a cottage > industry built around customizing Goldmine. > > -C- > > > > ---- Original Message ---- > From: DWUTKA at marlow.com > To: accessd at databaseadvisors.com, > Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? > Date: Wed, 7 Jul 2004 18:37:32 -0500 > > >What version? We have an older version of Goldmine (I think 5.0) > >and we are > >just now upgrading to a newer version. If you ask me, I would > >rather have > >my gums scraped, then work in goldmine! LOL. > > > >Drew > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > >Hawkins > >Sent: Wednesday, July 07, 2004 2:03 PM > >To: accessd at databaseadvisors.com > >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > > > > >I am in a special hell called Goldmine. I managed to get roped into > >a Goldmine customization project and it's just...disgusting. I don't > >know if the things I'm being asked to do simply can't be done in > >Goldmine, or if I just don't know how to do them. > > > >I've been all over the built-in documentation, Goldmine for Dummies, > >and the hacker's Guide to Goldmine. I'm lost and I need help. > > > >Does anyone have any experience with Goldmine customizations? > > > >-C- > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >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 Wed Jul 7 22:25:10 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 7 Jul 2004 22:25:10 -0500 Subject: [AccessD] Table Relationships Layout Changed? Message-ID: <000001c4649b$2d5a5620$de1811d8@danwaters> I opened this window in the BE to add a couple of relationships and discovered that all the tables were neatly laid out in a grid pattern. I want my 60 tables back the way they were. What caused the layout to change? Thanks, Dan Waters From dwaters at usinternet.com Wed Jul 7 22:37:51 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 7 Jul 2004 22:37:51 -0500 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <28507438.1089240661410.JavaMail.root@sniper6.usinternet.com> Message-ID: <000a01c4649c$f2707ab0$de1811d8@danwaters> Susan, I would look at the listbox properties. How many columns does it say should be there? Which column is bound? Do any columns have their width set to 0? Also, try creating a query to populate the listbox. See if that gives the same or different results. You're using CurrentProject.Connection. Is this an '02 or '03 mdb? Do any of your lst variables actually start with the number one (1)? They sure are close. Just stuff to look at . . . Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Wednesday, July 07, 2004 5:42 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Recordset object transposes field order I'm using a Recordset to populate a list box. When I open the form, the CompanyName and CustomerID fields are transposed in the actual control -- anybody have any clue why? Susan H. Private Sub Form_Load() 'Use Recordset as list box control 'record source. Dim rst As ADODB.Recordset Dim lst As Access.ListBox Set rst = New ADODB.Recordset Set lst = lstPhone rst.Open "SELECT CustomerID, CompanyName, " & _ "Phone, Fax FROM Customers", CurrentProject.Connection, _ adOpenStatic, adLockPessimistic Set lst.Recordset = rst End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Thu Jul 8 00:53:44 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 8 Jul 2004 15:53:44 +1000 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From andy at minstersystems.co.uk Thu Jul 8 02:16:19 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 8 Jul 2004 08:16:19 +0100 Subject: [AccessD] Table Relationships Layout Changed? In-Reply-To: <000001c4649b$2d5a5620$de1811d8@danwaters> Message-ID: <007001c464bb$77544590$b274d0d5@minster33c3r25> Dan Don't know if it's the same thing but in my system the relationship plan is as I left it if I open it in the BE but in a grid as you describe it if I open it in the FE (with all tables linked of course), Could this be what's happening? -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 08 July 2004 04:25 > To: Database Advisors > Subject: [AccessD] Table Relationships Layout Changed? > > > I opened this window in the BE to add a couple of > relationships and discovered that all the tables were neatly > laid out in a grid pattern. I want my 60 tables back the way > they were. > > > > What caused the layout to change? > > > > Thanks, > > Dan Waters > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From accessd667 at yahoo.com Thu Jul 8 02:21:25 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 00:21:25 -0700 (PDT) Subject: [AccessD] Query problem Message-ID: <20040708072125.16259.qmail@web61110.mail.yahoo.com> Hi group, i've got a query problem. I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: Filename Field2, Field3, Field4, etc... "Filename1", blabla, blabla, blabla, blabla, "Filename2", blabla, blabla, blabla, blabla, "Filename3", blabla, blabla, blabla, blabla, I need a query that displays: "Filename1", blabla, blabla, blabla, blabla, Problem: All other fields have diff info for all records!! Any idea how to solve this? TIA VS --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From michael.broesdorf at web.de Thu Jul 8 03:59:22 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 10:59:22 +0200 Subject: [AccessD] KeyCode overview In-Reply-To: <007001c464bb$77544590$b274d0d5@minster33c3r25> Message-ID: Dear group, somehow I am not able to get this working: I would like to trap for pressing certain keys on a specific control on my form. The KeyDown-Event gives me the keycode, but that keycode does not match the ASCII-code of the character. E.g. the keycode for the left arrow is 37, but this is the % in ASCII. Is there an overview over those keycodes somewhere? The Access Help only seems to have a list of keycode constants. What I am trying to do is this: Select case keycode case 32 to 126 'These should be all normal printable letters, digits and special characters (such as /{( etc.) 'Do something case else end select Michael From gustav at cactus.dk Thu Jul 8 04:01:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:01:41 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> References: <20040707224139.EBFP1776.imf18aec.mail.bellsouth.net@SUSANONE> Message-ID: <446724299.20040708110141@cactus.dk> Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav > I'm using a Recordset to populate a list box. When I open the form, the > CompanyName and CustomerID fields are transposed in the actual control -- > anybody have any clue why? > Susan H. > Private Sub Form_Load() > 'Use Recordset as list box control > 'record source. > Dim rst As ADODB.Recordset > Dim lst As Access.ListBox > Set rst = New ADODB.Recordset > Set lst = lstPhone > rst.Open "SELECT CustomerID, CompanyName, " & _ > "Phone, Fax FROM Customers", CurrentProject.Connection, _ > adOpenStatic, adLockPessimistic > Set lst.Recordset = rst > End Sub From gustav at cactus.dk Thu Jul 8 04:05:52 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:05:52 +0200 Subject: [AccessD] KeyCode overview In-Reply-To: References: Message-ID: <1746974669.20040708110552@cactus.dk> Hi Michael Why not move the key handling to KeyPress? That uses the ascii values. /gustav > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > What I am trying to do is this: > Select case keycode > case 32 to 126 'These should be all normal printable letters, digits and > special characters (such as /{( etc.) > 'Do something > case else > end select > Michael From gustav at cactus.dk Thu Jul 8 04:10:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 11:10:32 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708072125.16259.qmail@web61110.mail.yahoo.com> References: <20040708072125.16259.qmail@web61110.mail.yahoo.com> Message-ID: <517255422.20040708111032@cactus.dk> Hi S > i've got a query problem. > I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: > Filename Field2, Field3, Field4, etc... > "Filename1", blabla, blabla, blabla, blabla, > "Filename2", blabla, blabla, blabla, blabla, > "Filename3", blabla, blabla, blabla, blabla, > I need a query that displays: > "Filename1", blabla, blabla, blabla, blabla, > Problem: All other fields have diff info for all records!! Well Select * From tblSD Where Filename = 'Filename1'; will do that. But that's too obvious. What are you trying to do? /gustav From accessd667 at yahoo.com Thu Jul 8 04:25:49 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 02:25:49 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <517255422.20040708111032@cactus.dk> Message-ID: <20040708092549.84645.qmail@web61109.mail.yahoo.com> Thanx Gustav! That's exactly what I need! Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! :-) there's a little bit of sarcasme in the above :-) I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: Customer Aug 03.xls Customer Sept 03.xls Expens Aug 03.xls Expens Sept 03.xls etc etc I want the query to return: Customer Expens This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( HTH Gustav Brock wrote: Hi S > i've got a query problem. > I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: > Filename Field2, Field3, Field4, etc... > "Filename1", blabla, blabla, blabla, blabla, > "Filename2", blabla, blabla, blabla, blabla, > "Filename3", blabla, blabla, blabla, blabla, > I need a query that displays: > "Filename1", blabla, blabla, blabla, blabla, > Problem: All other fields have diff info for all records!! Well Select * From tblSD Where Filename = 'Filename1'; will do that. But that's too obvious. What are you trying to do? /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! From stuart at lexacorp.com.pg Thu Jul 8 04:30:10 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 19:30:10 +1000 Subject: [AccessD] KeyCode overview In-Reply-To: References: <007001c464bb$77544590$b274d0d5@minster33c3r25> Message-ID: <40EDA0C2.13849.511A67C@lexacorp.com.pg> On 8 Jul 2004 at 10:59, Michael Brosdorf wrote: > Dear group, > > somehow I am not able to get this working: > > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > > What I am trying to do is this: > >From A2K Help: Keycode Constants The following constants can be used anywhere in your code in place of the actual values: Constant Value Description vbKeyLButton 0x1 Left mouse button vbKeyRButton 0x2 Right mouse button vbKeyCancel 0x3 CANCEL key vbKeyMButton 0x4 Middle mouse button vbKeyBack 0x8 BACKSPACE key vbKeyTab 0x9 TAB key vbKeyClear 0xC CLEAR key vbKeyReturn 0xD ENTER key vbKeyShift 0x10 SHIFT key vbKeyControl 0x11 CTRL key vbKeyMenu 0x12 MENU key vbKeyPause 0x13 PAUSE key vbKeyCapital 0x14 CAPS LOCK key vbKeyEscape 0x1B ESC key vbKeySpace 0x20 SPACEBAR key vbKeyPageUp 0x21 PAGE UP key vbKeyPageDown 0x22 PAGE DOWN key vbKeyEnd 0x23 END key vbKeyHome 0x24 HOME key vbKeyLeft 0x25 LEFT ARROW key vbKeyUp 0x26 UP ARROW key vbKeyRight 0x27 RIGHT ARROW key vbKeyDown 0x28 DOWN ARROW key vbKeySelect 0x29 SELECT key vbKeyPrint 0x2A PRINT SCREEN key vbKeyExecute 0x2B EXECUTE key vbKeySnapshot 0x2C SNAPSHOT key vbKeyInsert 0x2D INSERT key vbKeyDelete 0x2E DELETE key vbKeyHelp 0x2F HELP key vbKeyNumlock 0x90 NUM LOCK key The A key through the Z key are the same as the ASCII equivalents A ? Z: Constant Value Description vbKeyA 65 A key vbKeyB 66 B key vbKeyC 67 C key vbKeyD 68 D key vbKeyE 69 E key vbKeyF 70 F key vbKeyG 71 G key vbKeyH 72 H key vbKeyI 73 I key vbKeyJ 74 J key vbKeyK 75 K key vbKeyL 76 L key vbKeyM 77 M key vbKeyN 78 N key vbKeyO 79 O key vbKeyP 80 P key vbKeyQ 81 Q key vbKeyR 82 R key vbKeyS 83 S key vbKeyT 84 T key vbKeyU 85 U key vbKeyV 86 V key vbKeyW 87 W key vbKeyX 88 X key vbKeyY 89 Y key vbKeyZ 90 Z key The 0 key through 9 key are the same as their ASCII equivalents 0 ? 9: Constant Value Description vbKey0 48 0 key vbKey1 49 1 key vbKey2 50 2 key vbKey3 51 3 key vbKey4 52 4 key vbKey5 53 5 key vbKey6 54 6 key vbKey7 55 7 key vbKey8 56 8 key vbKey9 57 9 key The following constants represent keys on the numeric keypad: Constant Value Description vbKeyNumpad0 0x60 0 key vbKeyNumpad1 0x61 1 key vbKeyNumpad2 0x62 2 key vbKeyNumpad3 0x63 3 key vbKeyNumpad4 0x64 4 key vbKeyNumpad5 0x65 5 key vbKeyNumpad6 0x66 6 key vbKeyNumpad7 0x67 7 key vbKeyNumpad8 0x68 8 key vbKeyNumpad9 0x69 9 key vbKeyMultiply 0x6A MULTIPLICATION SIGN (*) key vbKeyAdd 0x6B PLUS SIGN (+) key vbKeySeparator 0x6C ENTER key vbKeySubtract 0x6D MINUS SIGN (?) key vbKeyDecimal 0x6E DECIMAL POINT (.) key vbKeyDivide 0x6F DIVISION SIGN (/) key The following constants represent function keys: Constant Value Description vbKeyF1 0x70 F1 key vbKeyF2 0x71 F2 key vbKeyF3 0x72 F3 key vbKeyF4 0x73 F4 key vbKeyF5 0x74 F5 key vbKeyF6 0x75 F6 key vbKeyF7 0x76 F7 key vbKeyF8 0x77 F8 key vbKeyF9 0x78 F9 key vbKeyF10 0x79 F10 key vbKeyF11 0x7A F11 key vbKeyF12 0x7B F12 key vbKeyF13 0x7C F13 key vbKeyF14 0x7D F14 key vbKeyF15 0x7E F15 key vbKeyF16 0x7F F16 key -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Thu Jul 8 05:09:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 12:09:17 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708092549.84645.qmail@web61109.mail.yahoo.com> References: <20040708092549.84645.qmail@web61109.mail.yahoo.com> Message-ID: <7610779660.20040708120917@cactus.dk> Hi Sander Well, you need the first word of the filename. Try selecting on Select Distinct Left([Filename], IIf(InStr([Filename]," ")=0, Len([Filename]), InStr([Filename], " ")-1)) As File From tblFiles; /gustav > Thanx Gustav! That's exactly what I need! > Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! > :-) there's a little bit of sarcasme in the above :-) > I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: > Customer Aug 03.xls > Customer Sept 03.xls > Expens Aug 03.xls > Expens Sept 03.xls > etc etc > I want the query to return: > Customer > Expens > This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( > HTH > Gustav Brock wrote: > Hi S >> i've got a query problem. >> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >> Filename Field2, Field3, Field4, etc... >> "Filename1", blabla, blabla, blabla, blabla, >> "Filename2", blabla, blabla, blabla, blabla, >> "Filename3", blabla, blabla, blabla, blabla, >> I need a query that displays: >> "Filename1", blabla, blabla, blabla, blabla, >> Problem: All other fields have diff info for all records!! > Well > Select * From tblSD Where Filename = 'Filename1'; > will do that. > But that's too obvious. What are you trying to do? > /gustav From accessd667 at yahoo.com Thu Jul 8 05:41:06 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 03:41:06 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <7610779660.20040708120917@cactus.dk> Message-ID: <20040708104106.99742.qmail@web61101.mail.yahoo.com> No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) It gets the first word, true but it didn't solve the problem. As mentioned before there are a lot of other fields that need to be displayed... A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. I'll have another look at it. Thanx anyway. Sander Gustav Brock wrote: Hi Sander Well, you need the first word of the filename. Try selecting on Select Distinct Left([Filename], IIf(InStr([Filename]," ")=0, Len([Filename]), InStr([Filename], " ")-1)) As File From tblFiles; /gustav > Thanx Gustav! That's exactly what I need! > Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! > :-) there's a little bit of sarcasme in the above :-) > I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: > Customer Aug 03.xls > Customer Sept 03.xls > Expens Aug 03.xls > Expens Sept 03.xls > etc etc > I want the query to return: > Customer > Expens > This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( > HTH > Gustav Brock wrote: > Hi S >> i've got a query problem. >> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >> Filename Field2, Field3, Field4, etc... >> "Filename1", blabla, blabla, blabla, blabla, >> "Filename2", blabla, blabla, blabla, blabla, >> "Filename3", blabla, blabla, blabla, blabla, >> I need a query that displays: >> "Filename1", blabla, blabla, blabla, blabla, >> Problem: All other fields have diff info for all records!! > Well > Select * From tblSD Where Filename = 'Filename1'; > will do that. > But that's too obvious. What are you trying to do? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail Address AutoComplete - You start. We finish. From michael.broesdorf at web.de Thu Jul 8 05:53:42 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 12:53:42 +0200 Subject: AW: [AccessD] KeyCode overview In-Reply-To: <1746974669.20040708110552@cactus.dk> Message-ID: Gustav, because I need to respond to some special keys as well (navigation keys etc.) Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Gustav Brock Gesendet: Donnerstag, 8. Juli 2004 11:06 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] KeyCode overview Hi Michael Why not move the key handling to KeyPress? That uses the ascii values. /gustav > I would like to trap for pressing certain keys on a specific control on my > form. > The KeyDown-Event gives me the keycode, but that keycode does not match > the ASCII-code of the character. > E.g. the keycode for the left arrow is 37, but this is the % in ASCII. > Is there an overview over those keycodes somewhere? The Access Help only > seems to have a > list of keycode constants. > What I am trying to do is this: > Select case keycode > case 32 to 126 'These should be all normal printable letters, digits and > special characters (such as /{( etc.) > 'Do something > case else > end select > Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Thu Jul 8 05:53:42 2004 From: michael.broesdorf at web.de (=?US-ASCII?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 12:53:42 +0200 Subject: [AccessD] Grid-Controls In-Reply-To: <1746974669.20040708110552@cactus.dk> Message-ID: Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael From stuart at lexacorp.com.pg Thu Jul 8 06:18:18 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Thu, 08 Jul 2004 21:18:18 +1000 Subject: [AccessD] Query problem In-Reply-To: <20040708104106.99742.qmail@web61101.mail.yahoo.com> References: <7610779660.20040708120917@cactus.dk> Message-ID: <40EDBA1A.29359.574A5BF@lexacorp.com.pg> On 8 Jul 2004 at 3:41, S D wrote: > No that didn't do the trick. The problem is I do NOT know the values! > So it's not just the first word (filename could be: customer01.xls, > customer02.xls) It gets the first word, true but it didn't solve the > problem. As mentioned before there are a lot of other fields that need > to be displayed... A real nasty one. I've got some SQL-guru's over here > looking at the problem. They've came up with the most exotic > things..none of them worked. I'll have another look at it. Thanx anyway. > Sander > In that case, strip it out to the first not alpha character rather than to the first space. Function Rootname(filename as string) as string dim loopcount as long dim strTest as String strTest = "ABCDEFGHUJKLMNOPQRSTUVWXYZ" filename = ucase$(filename) For loopcount = 1 to len(filename) if instr(strTest, mid$(filename, loopcount,1)) = 0 then Rootname = left$(filename, loopcount -1) exit for next End Function Select Distinct Rootname((Filename) From tblFiles; -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Thu Jul 8 06:24:35 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 13:24:35 +0200 Subject: [AccessD] Query problem In-Reply-To: <20040708104106.99742.qmail@web61101.mail.yahoo.com> References: <20040708104106.99742.qmail@web61101.mail.yahoo.com> Message-ID: <2715298618.20040708132435@cactus.dk> Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav From jarus at amerinet-gpo.com Thu Jul 8 06:40:23 2004 From: jarus at amerinet-gpo.com (Terri Jarus) Date: Thu, 08 Jul 2004 06:40:23 -0500 Subject: [AccessD] AXP and Word Automation - Next Question Message-ID: I had already moved the Documents. Add before the Do and then I get each record repeated at each existing bookmark - for example, for the bookmark Name, if I have 5 records, that bookmark would have a list of the 5 names. I'm exporting to Word because I am using Total Access Memo fields (ActiveX) which don't page correctly within an Access report. That add-in is really nice except for outputting the formatted data. I'm just struggling for the best/easiest solution. I keep trying both an Access report or a Word doc - and I get hung up with different issues in each one. Thanks for the help. Terri Jarus Director, Contract Support Services jarus at amerinet-gpo.com 314-542-1902 >>> stuart at lexacorp.com.pg 07/07/04 04:18PM >>> On 7 Jul 2004 at 15:16, Terri Jarus wrote: > Now my code works except I'm getting a new Word document for each > record. Do you still have the Documents.Add in the same place as it was in the original code you posted? ie inside the DO..LOOP. If so, move it before the DO. > I want to run the records continuously within one document. I > had set up a Word template with bookmarks for each field - but they are > only good for one record. How do I get the Word template set up so that > it will repeat the bookmarks within the same document for the next > record OR is that even a possibility? > I'd guess that you need to create new bookmarks beyond the end of the current inserted content. How that will affect the formatting and you rtemplate is anyonees guess. Just as a matter of interest, why are you doing this rather than just creating a nicely formatted Access Report and outputting it as RTF? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------------------------------------------------- This email and any files transmitted with it are confidential and intended solely for the use of the individuals or entities to whom they are addressed. If you have received this email in error please return it to the sender, and erase any copies thereof. Copyright 2004 Amerinet 1nc. From dwaters at usinternet.com Thu Jul 8 07:13:12 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 8 Jul 2004 07:13:12 -0500 Subject: [AccessD] Table Relationships Layout Changed? In-Reply-To: <11688509.1089271400236.JavaMail.root@sniper2.usinternet.com> Message-ID: <000c01c464e4$f1365f50$de1811d8@danwaters> Ah Hah! I have opened the layout view in the FE so that's probably it. Thanks Andy! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Thursday, July 08, 2004 2:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Table Relationships Layout Changed? Dan Don't know if it's the same thing but in my system the relationship plan is as I left it if I open it in the BE but in a grid as you describe it if I open it in the FE (with all tables linked of course), Could this be what's happening? -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters > Sent: 08 July 2004 04:25 > To: Database Advisors > Subject: [AccessD] Table Relationships Layout Changed? > > > I opened this window in the BE to add a couple of > relationships and discovered that all the tables were neatly > laid out in a grid pattern. I want my 60 tables back the way > they were. > > > > What caused the layout to change? > > > > Thanks, > > Dan Waters > > > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd667 at yahoo.com Thu Jul 8 08:01:16 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:01:16 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <2715298618.20040708132435@cactus.dk> Message-ID: <20040708130116.68061.qmail@web61108.mail.yahoo.com> Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. From accessd667 at yahoo.com Thu Jul 8 08:08:14 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:08:14 -0700 (PDT) Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Message-ID: <20040708130814.52774.qmail@web61104.mail.yahoo.com> Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! From Mark.Mitsules at ngc.com Thu Jul 8 08:17:44 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 09:17:44 -0400 Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Message-ID: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 08:20:25 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:20:25 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <446724299.20040708110141@cactus.dk> Message-ID: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> Yes, this is correct -- why would that make this difference? Susan H. Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav From ssharkins at bellsouth.net Thu Jul 8 08:31:45 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:31:45 -0400 Subject: [AccessD] That SQL date catch again Message-ID: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. Susan H. From accessd667 at yahoo.com Thu Jul 8 08:37:52 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 06:37:52 -0700 (PDT) Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter for DoCmd.TransferText acImportDelim) In-Reply-To: Message-ID: <20040708133752.59023.qmail@web61104.mail.yahoo.com> Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From gustav at cactus.dk Thu Jul 8 08:39:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 15:39:26 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708132022.FXOJ1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <1372151333.20040708153926@cactus.dk> Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav > Yes, this is correct -- why would that make this difference? > Susan H. > Hi Susan > Sounds like the listbox's ColumnHeads are set to True. > /gustav From paul.hartland at fsmail.net Thu Jul 8 08:41:49 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 8 Jul 2004 15:41:49 +0200 (CEST) Subject: [AccessD] Recordset object transposes field order Message-ID: <4871853.1089294109545.JavaMail.www@wwinf3001> When column heads are set to true it displays the field names, if set to false then only displays the records Paul Message date : Jul 08 2004, 02:21 PM >From : "Susan Harkins" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] Recordset object transposes field order Yes, this is correct -- why would that make this difference? Susan H. Hi Susan Sounds like the listbox's ColumnHeads are set to True. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From ssharkins at bellsouth.net Thu Jul 8 08:42:30 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:42:30 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <1372151333.20040708153926@cactus.dk> Message-ID: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> Column Heads should simply display the column names in the first row -- not rearrange the columns. The SELECT statement retrieves Customary and Company Name -- in that order, but the list box displays Company Name first. That's what I meant by "transposed." Susan H. Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav From ssharkins at bellsouth.net Thu Jul 8 08:50:12 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:50:12 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <4871853.1089294109545.JavaMail.www@wwinf3001> Message-ID: <20040708135009.GUMX1779.imf22aec.mail.bellsouth.net@SUSANONE> Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul From gustav at cactus.dk Thu Jul 8 08:51:00 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 15:51:00 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708134227.GOKA1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <1312844960.20040708155100@cactus.dk> Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row -- not > rearrange the columns. The SELECT statement retrieves Customary and Company > Name -- in that order, but the list box displays Company Name first. That's > what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav From ssharkins at bellsouth.net Thu Jul 8 08:53:21 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 09:53:21 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <1312844960.20040708155100@cactus.dk> Message-ID: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ 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 Thu Jul 8 08:58:59 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 8 Jul 2004 14:58:59 +0100 Subject: [AccessD] Grid-Controls Message-ID: Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 09:04:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 16:04:36 +0200 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708135317.GXHZ1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <433660874.20040708160436@cactus.dk> Hi Susan Is it related to which column of the listbox you bind? /gustav > Ordinary SELECT Gustav -- > "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" > Simple as pie. > But remember, I'm populating the list box via the Recordset property - - and > that's what seems to mess it up -- so whether it's some peculiar behavior of > the Recordset object, the property, or the list box I can't tell. > Susan H. > Hi Susan > Oh, sorry, missed that point. > I have no idea - never observed that. > What does your Select statement look like? "Select * .." or "Select Company, > Customary .." > /gustav >> Column Heads should simply display the column names in the first row >> -- not rearrange the columns. The SELECT statement retrieves Customary >> and Company Name -- in that order, but the list box displays Company >> Name first. That's what I meant by "transposed." >> Susan H. >> Hi Susan >> Ehh ... That's by design ... >> What else would you suggest a property of this name should address? >> /gustav From ssharkins at bellsouth.net Thu Jul 8 09:15:46 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:15:46 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <433660874.20040708160436@cactus.dk> Message-ID: <20040708141543.YXNY1781.imf25aec.mail.bellsouth.net@SUSANONE> The bound column is the first column -- CustomerID, which of course, screws things up. However, I set those properties manually when I created the list box. I guess I could force th issue by setting them programmatically when I load the form and populate the control -- but still doesn't explain why it happens. :( Susan H. Is it related to which column of the listbox you bind? /gustav > Ordinary SELECT Gustav -- > "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" > Simple as pie. > But remember, I'm populating the list box via the Recordset property - > - and that's what seems to mess it up -- so whether it's some peculiar > behavior of the Recordset object, the property, or the list box I can't tell. > Susan H. > Hi Susan > Oh, sorry, missed that point. > I have no idea - never observed that. > What does your Select statement look like? "Select * .." or "Select > Company, Customary .." > /gustav >> Column Heads should simply display the column names in the first row >> -- not rearrange the columns. The SELECT statement retrieves >> Customary and Company Name -- in that order, but the list box >> displays Company Name first. That's what I meant by "transposed." >> Susan H. >> Hi Susan >> Ehh ... That's by design ... >> What else would you suggest a property of this name should address? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 8 09:17:26 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Thu, 8 Jul 2004 10:17:26 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <66830-22004748141726666@M2W094.mail2web.com> Susan: A workaround I'd use would be to loop thorugh the recordset seting the fields into a string in the order you want separated by semicolons and then set the row source of the list box to that string. I do combo boxes that way. Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:42:30 -0400 To: accessd at databaseadvisors.com Subject: RE: [AccessD] Recordset object transposes field order Column Heads should simply display the column names in the first row -- not rearrange the columns. The SELECT statement retrieves Customary and Company Name -- in that order, but the list box displays Company Name first. That's what I meant by "transposed." Susan H. Hi Susan Ehh ... That's by design ... What else would you suggest a property of this name should address? /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From bchacc at san.rr.com Thu Jul 8 09:23:24 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Thu, 8 Jul 2004 10:23:24 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <10450-22004748142324775@M2W039.mail2web.com> Susan: What would happen if you plugged your select statement in as the row source of the list box instead of going through recordset? Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:50:12 -0400 To: accessd at databaseadvisors.com Subject: RE: RE: [AccessD] Recordset object transposes field order Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From Jdemarco at hudsonhealthplan.org Thu Jul 8 09:36:55 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Thu, 8 Jul 2004 10:36:55 -0400 Subject: [AccessD] Recordset object transposes field order Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC06@TTNEXCHSRV1.hshhp.com> Susan, Out of curiousity have you tried looping through the recordset Fields collection and printing out the field names to see what order they appear within the record set? HTH, Jim DeMarco -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, July 08, 2004 9:53 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Recordset object transposes field order Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From accessd at shaw.ca Thu Jul 8 09:35:14 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 08 Jul 2004 07:35:14 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0D0@main2.marlow.com> Message-ID: Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 09:50:30 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:50:30 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F99030FEC06@TTNEXCHSRV1.hshhp.com> Message-ID: <20040708145030.SLQK1775.imf19aec.mail.bellsouth.net@SUSANONE> Yes, the Recordset object is fine and in the expected order. Susan H. Susan, Out of curiousity have you tried looping through the recordset Fields collection and printing out the field names to see what order they appear within the record set? HTH, Jim DeMarco -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Thursday, July 08, 2004 9:53 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Recordset object transposes field order Ordinary SELECT Gustav -- "SELECT CustomerID, CompanyName, Phone, Fax FROM Customers" Simple as pie. But remember, I'm populating the list box via the Recordset property - - and that's what seems to mess it up -- so whether it's some peculiar behavior of the Recordset object, the property, or the list box I can't tell. Susan H. Hi Susan Oh, sorry, missed that point. I have no idea - never observed that. What does your Select statement look like? "Select * .." or "Select Company, Customary .." /gustav > Column Heads should simply display the column names in the first row > -- not rearrange the columns. The SELECT statement retrieves Customary > and Company Name -- in that order, but the list box displays Company > Name first. That's what I meant by "transposed." > Susan H. > Hi Susan > Ehh ... That's by design ... > What else would you suggest a property of this name should address? > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 8 09:51:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:51:49 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <66830-22004748141726666@M2W094.mail2web.com> Message-ID: <20040708145146.SMIQ1775.imf19aec.mail.bellsouth.net@SUSANONE> This was an exercise in something else -- I specifically wanted to use the Recordset property. I'm not stuck, I'm just curious now -- is this a real bug or some wad that I just don't know about -- or have I done something wrong? Just curious now. Susan H. Susan: A workaround I'd use would be to loop thorugh the recordset seting the fields into a string in the order you want separated by semicolons and then set the row source of the list box to that string. I do combo boxes that way. From ssharkins at bellsouth.net Thu Jul 8 09:52:46 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 10:52:46 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: <10450-22004748142324775@M2W039.mail2web.com> Message-ID: <20040708145248.SMYM1775.imf19aec.mail.bellsouth.net@SUSANONE> The arrangement is correct and as expected. I haven't tested it with a combo or with other SELECT's yet -- I will when I have a bit of time. (Yeah... Right!) Susan H. Susan: What would happen if you plugged your select statement in as the row source of the list box instead of going through recordset? Rocky Original Message: ----------------- From: Susan Harkins ssharkins at bellsouth.net Date: Thu, 08 Jul 2004 09:50:12 -0400 To: accessd at databaseadvisors.com Subject: RE: RE: [AccessD] Recordset object transposes field order Right regarding Columm Heads, but that isn't the problem -- I think that discussion came about just through a misunderstanding of the problem. The list box is rearranging the columns. Specifically, it's transposing the first two columns. If I use a SELECT statement to populate the list box, the column order in the list box is correct. If I use a Recordset object via the Recordset property, the first two columns are flipflopped in the listbox. The Recordset itself is fine -- order is correct -- I checked it. The list box seems to do the flipping -- and Column Heads isn't involved. I just checked just to make sure and the order is wrong with Column Heads on or off. Susan H. When column heads are set to true it displays the field names, if set to false then only displays the records Paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Thu Jul 8 09:59:42 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Thu, 8 Jul 2004 16:59:42 +0200 Subject: AW: [AccessD] Grid-Controls In-Reply-To: Message-ID: Hi Richard, did you use the grid-in-grid-feature, where one grid is used as a combo box within another grid? I am having strange problems with this. Other then that, it works just fine! It can even be used as a bound control! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Griffiths, Richard Gesendet: Donnerstag, 8. Juli 2004 15:59 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Grid-Controls Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 8 10:10:04 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 11:10:04 -0400 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd .TransferText acImportDelim) Message-ID: While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ 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 Thu Jul 8 10:22:04 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 8 Jul 2004 16:22:04 +0100 Subject: [AccessD] Grid-Controls Message-ID: Hi Sorry, I have not used this functionality (what is the strange problem BTW) - the sample code that comes with it is usually a good reference point - also I have found their technical support via email quite good - in addition they have a user forum on their web site - may be worth posting a query there. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 16:00 To: Access Developers discussion and problem solving Subject: AW: [AccessD] Grid-Controls Hi Richard, did you use the grid-in-grid-feature, where one grid is used as a combo box within another grid? I am having strange problems with this. Other then that, it works just fine! It can even be used as a bound control! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Griffiths, Richard Gesendet: Donnerstag, 8. Juli 2004 15:59 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Grid-Controls Hi Michael I have used on Acc 97 and VB6. Both without any major problems (and few minor problems). Superb grid I think. Richard -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: 08 July 2004 11:54 To: Access Developers discussion and problem solving Subject: [AccessD] Grid-Controls Dear group, are there any experiences with the Janus GridEx-Control with Access 2000/2003? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 8 10:46:46 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jul 2004 10:46:46 -0500 Subject: [AccessD] OT: Goldmine customization know-how, anyone? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0D9@main2.marlow.com> I'd rather keep my sanity, then make money in that industry! LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 07, 2004 9:40 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Version 6.5. And I hear you on the gum-scraping thing. Although I must say, if I can overcome my pathological hatred for Goldmine, there might be some money in specializing in it. There seems to be quite a cottage industry built around customizing Goldmine. -C- ---- Original Message ---- From: DWUTKA at marlow.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] OT: Goldmine customization know-how, anyone? Date: Wed, 7 Jul 2004 18:37:32 -0500 >What version? We have an older version of Goldmine (I think 5.0) >and we are >just now upgrading to a newer version. If you ask me, I would >rather have >my gums scraped, then work in goldmine! LOL. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, July 07, 2004 2:03 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: Goldmine customization know-how, anyone? > > >I am in a special hell called Goldmine. I managed to get roped into >a Goldmine customization project and it's just...disgusting. I don't >know if the things I'm being asked to do simply can't be done in >Goldmine, or if I just don't know how to do them. > >I've been all over the built-in documentation, Goldmine for Dummies, >and the hacker's Guide to Goldmine. I'm lost and I need help. > >Does anyone have any experience with Goldmine customizations? > >-C- > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From joe.adair at lcbo.com Thu Jul 8 11:28:19 2004 From: joe.adair at lcbo.com (Adair, Joe) Date: Thu, 8 Jul 2004 12:28:19 -0400 Subject: [AccessD] Access and HTML Message-ID: You need to make your web pages a trusted site. It is easiest to just have everything on the Intranet server a trusted site. In Internet Explorer | Tools | Internet Options ... | Security | Trusted Sites | Trusted Sites | Sites ... | Uncheck "Require server verification (https:) for all sites in this zone." | In "Add this web site to the zone" enter http:// followed by the server name holding the .htm file | Add Note: if you want to use a drive letter in the address on your browser: For drive letter access, substitute http://ServerName, with file:DriveLetter: (EG: file:U:). You can have both http and drive letter access as trusted sites. From cfoust at infostatsystems.com Thu Jul 8 11:29:46 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:29:46 -0700 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Message-ID: Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Thu Jul 8 11:36:10 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:36:10 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: What openfilename command are you referring to? Show us the code. Charlotte Foust -----Original Message----- From: connie.kamrowski at agric.nsw.gov.au [mailto:connie.kamrowski at agric.nsw.gov.au] Sent: Wednesday, July 07, 2004 9:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From adtp at touchtelindia.net Thu Jul 8 11:35:17 2004 From: adtp at touchtelindia.net (A.D.Tejpal) Date: Thu, 8 Jul 2004 22:05:17 +0530 Subject: [AccessD] Autonumber in queries References: <003b01c463ec$f7a2cd90$b274d0d5@minster33c3r25> Message-ID: <002801c46509$b7dde460$081865cb@winxp> A word of caution! Incremental numbers based upon global variables are found to exhibit certain peculiarities when used in a query. Each navigational pass through such a calculated field, triggers a change in its value. If one experiments by moving up & down (keeping such a field selected), the displayed values keeps on increasing. The phenomenon is persistent, irrespective of the fact whether the select query is viewed directly or the results are displayed on a form using such a query as the record source. Under the circumstances, global variable approach is apparently best suited only to single pass action queries (e.g. append query), and NOT for display purposes (e.g. select query). Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 07, 2004 12:08 Subject: RE: [AccessD] Autonumber in queries Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > Does any one know how to add a column in a query that is an > autonumber column?> > > Thanks! > > Dale From martyconnelly at shaw.ca Thu Jul 8 11:41:21 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 08 Jul 2004 09:41:21 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 References: Message-ID: <40ED7931.6030102@shaw.ca> If you are just starting to work with VB.NET You can also download VS Net 2005 beta from here For Visual VB.net, C#, J#, C++, ASP.Net 2.0, WEBDev and SQL Server Express 2005 http://lab.msdn.microsoft.com/express/ Jim Lawrence (AccessD) wrote: >Hi Drew: > >Yes I do... Just send me that request off-line and I will send you an >address to the CD image. > >HTH >Jim > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >DWUTKA at marlow.com >Sent: Wednesday, July 07, 2004 2:40 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] VB.Net MSDN Disk 3 > > >A few weeks ago, someone posted a link that you could 'review' a few >training videos, and Microsoft would send you a free copy of VB.Net Standard >edition. (Sorry, don't remember who posted it....) > >I did that, and last week I got my installation CD's in the mail. >Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't >install the help files. Anyone have a copy of Disc 3? > >Drew >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > -- Marty Connelly Victoria, B.C. Canada From cfoust at infostatsystems.com Thu Jul 8 11:52:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 09:52:33 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: Aha, I just notice the difference in the subject and the body of your post. If you're talking about the API call, we use this and it works in A97 on XP: Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Thursday, July 08, 2004 8:36 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working What openfilename command are you referring to? Show us the code. Charlotte Foust -----Original Message----- From: connie.kamrowski at agric.nsw.gov.au [mailto:connie.kamrowski at agric.nsw.gov.au] Sent: Wednesday, July 07, 2004 9:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working I am having issues with an access97 database installed on XP. The openfilename command does not appear to be working in XP and is halting the import of records. It works fuine if I take it back to a 98 machine. Do I need to reference the dll differently? Is there a specific change I need to make to get the database to open the file dialogue in XP? thanks Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 8 12:00:56 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 8 Jul 2004 13:00:56 -0400 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd. TransferText acImportDelim) Message-ID: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 8 12:19:12 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 08 Jul 2004 10:19:12 -0700 Subject: [AccessD] Multi Forms In-Reply-To: References: Message-ID: <40ED8210.5070906@verizon.net> Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco From jwcolby at colbyconsulting.com Thu Jul 8 12:26:44 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 13:26:44 -0400 Subject: [AccessD] Autonumber in queries In-Reply-To: <002801c46509$b7dde460$081865cb@winxp> Message-ID: <001601c46510$bdbe1650$0501a8c0@colbyws> Yes, functions are called every time a record is displayed. I doubt that (though I haven't tested) just clicking into the record would cause the change, but paging up / down or otherwise causing records to redisplay definitely will cause the function to be called again, once for each record redisplayed. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of A.D.Tejpal Sent: Thursday, July 08, 2004 12:35 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Autonumber in queries A word of caution! Incremental numbers based upon global variables are found to exhibit certain peculiarities when used in a query. Each navigational pass through such a calculated field, triggers a change in its value. If one experiments by moving up & down (keeping such a field selected), the displayed values keeps on increasing. The phenomenon is persistent, irrespective of the fact whether the select query is viewed directly or the results are displayed on a form using such a query as the record source. Under the circumstances, global variable approach is apparently best suited only to single pass action queries (e.g. append query), and NOT for display purposes (e.g. select query). Regards, A.D.Tejpal -------------- ----- Original Message ----- From: Andy Lacey To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 07, 2004 12:08 Subject: RE: [AccessD] Autonumber in queries Hi Dale Create a module with this in: Global lngTableCounter As Long Function MyAutoCtr(prmAny) MyAutoCtr = lngTableCounter lngTableCounter = lngTableCounter + 1 End Function Before running the query set lngTableCounter =0 In Query make a column such as MyAutoCtr([anyfieldname]) As Counter You must pass a field from the input table(s) as in this example so that function called for each record otherwise Access thinks that the function will always return the same value and only calls it once and every output record gets the same value. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow > Sent: 06 July 2004 22:02 > To: accessd at databaseadvisors.com > Subject: [AccessD] Autonumber in queries > > > Does any one know how to add a column in a query that is an > autonumber column?> > > Thanks! > > Dale -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 12:28:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 19:28:22 +0200 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working In-Reply-To: References: Message-ID: <4610405662.20040708192822@cactus.dk> Hi Charlotte I'm having some problems with an old app and ComDlg32.ocx when the client purchases new machines with WinXP; thus I wish to switch to the dll. But isn't there a minor difference in the code to run on Win9x and the code to run un WinNT+? /gustav > Aha, I just notice the difference in the subject and the body of your > post. If you're talking about the API call, we use this and it works in > A97 on XP: > Declare Function GetOpenFileName Lib "comdlg32.dll" Alias > "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean > Charlotte Foust > -----Original Message----- > From: Charlotte Foust > Sent: Thursday, July 08, 2004 8:36 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working > What openfilename command are you referring to? Show us the code. > Charlotte Foust > -----Original Message----- > From: connie.kamrowski at agric.nsw.gov.au > [mailto:connie.kamrowski at agric.nsw.gov.au] > Sent: Wednesday, July 07, 2004 9:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working > I am having issues with an access97 database installed on XP. The > openfilename command does not appear to be working in XP and is halting > the import of records. It works fuine if I take it back to a 98 machine. > Do I need to reference the dll differently? > Is there a specific change I need to make to get the database to open > the file dialogue in XP? > thanks > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 8 13:24:29 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 14:24:29 -0400 Subject: [AccessD] Multi Forms In-Reply-To: <40ED8210.5070906@verizon.net> Message-ID: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Thu Jul 8 13:40:39 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 8 Jul 2004 14:40:39 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <027c01c4651b$10fc5070$6601a8c0@rock> Something else that you might want to look at is the query itself. I.e., you open the query, then transpose the fields, the query statement doesn't change, only the presentation does). Perhaps you did this accidentally at some point. Perhaps not, but it won't take long to check. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, July 08, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] That SQL date catch again I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 8 13:53:58 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 08 Jul 2004 11:53:58 -0700 Subject: [AccessD] Multi Forms In-Reply-To: <001d01c46518$cf3d2d50$0501a8c0@colbyws> References: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Message-ID: <40ED9846.6020507@verizon.net> awesome, i'll try it out and see how it works, (I was thinking of just using the same hWnd like the link I posted initially... I'll post back w/ my results :) jwcolby wrote On 7/8/2004 11:24 AM: >Actual working code. The key is that opening a form this way only keeps it >open as long as a pointer to the form remains in existence. Thus you have >to save the pointer in a collection to hold it open. The CLOSE of the form >MUST remove itself from the collection or the user will be able to close the >form but a pointer to it will remain, clogging up the works. > >I use a string in the caption as the key to the collection, thus the form >can look in it's caption to find the key to its pointer in the collection. > >Option Compare Database >Option Explicit > >Private colForms As Collection >Private blnFrmsInit As Boolean > >Function MyFormOpen(strFrmName As String, strInstanceName As String) >Dim frm As Form > > If blnFrmsInit = False Then > Set colForms = New Collection > blnFrmsInit = True > End If > Set frm = New Form_lfrmSpecialtyPreferences > frm.Caption = strInstanceName > colForms.Add frm, strInstanceName >End Function > >Function MyFormClose(strInstanceName As String) > colForms.Remove strInstanceName >End Function > >Hope this helps. > >John W. Colby >www.ColbyConsulting.com > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia >Sent: Thursday, July 08, 2004 1:19 PM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Multi Forms > > >Yup, but in my app, i'm going to have to open several instances of the >several forms, I don't want to write up this funciton for every one of >them... > >Charlotte Foust wrote On 7/7/2004 4:00 PM: > > > >>Are you trying to open multiple instances of the same form, or what? >> >>Charlotte Foust >> >>-----Original Message----- >>From: Francisco H Tapia [mailto:my.lists at verizon.net] >>Sent: Wednesday, July 07, 2004 1:38 PM >>To: AccessD >>Subject: [AccessD] Multi Forms >> >> >>http://members.iinet.net.au/~allenbrowne/ser-35.html >> >>I'd like to make this code more re-useable but i seem to be stuck at >>this line >> >>I thought I'd be able to pass a variable and then just set the new >>object as a new "form" object. Is this not possible? >> >> Set frm = New Form_frmClient >> >> >>wasn't there a thread not too long ago about multiforms? >> >> >> >> >> > > > > -- -Francisco From jwcolby at colbyconsulting.com Thu Jul 8 13:59:20 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 14:59:20 -0400 Subject: [AccessD] Multi Forms In-Reply-To: <001d01c46518$cf3d2d50$0501a8c0@colbyws> Message-ID: <001e01c4651d$ad2003f0$0501a8c0@colbyws> I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Thu Jul 8 14:05:50 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 8 Jul 2004 21:05:50 +0200 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> References: <20040708133142.GGDH1779.imf22aec.mail.bellsouth.net@SUSANONE> Message-ID: <13616254522.20040708210550@cactus.dk> Hi Susan > I've heard you guys discuss the SQL behavior that uses the US standard for > date strings, which causes non-US developers trouble if they don't know > about it. > My question is: > Is this a problem only when passing a date "string" or is the same true if > you pass a date data type. I would think SQL should be able to process a > date value passed by a date data type correctly. > I haven't tested anything -- looking for a place to start. The issue exists when building SQL in code inserting one or more parameters as date/time. I guess this is what you are thinking of. For handling fields of date/time type I have experienced no problems. /gustav From ssharkins at bellsouth.net Thu Jul 8 14:56:27 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 15:56:27 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <027c01c4651b$10fc5070$6601a8c0@rock> Message-ID: <20040708195625.IDUS1781.imf25aec.mail.bellsouth.net@SUSANONE> This is just one of those areas where I know the problem is what I'm asking and how I'm asking it and I can't figure out how to ask the problem correctly. :( Susan H. Something else that you might want to look at is the query itself. I.e., you open the query, then transpose the fields, the query statement doesn't change, only the presentation does). Perhaps you did this accidentally at some point. Perhaps not, but it won't take long to check. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Thursday, July 08, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] That SQL date catch again I've heard you guys discuss the SQL behavior that uses the US standard for date strings, which causes non-US developers trouble if they don't know about it. My question is: Is this a problem only when passing a date "string" or is the same true if you pass a date data type. I would think SQL should be able to process a date value passed by a date data type correctly. I haven't tested anything -- looking for a place to start. 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 ssharkins at bellsouth.net Thu Jul 8 14:58:12 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 15:58:12 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708195625.IDUS1781.imf25aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040708195809.IEZZ1781.imf25aec.mail.bellsouth.net@SUSANONE> Ask the problem... Barf... Susan H. This is just one of those areas where I know the problem is what I'm asking and how I'm asking it and I can't figure out how to ask the problem correctly. :( From ssharkins at bellsouth.net Thu Jul 8 15:15:59 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 8 Jul 2004 16:15:59 -0400 Subject: [AccessD] That SQL date catch again In-Reply-To: <13616254522.20040708210550@cactus.dk> Message-ID: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> The issue exists when building SQL in code inserting one or more parameters as date/time. I guess this is what you are thinking of. For handling fields of date/time type I have experienced no problems. ===============Yes, and I guess this gets me a tad closer. So, if I pass a date "string" via a SQL statement, I need to format it first. If I pass a date via a date data type, it should be OK. Is this correct? Susan H. From DWUTKA at marlow.com Thu Jul 8 15:24:43 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 8 Jul 2004 15:24:43 -0500 Subject: [AccessD] Query problem Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB0E8@main2.marlow.com> It would be easier to do this in code, then in just a query. Is that an option? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Thursday, July 08, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query problem Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jul 8 15:46:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 13:46:00 -0700 Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working Message-ID: Didn't 98 support the 32-bit API calls? In any case, the question was about 97 in WinXP, and what I posted definitely works there. Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Thursday, July 08, 2004 9:28 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access97 DB in WinXP -getOpenfileName not working Hi Charlotte I'm having some problems with an old app and ComDlg32.ocx when the client purchases new machines with WinXP; thus I wish to switch to the dll. But isn't there a minor difference in the code to run on Win9x and the code to run un WinNT+? /gustav > Aha, I just notice the difference in the subject and the body of your > post. If you're talking about the API call, we use this and it works > in A97 on XP: > Declare Function GetOpenFileName Lib "comdlg32.dll" Alias > "GetOpenFileNameA" (ofn As inf_OPENFILENAME) As Boolean > Charlotte Foust > -----Original Message----- > From: Charlotte Foust > Sent: Thursday, July 08, 2004 8:36 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Access97 DB in WinXP -getOpenfileName not working > What openfilename command are you referring to? Show us the code. > Charlotte Foust > -----Original Message----- > From: connie.kamrowski at agric.nsw.gov.au > [mailto:connie.kamrowski at agric.nsw.gov.au] > Sent: Wednesday, July 07, 2004 9:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Access97 DB in WinXP -getOpenfileName not working > I am having issues with an access97 database installed on XP. The > openfilename command does not appear to be working in XP and is halting > the import of records. It works fuine if I take it back to a 98 machine. > Do I need to reference the dll differently? > Is there a specific change I need to make to get the database to open > the file dialogue in XP? > thanks > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or > received it in error, please delete the message and notify sender. Views > expressed are those of the individual sender and are not necessarily the > views of their organisation. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 8 15:49:47 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 13:49:47 -0700 Subject: [AccessD] Multi Forms Message-ID: If you use Set objFrm = Form_MyFormName, you automatically open an instance of the form object. Charlotte Foust -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 08, 2004 10:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Thu Jul 8 15:56:14 2004 From: pedro at plex.nl (Pedro Janssen) Date: Thu, 8 Jul 2004 22:56:14 +0200 Subject: [AccessD] db1, 2, 3 ........ Message-ID: <004f01c4652e$23c65d00$fcc581d5@pedro> Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen From cfoust at infostatsystems.com Thu Jul 8 16:01:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: [AccessD] db1, 2, 3 ........ Message-ID: Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 8 16:24:21 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 8 Jul 2004 17:24:21 -0400 Subject: [AccessD] Multi Forms In-Reply-To: Message-ID: <001f01c46531$efd8c420$0501a8c0@colbyws> Yes, I know and used that in the code I provided. This is not the same as using the name of the form as shown in the form window however. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 08, 2004 4:50 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multi Forms If you use Set objFrm = Form_MyFormName, you automatically open an instance of the form object. Charlotte Foust -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 08, 2004 10:59 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms I have not figured out how to pass in the name of the form to open (that's what the strFrmName was about). I do know that the form_MyFormName actually refers to the MODULE behind the form (even if none exists I believe), but I do not know how to open that module directly by name (causing the form to open). These modules do not appear to be stored in the modules collection, and the form does not exist in the forms collection unless it is already open. If you open it first, you will always end up with a pointer to the same instance. Sigh. There is a syntax: CurrentDb.Containers!Forms.Documents(strFrmName) That allows you to get at the object as a document or an object. I used to be able to open a form in design view using this but I don't remember how. I think it was just opening one instance though, for the purpose of manipulating design view properties. At any rate, I do not have the answer as to how to pass in the name of the form and open it using the Set statement syntax. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby Sent: Thursday, July 08, 2004 2:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multi Forms Actual working code. The key is that opening a form this way only keeps it open as long as a pointer to the form remains in existence. Thus you have to save the pointer in a collection to hold it open. The CLOSE of the form MUST remove itself from the collection or the user will be able to close the form but a pointer to it will remain, clogging up the works. I use a string in the caption as the key to the collection, thus the form can look in it's caption to find the key to its pointer in the collection. Option Compare Database Option Explicit Private colForms As Collection Private blnFrmsInit As Boolean Function MyFormOpen(strFrmName As String, strInstanceName As String) Dim frm As Form If blnFrmsInit = False Then Set colForms = New Collection blnFrmsInit = True End If Set frm = New Form_lfrmSpecialtyPreferences frm.Caption = strInstanceName colForms.Add frm, strInstanceName End Function Function MyFormClose(strInstanceName As String) colForms.Remove strInstanceName End Function Hope this helps. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 08, 2004 1:19 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Multi Forms Yup, but in my app, i'm going to have to open several instances of the several forms, I don't want to write up this funciton for every one of them... Charlotte Foust wrote On 7/7/2004 4:00 PM: >Are you trying to open multiple instances of the same form, or what? > >Charlotte Foust > >-----Original Message----- >From: Francisco H Tapia [mailto:my.lists at verizon.net] >Sent: Wednesday, July 07, 2004 1:38 PM >To: AccessD >Subject: [AccessD] Multi Forms > > >http://members.iinet.net.au/~allenbrowne/ser-35.html > >I'd like to make this code more re-useable but i seem to be stuck at >this line > >I thought I'd be able to pass a variable and then just set the new >object as a new "form" object. Is this not possible? > > Set frm = New Form_frmClient > > >wasn't there a thread not too long ago about multiforms? > > > -- -Francisco -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jul 9 00:22:43 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Thu, 8 Jul 2004 23:22:43 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <308880-2200475952243512@christopherhawkins.com> It's been sooooo long since I did this. I'm looping through the fields in a tabledef object. What's the syntax to figure out if a field is the key field (or a key field)? -Christopher- From accessd667 at yahoo.com Fri Jul 9 01:43:37 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 23:43:37 -0700 (PDT) Subject: [AccessD] Query problem In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB0E8@main2.marlow.com> Message-ID: <20040709064337.13414.qmail@web61101.mail.yahoo.com> Yep, that's what I'm going to do. Thnx DWUTKA at marlow.com wrote: It would be easier to do this in code, then in just a query. Is that an option? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Thursday, July 08, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query problem Hi group, thnx for the replies but I feel i'm taking up you're time without getting any closer to the solution, perhaps I wasn't clear with describing the problem. To finish the discussion: I do not know how the filenames look like! So it could be that filenames are: customer01 customer02 but it could also be customera customerb or customer customer_backup1 customer_backup2 That's why we decided to (try to :-)) create a list that displayed records that filtered out the first 15 positions of the filename. I'm going to build a dumb app that puts all records in a table, create a new table with the first 15 chars of the filenames found in table 1. Then do some magic to get the first record in table1 where a 'key' was found in table2....or something haha my got this is going to be messy!! My advise: don't drink until 3:00 am and think you can work the next day :-) Again thnx! Sander Gustav Brock wrote: Hi Sander OK. But that what was it looked like from your sample data. Also, if you don't know what to look for, you're in trouble ... Anyway, my suggestion will give you less than 12.000 names. Next step could be to detract the numeric last part of the names. You can do that with Val(InstrRev()). What you also can do is to look up the left part of the filename: Select Distinct Left([Filename],[n]) As FileStart From YourTable If n=1, you'll probably get the alphabet; if n=40 you'll get all 12.000 records. Increment from 1 and you'll get an idea of the names. Write these selections to a temp table. /gustav > No that didn't do the trick. The problem is I do NOT know the values! So it's not just the first word (filename could be: customer01.xls, customer02.xls) > It gets the first word, true but it didn't solve the problem. > As mentioned before there are a lot of other fields that need to be displayed... > A real nasty one. I've got some SQL-guru's over here looking at the problem. They've came up with the most exotic things..none of them worked. > I'll have another look at it. > Thanx anyway. > Sander > Gustav Brock wrote: > Hi Sander > Well, you need the first word of the filename. > Try selecting on > Select Distinct > Left([Filename], > IIf(InStr([Filename]," ")=0, > Len([Filename]), > InStr([Filename], " ")-1)) As File > From > tblFiles; > /gustav >> Thanx Gustav! That's exactly what I need! >> Can you please provide me a query for the other 12.000(+) records? Oh, btw I do not know all filenames...yet! >> :-) there's a little bit of sarcasme in the above :-) >> I need to know which files where accessed during the last 7 days and I want to filter out 'period versioning'. So i've got a lot of files like: >> Customer Aug 03.xls >> Customer Sept 03.xls >> Expens Aug 03.xls >> Expens Sept 03.xls >> etc etc >> I want the query to return: >> Customer >> Expens >> This way I know how many Excel-apps we've got...remember the 12000 records? that wasn't sarcasme :-( >> HTH >> Gustav Brock wrote: >> Hi S >>> i've got a query problem. >>> I've got a table in A2k with 27 fields. The first field is "Filename". I've got the following data in the table: >>> Filename Field2, Field3, Field4, etc... >>> "Filename1", blabla, blabla, blabla, blabla, >>> "Filename2", blabla, blabla, blabla, blabla, >>> "Filename3", blabla, blabla, blabla, blabla, >>> I need a query that displays: >>> "Filename1", blabla, blabla, blabla, blabla, >>> Problem: All other fields have diff info for all records!! >> Well >> Select * From tblSD Where Filename = 'Filename1'; >> will do that. >> But that's too obvious. What are you trying to do? >> /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail Address AutoComplete - You start. We finish. From accessd667 at yahoo.com Fri Jul 9 01:50:26 2004 From: accessd667 at yahoo.com (S D) Date: Thu, 8 Jul 2004 23:50:26 -0700 (PDT) Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd. TransferText acImportDelim) In-Reply-To: Message-ID: <20040709065026.18953.qmail@web61105.mail.yahoo.com> Mark, Charlotte, thnx, but I cannot find this 'option' and 'import/export specs' thingy. Where did MS put this? Is it in A2K? Sander "Mitsules, Mark S. (Newport News)" wrote: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! From gustav at cactus.dk Fri Jul 9 01:43:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 9 Jul 2004 08:43:26 +0200 Subject: [AccessD] That SQL date catch again In-Reply-To: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> References: <20040708201557.OWCR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: <611162882.20040709084326@cactus.dk> Hi Susan Yes. /gustav > The issue exists when building SQL in code inserting one or more parameters > as date/time. I guess this is what you are thinking of. > For handling fields of date/time type I have experienced no problems. > ===============Yes, and I guess this gets me a tad closer. So, if I pass a > date "string" via a SQL statement, I need to format it first. If I pass a > date via a date data type, it should be OK. Is this correct? > Susan H. From pedro at plex.nl Fri Jul 9 09:20:38 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Fri, 09 Jul 2004 09:20:38 (MET DST) Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <200407090720.i697Kc9l013829@mailhostC.plex.net> Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen From paul.hartland at fsmail.net Fri Jul 9 03:56:21 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 9 Jul 2004 10:56:21 +0200 (CEST) Subject: [AccessD] OT-Installing SQL Server 7.0 Message-ID: <32565368.1089363381429.JavaMail.www@wwinf3002> To all, I have a development server on which I used to run SQL Server 7.0 the server has Windows 2000 on it and was recently re-installed. I re-installed SQL Server 7.0 and now can?t connect to it. I?m sure I have installed as I have done before but must be missing something. Has anyone any ideas what it could be, or a site which can guide me through the whole setup process again. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jmoss111 at bellsouth.net Fri Jul 9 04:15:04 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Fri, 9 Jul 2004 04:15:04 -0500 Subject: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) In-Reply-To: <20040709065026.18953.qmail@web61105.mail.yahoo.com> Message-ID: Sander, >From the database where you are importing the import specs, click on File|Get External Data|Import| the file select dialog will pop up, select you file, which will open Import Objects window. Click Options >> button at bottom right, and the Import/Export Specs checkboix in the Import Group, and anything else that you care to import, and OK. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of S D Sent: Friday, July 09, 2004 1:50 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Mark, Charlotte, thnx, but I cannot find this 'option' and 'import/export specs' thingy. Where did MS put this? Is it in A2K? Sander "Mitsules, Mark S. (Newport News)" wrote: Basically, when the question was asked, I just had a flashback that it required importing a couple of system tables. I had to actually look to get the correct table names. Perhaps my recollection pertained to an earlier version of Access...before that option existed? Thanks for the update though... Mark -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Thursday, July 08, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiterforDoCmd.TransferText acImportDelim) Why import the tables? You can do an import from the database, click on options, and then select import/export specs. Charlotte Foust -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Thursday, July 08, 2004 7:10 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) While in your target database, try importing the system tables MSysImexSpecs and MSysImexColumns from your development database. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:38 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Migrate "Import specs" (Was: Set delimiter forDoCmd.TransferText acImportDelim) Thnx Mark! That did the trick. Any idea if it's possible to distribute these "import specifications"? So if I create these in my development database is it possible to migrate them to TEST, Acceptance and finally Production?! TIA Sander "Mitsules, Mark S. (Newport News)" wrote: Sander, When doing repetitive automated imports, I've always used a saved Import Specification. You can set your delimiter there. Mark -----Original Message----- From: S D [mailto:accessd667 at yahoo.com] Sent: Thursday, July 08, 2004 9:08 AM To: accessd Subject: [AccessD] Set delimiter for DoCmd.TransferText acImportDelim Hi group, is it possible to set the type of delimiter for the TransferText command? eg: , or ; or ~ TIA Sander --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --------------------------------- Do you Yahoo!? Yahoo! Mail - 50x more storage than other providers! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Fri Jul 9 08:52:56 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Fri, 9 Jul 2004 07:52:56 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: I forget the exact syntax, but I know one way to do it is to look at the Attributes of the field, if you look in help you should be able to find it. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Thursday, July 08, 2004 11:23 PM To: accessd at databaseadvisors.com Subject: [AccessD] DAO: Find the key field in a tdf? It's been sooooo long since I did this. I'm looping through the fields in a tabledef object. What's the syntax to figure out if a field is the key field (or a key field)? -Christopher- -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 9 10:15:37 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 08:15:37 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ 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 Jul 9 10:59:08 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 9 Jul 2004 16:59:08 +0100 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <20040709155904.7F9D025091C@smtp.nildram.co.uk> In fact I think you have to look in the Indexes collection of the Tabledef and then look at its Fields property. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: 09/07/04 13:56 > > I forget the exact syntax, but I know one way to do it is to look at the Attributes of the field, if you look in help you should be able to find it. > > -Chris Mackin > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher > Hawkins > Sent: Thursday, July 08, 2004 11:23 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] DAO: Find the key field in a tdf? > > > It's been sooooo long since I did this. > > I'm looping through the fields in a tabledef object. > > What's the syntax to figure out if a field is the key field (or a key > field)? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From Jim.Hale at FleetPride.com Fri Jul 9 11:16:19 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Fri, 9 Jul 2004 11:16:19 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 9 12:16:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 10:16:24 -0700 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) Message-ID: No, I haven't, not in any version of Access. What version or versions are you dealing with? Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Friday, July 09, 2004 8:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KIsmert at TexasSystems.com Fri Jul 9 12:19:28 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Fri, 9 Jul 2004 12:19:28 -0500 Subject: [AccessD] Multi Forms In-Reply-To: <001e01c4651d$ad2003f0$0501a8c0@colbyws> Message-ID: <00cd01c465d8$e4d14dc0$2a3ca8c0@TEXASSYSTEMS.COM> John, Francisco: >At any rate, I do not have the answer as to how to pass in the name of the >form and open it using the Set statement syntax. There is no clean way to do this that I have found. However, I have written a function that has the same effect: CreateFormInstance("frmExample") Will open up a new instance of frmExample. It is, of course, a Case statement that matches the form name to its class module. The nice thing is, I've written a companion routine, BuildFormList, that will automatically generate this Case statement for all forms in any Access database (A2K and above). If you are interested, contact me off-list for the code. -Ken From martyconnelly at shaw.ca Fri Jul 9 13:49:01 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jul 2004 11:49:01 -0700 Subject: [AccessD] QuickBooks Project... Anyone game? References: Message-ID: <40EEE89D.501@shaw.ca> Here is a very brief market survey on the use of quickbooks I haven't come across Sage/Best mentioned here. http://www.webcpa.com/WebCPA/index.cfm/txtFuse/dspShellContent/fuseAction/DISPLAY/numContentID/52991/numSiteID/12/numTaxonomyTypeID/10/numTaxonomyID/937.htm Robert Gracie wrote: >Christopher, > I'm glad you asked.....;-) When ever I hear, "Well I'm not sure how much I >can help, but count me in" type of statement it **Generally** means I really >can't help, but I would like to have access to the work.. For me at least, >this has been no easy task, and is requiring a major commitment of effort >trying to weed through the QB program model. > > You and John C. where the *only* two (I was looking for 5) who wanted to be >a part of the project with no "disclaimers", meaning serious and wanting to >put in the effort it is going to take to pull this off. > > So let me turn this around..... > Have you (and JC), downloaded and started reviewing the SDK in it's >entirety, and if so how far into the model are you? > > You know, since JC is like the equivilent of 3 programmers, I guess we do >have 5...;-) > >Robert Gracie >www.servicexp.com > > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher >Hawkins >Sent: Wednesday, June 23, 2004 10:17 PM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] QuickBooks Project... Anyone game? > > >You've had me, JC, Ken at least two others offer to join your >project. How much more serious help do you need? ;) > >-C- > >---- Original Message ---- >From: Subscriptions at servicexp.com >To: accessd at databaseadvisors.com, >Subject: RE: [AccessD] QuickBooks Project... Anyone game? >Date: Wed, 23 Jun 2004 21:16:50 -0400 > > > >>Ken, >>Bottom line, not enough **serious** interest here. I'm about 15-20 >>hours >>into my "QuickBooks Class Build", and it's going OK, not nearly as >>fast as I >>hoped but then again I'm just one guy.... >> >> >>Good Luck!! >> >> >>Robert Gracie >>www.servicexp.com >> >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Stoker >>Sent: Wednesday, June 23, 2004 7:51 PM >>To: 'Access Developers discussion and problem solving' >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >> >>I would like to be included as well. I don't know how much help I >>can be, >>but my partner and I just met with a potential new client and found >>out that >>they use Quickbooks for their inventory tracking. We are to put a >>proposal >>together that will integrate a revamped web site that will include a >>knowledgebase, online purchasing (which part will need to interact >>with >>Quickbooks) and some other options. After our first meeting, I >>quickly came >>back and grabbed the list of emails for this string from my deleted >>items so >>that I could see what everyone was saying. >> >>Thanks >> >>Ken >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jwcolby >>Sent: Friday, June 11, 2004 5:21 AM >>To: 'Access Developers discussion and problem solving' >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >>I'm in. I have a client right now jumping through hoops to do this. >> >>John W. Colby >>www.ColbyConsulting.com >> >>-----Original Message----- >>From: accessd-bounces at databaseadvisors.com >>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert >>Gracie >>Sent: Friday, June 11, 2004 7:35 AM >>To: Access Developers discussion and problem solving >>Subject: RE: [AccessD] QuickBooks Project... Anyone game? >> >> >>Christopher, >>I guess there are about 75 VB examples in the SDK (3.0). All of >>which are >>as seamless as the next as far as I have played with (there just a >>pain to >>work with). It is really easy to see this for yourself if you have >>QuickBooks 2002 or above.. >> >>The problem is, there are no (none that I can find at least) >>complete >>sophisticated solutions that are under 500.00. I have tried the >>coreObjX >>dll, but that thing is a nightmare to even get registered on the >>users >>machines (even their own install routine will not register 9 time >>out of >>10), the other (AcctSync) solutions I found is about 1K, so it's out >>of my >>price range. >> >>What I'm hoping (going) to build is a class based solution based on >>the >>QBFC. So in the end I will end up with a solution that will allow for >>portability, and very easy communications with QB. The solution will >>do all >>the "grunt" work under the hood automatically, and allow me to send >>and >>interpret QB requests very easily. >> >>It's not easy working with QB's API, and I would have like to made >>it an >>open source kind of thing, but I was hoping for at least 5 serious >>developers to join in. >> >> >>Robert Gracie >>www.servicexp.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> >> > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > > > -- Marty Connelly Victoria, B.C. Canada From pedro at plex.nl Fri Jul 9 14:11:59 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 9 Jul 2004 21:11:59 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ References: Message-ID: <005901c465e8$e1073320$f4c581d5@pedro> Hello Charlotte, wat do you mean by partially compiled state? When the db1 is a compacted copie of the original, its strange that the db1 is 74 Mb and the original is 8Mb? Pedro Janssen ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Friday, July 09, 2004 5:15 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > The db1.mdb, etc., files are compacted copies of the database that > couldn't be renamed, perhaps because the original couldn't be deleted > for some reason. If you're spawning those, then you probably aren't > actually compacting your database even though you may think you are. If > the database is in a partially compiled state (this is a VBA project > issue, not compact and repair), then that might be what is causing the > problem. Try turning off the autocompact and then using the decompile > switch to open the database and use the bypass key to avoid running any > code. Then close the database, reopen without the decompile switch but > using the bypass, and compile and save the VBA project. Then try > turning compact on exit back on and see if that cures the problem. > > Charlotte Foust > > -----Original Message----- > From: pedro at plex.nl [mailto:pedro at plex.nl] > Sent: Friday, July 09, 2004 1:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and > indeed its a permissions protected database. > So i can delete these db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the > fact that in this way the database several times a day wil be compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of > thing when the database attempted to compact but for some reason (often > permissions), it couldn't delete the original and rename the db1.mdb, > etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates > temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with > different filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From Jim.Hale at FleetPride.com Fri Jul 9 14:28:24 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Fri, 9 Jul 2004 14:28:24 -0500 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD7D@corp-es01.fleetpride.com> 2000. It happens after maybe 20+ changes but is impossible to predict. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 12:16 PM To: Access Developers discussion and problem solving Subject: RE: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) No, I haven't, not in any version of Access. What version or versions are you dealing with? Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Friday, July 09, 2004 8:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Fri Jul 9 15:00:14 2004 From: JHewson at karta.com (Jim Hewson) Date: Fri, 9 Jul 2004 15:00:14 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E094@karta-exc-int.Karta.com> Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From chris at piasd.org Fri Jul 9 16:14:19 2004 From: chris at piasd.org (Chris Kettenbach) Date: Fri, 9 Jul 2004 14:14:19 -0700 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <2F7BA03C93D17D48B13C42228C8FDAF206D1D2@server.domain.local> What event are you calling the requery method from? Try the afterupdate event of the text box. Also maybe repaint or refresh the form. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Hewson Sent: Friday, July 09, 2004 1:00 PM To: AccessD Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From cfoust at infostatsystems.com Fri Jul 9 17:30:53 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 9 Jul 2004 15:30:53 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: Starting with 2000, it is possible for the database to be partially compiled, which has a major effect on performance. Sometimes you'll make a change but the Compile option on the Debug menu in VBE will be grayed out. I was assuming that the db1 was the compacted copy, but it may not be. Since that is the default suggested for any new file, it could be something else entirely. When compact and repair can't complete, it just names its temporary files db1, db2, etc., starting with the next number after the highest already existing. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: Re: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, wat do you mean by partially compiled state? When the db1 is a compacted copie of the original, its strange that the db1 is 74 Mb and the original is 8Mb? Pedro Janssen ----- Original Message ----- From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Sent: Friday, July 09, 2004 5:15 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > The db1.mdb, etc., files are compacted copies of the database that > couldn't be renamed, perhaps because the original couldn't be deleted > for some reason. If you're spawning those, then you probably aren't > actually compacting your database even though you may think you are. > If the database is in a partially compiled state (this is a VBA > project issue, not compact and repair), then that might be what is > causing the problem. Try turning off the autocompact and then using > the decompile switch to open the database and use the bypass key to > avoid running any code. Then close the database, reopen without the > decompile switch but using the bypass, and compile and save the VBA > project. Then try turning compact on exit back on and see if that > cures the problem. > > Charlotte Foust > > -----Original Message----- > From: pedro at plex.nl [mailto:pedro at plex.nl] > Sent: Friday, July 09, 2004 1:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and > indeed its a permissions protected database. So i can delete these > db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the > fact that in this way the database several times a day wil be > compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of > thing when the database attempted to compact but for some reason > (often permissions), it couldn't delete the original and rename the > db1.mdb, etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates > temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each > with different filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 9 18:07:36 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 09 Jul 2004 16:07:36 -0700 Subject: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 ....) References: <6A6AA9DF57E4F046BDA1E273BDDB677217FD7D@corp-es01.fleetpride.com> Message-ID: <40EF2538.3020307@shaw.ca> You may have the COMPILE ON DEMAND option turned on What happens is that when COMPILE ON DEMAND is checked, only as much code as is called gets compiled. This means modules containing external functions may get partially compiled. When you turn it off, a call to the external function will compile the entire module, not just the called function. This means that the compiling will be in fewer chunks, and that there will be less chance of fragmentation of the compiled code and less chance of something going wrong in managing that fragmentation. It means slower compiles if you turn off. You can force the code to compile by choosing Compile from the Debug menu (code window). You can allow Access to automatically compile your code as needed with Tools | Options | General | Compile On Demand. This is helpful in identifying problems in your code, such as a For statement that does not have a matching Next. You can discover whether the project is currently saved in a compiled state by entering this into the Immediate Window (Ctrl+G): ? IsCompiled() You should also try decompiling the front end, then compacting it, then compiling it. It is not at all uncommon to find that this process will reveal invalid code that a compile before the decompile did not reveal. That is, there is corrupt or invalid or uncompilable code in your app that was not showing up until you discarded all the compiled code and started over from scratch. For information about why this happens see: http://trigeminal.com/usenet/usenet004.asp?1033 Hale, Jim wrote: >2000. It happens after maybe 20+ changes but is impossible to predict. >Jim Hale > >-----Original Message----- >From: Charlotte Foust [mailto:cfoust at infostatsystems.com] >Sent: Friday, July 09, 2004 12:16 PM >To: Access Developers discussion and problem solving >Subject: RE: Subject: Code changes ignored (WAS [AccessD] db1, 2, 3 >....) > > >No, I haven't, not in any version of Access. What version or versions >are you dealing with? > >Charlotte Foust > >-----Original Message----- >From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] >Sent: Friday, July 09, 2004 8:16 AM >To: 'Access Developers discussion and problem solving' >Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > > >Slightly different question- have you run into cases where after "x" >number of changes to code Access just decides not to run them, ie it >just executes the old code and completely ignores the new? It is >extremely annoying. The only cure I've found is to import everything >into a new database container. Jim Hale > >-----Original Message----- >From: Charlotte Foust [mailto:cfoust at infostatsystems.com] >Sent: Friday, July 09, 2004 10:16 AM >To: Access Developers discussion and problem solving >Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > > >The db1.mdb, etc., files are compacted copies of the database that >couldn't be renamed, perhaps because the original couldn't be deleted >for some reason. If you're spawning those, then you probably aren't >actually compacting your database even though you may think you are. If >the database is in a partially compiled state (this is a VBA project >issue, not compact and repair), then that might be what is causing the >problem. Try turning off the autocompact and then using the decompile >switch to open the database and use the bypass key to avoid running any >code. Then close the database, reopen without the decompile switch but >using the bypass, and compile and save the VBA project. Then try >turning compact on exit back on and see if that cures the problem. > >Charlotte Foust > >-----Original Message----- >From: pedro at plex.nl [mailto:pedro at plex.nl] >Sent: Friday, July 09, 2004 1:21 AM >To: AccessD at databaseadvisors.com >Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > >Hello Charlotte, > >i indeed have turned on Compile (compact and repair) after Exit, and >indeed its a permissions protected database. >So i can delete these db1.mdb etc without any troubles?? > >Another question: Is compiling after exit a good option, because the >fact that in this way the database several times a day wil be compacted. > >Pedro Janssen > > > > > >From: "Charlotte Foust" >To: "Access Developers discussion and problem solving" >Date: Thu, 8 Jul 2004 14:01:58 -0700 >Subject: RE: [AccessD] db1, 2, 3 ........ > >Do you have Compile on Exit turned on? I've usually seen that kind of >thing when the database attempted to compact but for some reason (often >permissions), it couldn't delete the original and rename the db1.mdb, >etc. > >Charlotte Foust > >-----Original Message----- >From: Pedro Janssen [mailto:pedro at plex.nl] >Sent: Thursday, July 08, 2004 12:56 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] db1, 2, 3 ........ > > >Hello Group, > >i have an front & backend mdb on a server. The front-end creates >temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with >different filesize. > >Why is this and why are these not deleted automatically? > >TIA > >Pedro Janssen > > > -- Marty Connelly Victoria, B.C. Canada From glen_mcwilliams at msn.com Fri Jul 9 19:37:14 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Fri, 09 Jul 2004 17:37:14 -0700 Subject: [AccessD] Recordset object transposes field order Message-ID: Susan Check the primary key index or filter on the table. Glen >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: RE: [AccessD] Recordset object transposes field order >Date: Thu, 8 Jul 2004 09:50:12 -0400 > >Right regarding Columm Heads, but that isn't the problem -- I think that >discussion came about just through a misunderstanding of the problem. > >The list box is rearranging the columns. Specifically, it's transposing the >first two columns. > >If I use a SELECT statement to populate the list box, the column order in >the list box is correct. If I use a Recordset object via the Recordset >property, the first two columns are flipflopped in the listbox. The >Recordset itself is fine -- order is correct -- I checked it. > >The list box seems to do the flipping -- and Column Heads isn't involved. I >just checked just to make sure and the order is wrong with Column Heads on >or off. > >Susan H. > >When column heads are set to true it displays the field names, if set to >false then only displays the records Paul > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Fri Jul 9 19:41:44 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Fri, 9 Jul 2004 18:41:44 -0600 Subject: [AccessD] DAO: Find the key field in a tdf? Message-ID: <225300-22004761004144621@christopherhawkins.com> Aaaaaah, yes. I think you're right. I'll go try it. -C- ---- Original Message ---- From: andy at minstersystems.co.uk To: accessd at databaseadvisors.com, Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: Fri, 9 Jul 2004 16:59:08 +0100 >In fact I think you have to look in the Indexes collection of the >Tabledef >and then look at its Fields property. >-- >Andy Lacey >http://www.minstersystems.co.uk > > > >--------- Original Message -------- >From: Access Developers discussion and problem solving > >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] DAO: Find the key field in a tdf? >Date: 09/07/04 13:56 > >> >> I forget the exact syntax, but I know one way to do it is to look >at the >Attributes of the field, if you look in help you should be able to >find it. >> >> -Chris Mackin >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >Christopher >> Hawkins >> Sent: Thursday, July 08, 2004 11:23 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] DAO: Find the key field in a tdf? >> >> >> It's been sooooo long since I did this. >> >> I'm looping through the fields in a tabledef object. >> >> What's the syntax to figure out if a field is the key field (or a >key >> field)? >> >> -Christopher- >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> >> >> >> >> > >________________________________________________ >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 ssharkins at bellsouth.net Fri Jul 9 20:14:09 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 9 Jul 2004 21:14:09 -0400 Subject: [AccessD] Recordset object transposes field order In-Reply-To: Message-ID: <20040710011407.ZWHV1742.imf17aec.mail.bellsouth.net@SUSANONE> No filter. There's a primary key on the CustomerID field and a Duplicates index on the CompanyName -- I deleted the index on CompanyName just to see what happened and it didn't make any difference. Susan H. Susan Check the primary key index or filter on the table. From jmhla at earthlink.net Sat Jul 10 01:21:51 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Fri, 9 Jul 2004 23:21:51 -0700 Subject: [AccessD] LA Conference Message-ID: <000001c46646$33a4f8d0$6501a8c0@delllaptop> Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net From jwcolby at colbyconsulting.com Sat Jul 10 06:43:25 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 07:43:25 -0400 Subject: [AccessD] DAO: Find the key field in a tdf? In-Reply-To: <225300-22004761004144621@christopherhawkins.com> Message-ID: <003f01c46673$1c7b95b0$0501a8c0@colbyws> Just remember that if the original developer used natural keys, there may be a multi-field key, thus several fields may be "the key field". John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Friday, July 09, 2004 8:42 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] DAO: Find the key field in a tdf? Aaaaaah, yes. I think you're right. I'll go try it. -C- ---- Original Message ---- From: andy at minstersystems.co.uk To: accessd at databaseadvisors.com, Subject: RE: [AccessD] DAO: Find the key field in a tdf? Date: Fri, 9 Jul 2004 16:59:08 +0100 >In fact I think you have to look in the Indexes collection of the >Tabledef >and then look at its Fields property. >-- >Andy Lacey >http://www.minstersystems.co.uk > > > >--------- Original Message -------- >From: Access Developers discussion and problem solving > >To: Access Developers discussion and problem solving > >Subject: RE: [AccessD] DAO: Find the key field in a tdf? >Date: 09/07/04 13:56 > >> >> I forget the exact syntax, but I know one way to do it is to look >at the >Attributes of the field, if you look in help you should be able to >find it. >> >> -Chris Mackin >> >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of >Christopher >> Hawkins >> Sent: Thursday, July 08, 2004 11:23 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] DAO: Find the key field in a tdf? >> >> >> It's been sooooo long since I did this. >> >> I'm looping through the fields in a tabledef object. >> >> What's the syntax to figure out if a field is the key field (or a >key >> field)? >> >> -Christopher- >> >> >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> -- >> _______________________________________________ >> AccessD mailing list >> AccessD at databaseadvisors.com >> http://databaseadvisors.com/mailman/listinfo/accessd >> Website: http://www.databaseadvisors.com >> >> >> >> >> > >________________________________________________ >Message sent using UebiMiau 2.7.2 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jul 10 06:43:25 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 07:43:25 -0400 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E094@karta-exc-int.Karta.com> Message-ID: <003e01c46673$1c5c9c00$0501a8c0@colbyws> Is the event firing? Just because you have an event stub doesn't mean the event fires. You must have the event property of the control filled in. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Hewson Sent: Friday, July 09, 2004 4:00 PM To: AccessD Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim From jwcolby at colbyconsulting.com Sat Jul 10 07:08:32 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 08:08:32 -0400 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <200407090720.i697Kc9l013829@mailhostC.plex.net> Message-ID: <004001c46676$9ecee5f0$0501a8c0@colbyws> Pedro, Just remember that if you run a split database, i.e. FE/BE, doing a compact on exit will only compact the FE, not the BE. Compacting the FE may not even be necessary depending on whether you get a new copy daily (as I do) or what you do with the FE. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of pedro at plex.nl Sent: Friday, July 09, 2004 9:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sat Jul 10 07:08:32 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 08:08:32 -0400 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Message-ID: <004101c46676$9f298910$0501a8c0@colbyws> Sounds like a decompile / compact / repair is in order. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 12:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Sat Jul 10 08:49:41 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Sat, 10 Jul 2004 09:49:41 -0400 Subject: [AccessD] LA Conference Message-ID: <78130-220047610134941845@M2W047.mail2web.com> Still souds like a good idea to me Joe. Even if it's just a day. I could present my Chinese translation project. Nothing groundbreaking but it might be useful to somebody. Rocky Original Message: ----------------- From: Joe Hecht jmhla at earthlink.net Date: Fri, 09 Jul 2004 23:21:51 -0700 To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com Subject: [AccessD] LA Conference Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From bchacc at san.rr.com Sat Jul 10 08:50:43 2004 From: bchacc at san.rr.com (bchacc at san.rr.com) Date: Sat, 10 Jul 2004 09:50:43 -0400 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <39290-220047610135043793@M2W046.mail2web.com> Jim: Didi you set a breakpoint on the second one to see if the code is actually being executed? Rocky Original Message: ----------------- From: Jim Hewson JHewson at karta.com Date: Fri, 09 Jul 2004 15:00:14 -0500 To: accessD at databaseadvisors.com Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . From jmhla at earthlink.net Sat Jul 10 11:08:44 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Sat, 10 Jul 2004 09:08:44 -0700 (GMT-07:00) Subject: [AccessD] LA Conference Message-ID: <22442942.1089475725924.JavaMail.root@fozzie.psp.pas.earthlink.net> you were the only clear for the 8/14. Maybe in the fall -----Original Message----- From: "bchacc at san.rr.com" Sent: Jul 10, 2004 6:49 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] LA Conference Still souds like a good idea to me Joe. Even if it's just a day. I could present my Chinese translation project. Nothing groundbreaking but it might be useful to somebody. Rocky Original Message: ----------------- From: Joe Hecht jmhla at earthlink.net Date: Fri, 09 Jul 2004 23:21:51 -0700 To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com Subject: [AccessD] LA Conference Do to lack of interest the get together I was offering to host is off until at least September or October. I am still willing to try to organize it but is the west coast folks up for another get together? JOE HECHT LOS ANGELES CA jmhla at earthlink.net -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.com/ . -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 13:12:41 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:12:41 -0400 Subject: [AccessD] exiting Access Message-ID: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. From jwcolby at colbyconsulting.com Sat Jul 10 13:31:21 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 10 Jul 2004 14:31:21 -0400 Subject: [AccessD] exiting Access In-Reply-To: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: <004201c466ac$19472ec0$0501a8c0@colbyws> The only way I know of is to load a form, and in the form's Close event check a boolean. Cancel the close if the boolean is not set. Have a button set the boolean and close the app. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 2:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Sat Jul 10 13:35:14 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:35:14 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29874954.1089483461888.JavaMail.root@sniper4.usinternet.com> Message-ID: <000001c466ac$a45309d0$de1811d8@danwaters> Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 13:37:01 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:37:01 -0400 Subject: [AccessD] exiting Access In-Reply-To: <004201c466ac$19472ec0$0501a8c0@colbyws> Message-ID: <20040710183700.QECM1779.imf22aec.mail.bellsouth.net@SUSANONE> The user can still close the application at any time -- the user isn't forced to use the form to close. I can disable the Exit command on the File menu -- but can't figure out how to inhibit the Close button on the application's title bar. I'm pretty sure I've done so before, but dang if I can remember how. :( Susan H. The only way I know of is to load a form, and in the form's Close event check a boolean. Cancel the close if the boolean is not set. Have a button set the boolean and close the app. From ssharkins at bellsouth.net Sat Jul 10 13:39:33 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:39:33 -0400 Subject: [AccessD] exiting Access In-Reply-To: <000001c466ac$a45309d0$de1811d8@danwaters> Message-ID: <20040710183931.QEUV1779.imf22aec.mail.bellsouth.net@SUSANONE> OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 dwaters at usinternet.com Sat Jul 10 13:49:56 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:49:56 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29297778.1089484948147.JavaMail.root@sniper2.usinternet.com> Message-ID: <000101c466ae$b2974fe0$de1811d8@danwaters> How about an invisible form which contains the code in the Unload event? Open it by code when the app is first opened, and that should take care of things! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] exiting Access OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 ssharkins at bellsouth.net Sat Jul 10 13:53:08 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 14:53:08 -0400 Subject: [AccessD] exiting Access In-Reply-To: <000101c466ae$b2974fe0$de1811d8@danwaters> Message-ID: <20040710185306.QIOY1779.imf22aec.mail.bellsouth.net@SUSANONE> Yes, that would work -- thank you for the idea. You'd think this would be easier. Susan H. How about an invisible form which contains the code in the Unload event? Open it by code when the app is first opened, and that should take care of things! Dan From dwaters at usinternet.com Sat Jul 10 13:53:26 2004 From: dwaters at usinternet.com (Dan Waters) Date: Sat, 10 Jul 2004 13:53:26 -0500 Subject: [AccessD] exiting Access In-Reply-To: <29297778.1089484948147.JavaMail.root@sniper2.usinternet.com> Message-ID: <000201c466af$2f071600$de1811d8@danwaters> One other thing! This will prevent you from doing a manually initiated repair/compact. What I do is have a button titled "Allow Compact/Repair" which resets GblnAllowClose to True. Then the user can Compact/Repair themselves. If you're using Compact On Close, you won't need to have an "Allow Compact/Repair" button. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:40 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] exiting Access OK, clever -- I guess that may be what JC was really referring to -- But what if you don't use or want a main form? I really think I've done this some other way -- but then, maybe not. Susan H. Susan, Yes - It's easy! When your app opens, set a global Boolean variable to False. GblnAllowClose = False In your main form's Unload event, enter the following code: If GblnAllowClose = False Then Cancel = True End If The above will not allow the main form to close, thus keeping the application open. Now put the following code in the Exit button's click event. GblnAllowClose = True Docmd.Quit I've used this for a long time, and it works very well. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. 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 accessd at shaw.ca Sat Jul 10 14:03:51 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 10 Jul 2004 12:03:51 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FD75@corp-es01.fleetpride.com> Message-ID: Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 10 14:15:55 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 10 Jul 2004 15:15:55 -0400 Subject: [AccessD] exiting Access In-Reply-To: <20040710181239.JGBR1779.imf23aec.mail.bellsouth.net@SUSANONE> Message-ID: It isn't simple, but it isn't that hard either. See: http://support.microsoft.com/default.aspx?scid=kb;en-us;300688&Product=acc20 03 Steve Goodhall www.goodhall.info/steve There is nothing more difficult to take in hand, more perilous to conduct, or more uncertain in its success, than to take the lead in the introduction of a new order of things. Niccolo Machiavelli The Prince [1532], ch.6 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Saturday, July 10, 2004 2:13 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] exiting Access This ought to be simple, but I'm drawing a total blank -- Seems like you ought to be able to trap the File Exit and clicking the application's Close button -- so you can prevent the user from closing the application before they should. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 10 14:23:13 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 10 Jul 2004 15:23:13 -0400 Subject: [AccessD] exiting Access In-Reply-To: Message-ID: <20040710192311.NKKA1776.imf21aec.mail.bellsouth.net@SUSANONE> Thanks Steve -- that's all I'm turning up too -- I really thought I'd just flipped a switch on this somewhere in the long ago past, but I'm just confused. ;) Susan H. It isn't simple, but it isn't that hard either. See: http://support.microsoft.com/default.aspx?scid=kb;en-us;300688&Product=acc20 03 Steve Goodhall www.goodhall.info/steve There is nothing more difficult to take in hand, more perilous to conduct, or more uncertain in its success, than to take the lead in the introduction of a new order of things. Niccolo Machiavelli The Prince [1532], ch.6 From bchacc at san.rr.com Sat Jul 10 21:43:42 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 19:43:42 -0700 Subject: [AccessD] Re: Re: Message References: <200407042301.i64N18Q29000@databaseadvisors.com> Message-ID: <019501c466f0$e10cc070$6601a8c0@HAL9002> Finally got home to where I could view an attachment but...no attachment. What was it? Rocky ----- Original Message ----- From: To: Sent: Sunday, July 04, 2004 3:53 PM Subject: [AccessD] Re: Re: Message > Please have a look at the attached file. > ---------------------------------------------------------------------------- ---- > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Sat Jul 10 21:44:20 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 19:44:20 -0700 Subject: [AccessD] LA Conference References: <22442942.1089475725924.JavaMail.root@fozzie.psp.pas.earthlink.net> Message-ID: <01a901c466f0$f7b7d260$6601a8c0@HAL9002> Standing by... ----- Original Message ----- From: To: "Access Developers discussion and problem solving" Sent: Saturday, July 10, 2004 9:08 AM Subject: RE: [AccessD] LA Conference > you were the only clear for the 8/14. Maybe in the fall > > -----Original Message----- > From: "bchacc at san.rr.com" > Sent: Jul 10, 2004 6:49 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] LA Conference > > > Still souds like a good idea to me Joe. Even if it's just a day. I could > present my Chinese translation project. Nothing groundbreaking but it > might be useful to somebody. > > Rocky > > Original Message: > ----------------- > From: Joe Hecht jmhla at earthlink.net > Date: Fri, 09 Jul 2004 23:21:51 -0700 > To: dba-conf at databaseadvisors.com, accessd at databaseadvisors.com > Subject: [AccessD] LA Conference > > > Do to lack of interest the get together I was offering to host is off until > at least September or October. > > > > I am still willing to try to organize it but is the west coast folks up for > another get together? > > > > > > JOE HECHT > > LOS ANGELES CA > > jmhla at earthlink.net > > > > > > -------------------------------------------------------------------- > mail2web - Check your email from the web at > http://mail2web.com/ . > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jul 10 22:37:13 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 11 Jul 2004 13:37:13 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <019501c466f0$e10cc070$6601a8c0@HAL9002> Message-ID: <40F14289.18039.13418A18@lexacorp.com.pg> On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > Finally got home to where I could view an attachment but...no attachment. > What was it? > A virus -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From bchacc at san.rr.com Sat Jul 10 23:23:37 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sat, 10 Jul 2004 21:23:37 -0700 Subject: [AccessD] Re: Re: Message References: <40F14289.18039.13418A18@lexacorp.com.pg> Message-ID: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Ack! Which one? How'd it get by your AV software? Rocky ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Saturday, July 10, 2004 8:37 PM Subject: Re: [AccessD] Re: Re: Message > On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > > > Finally got home to where I could view an attachment but...no attachment. > > What was it? > > > A virus > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sun Jul 11 04:14:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 11 Jul 2004 19:14:09 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Message-ID: <40F19181.14060.12755C6@lexacorp.com.pg> On 10 Jul 2004 at 21:23, Rocky Smolin - Beach Access S wrote: > Ack! Which one? How'd it get by your AV software? > > Rocky No idea now which one it was. I deleted the original message when it came in. It didn't get by my AV software. I've no idea where it came from, but it went to everyone on the list. > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problem solving" > > Sent: Saturday, July 10, 2004 8:37 PM > Subject: Re: [AccessD] Re: Re: Message > > > > On 10 Jul 2004 at 19:43, Rocky Smolin - Beach Access S wrote: > > > > > Finally got home to where I could view an attachment but...no > attachment. > > > What was it? > > > > > A virus > > > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From carbonnb at sympatico.ca Sun Jul 11 08:56:37 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sun, 11 Jul 2004 09:56:37 -0400 Subject: [AccessD] Re: Re: Message In-Reply-To: <40F19181.14060.12755C6@lexacorp.com.pg> References: <01f901c466fe$d669c9c0$6601a8c0@HAL9002> Message-ID: <40F10ED5.28690.133038@localhost> On 11 Jul 2004 at 19:14, Stuart McLachlan wrote: > On 10 Jul 2004 at 21:23, Rocky Smolin - Beach Access S wrote: > > > Ack! Which one? How'd it get by your AV software? > > > > Rocky > > No idea now which one it was. I deleted the original message when it > came in. It didn't get by my AV software. I've no idea where it came > from, but it went to everyone on the list. There was no payload with this message. The list software strips attachments, so it got past because the AV didn't see the payload (which wasn't there) IOW, *this* one was safe, -- Bryan Carbonnell - carbonnb at sympatico.ca Don't take life too seriously. You won't get out alive. From stuart at lexacorp.com.pg Sun Jul 11 10:06:44 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 12 Jul 2004 01:06:44 +1000 Subject: [AccessD] Re: Re: Message In-Reply-To: <40F10ED5.28690.133038@localhost> References: <40F19181.14060.12755C6@lexacorp.com.pg> Message-ID: <40F1E424.11363.26A2107@lexacorp.com.pg> On 11 Jul 2004 at 9:56, Bryan Carbonnell wrote: > > There was no payload with this message. The list software strips > attachments, so it got past because the AV didn't see the payload > (which wasn't there) > > IOW, *this* one was safe, > And of course, since you and I both use Pegasus Mail, we were safe anyway unless we were really stupid :-) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From starkey at wanadoo.nl Sun Jul 11 11:14:03 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:14:03 +0200 Subject: [AccessD] Need ADO ADP help Message-ID: <20040711160316.18DFD53B04@smtp4.wanadoo.nl> Hi all, I hope someone on this list will be able to help me get on my way again.. I want to make use of an application role for security reasons and not having to grant permissions for every user on SQL Server 2000. My environment: Access 2003 SQL Server 2000 MDAC 2.8 JET 4 latest version/update Busy playing with ADO and unbound forms/datasheets still being updatable... I was doing pretty well using an Access MDB until I found out that I would not be able to use ADO as a recordset source for reports unless I'd make use of an ADP instead. So ohwell let's build an ADP, imported all the objects from the MDB and before even trying to get the reports to work I stumbled into another problem... the code used in my MDB enabling updatable recordset etc... worked but in the ADP the sets were no longer updatable?! I have been playing around with a connected ADP and a disconnected ADP, making use of the project.connection property etc. however it seems that I can't figure out what conditions to meet when binding a form/datasheet to an ADO recordset and still be updatable. The code I have been using in my MDB: (References: - ADO 2.8 - DAO 3.6) Connecting and authorising Set oConn = New ADODB.Connection oConn.Open "Provider=SQLOLEDB;Data Source=PC1;Initial Catalog=EBNinfo;Integrated Security=SSPI" oConn.Execute "EXEC sp_setapprole 'AppRoleName', {Encrypt N 'mypassword'}, 'ODBC' " Binding the form Dim rs As New ADODB.Recordset With rs Set .ActiveConnection = oConn .Source = "SELECT * FROM stamCluster" .LockType = adLockOptimistic .CursorType = adOpenKeyset .CursorLocation = adUseClient .Open End With Set Me.Recordset = rs rs.Close So, this worked fine in my MDB but the ADP refuses to have my dataset updatable.... sigh I hope someone ran into this behaviour before or at least knows either a work-around or another syntax which would do the trick. I know there are other way than using an application role but as for know I prefer this solution... Once I am able to get my forms/reports/comboboxes to work using ADO recordsets all's well:-) Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. Regards and TIA, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:03 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Sun Jul 11 11:14:40 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:14:40 +0200 Subject: [AccessD] Got it! Message-ID: <20040711160353.0BE1F52AB6@smtp4.wanadoo.nl> Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. From ssharkins at bellsouth.net Sun Jul 11 11:07:52 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 12:07:52 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711160316.18DFD53B04@smtp4.wanadoo.nl> Message-ID: <20040711160749.KNXV1776.imf21aec.mail.bellsouth.net@SUSANONE> Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub From starkey at wanadoo.nl Sun Jul 11 11:31:59 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 18:31:59 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711160749.KNXV1776.imf21aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711162112.22EDF53EBD@smtp4.wanadoo.nl> Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. From ssharkins at bellsouth.net Sun Jul 11 11:30:09 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 12:30:09 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711162112.22EDF53EBD@smtp4.wanadoo.nl> Message-ID: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Sun Jul 11 12:32:06 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 19:32:06 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711172118.518A14DD93@smtp4.wanadoo.nl> Susan, that's what makes it a little frustrating, it looks like MS is having a lot of trouble making Access fully ADO compatible if you look at all the updates (access mdac jet etc). Now it is not said that this whitepaper of 2002 also applies to 2003 I would think not totally though the 'error' message is the same. Maybe there's a way different from what I've been using but to be honest I think I'll have to try something else.. I thought the use of this application role was best suited but now more and more obstacles are getting in my way as I walk down this ADO path:-) Thanks for your reply Susan, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:30 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 19:32:05 avast! auteursrecht (c) 2000-2004 ALWIL Software. From artful at rogers.com Sun Jul 11 14:25:49 2004 From: artful at rogers.com (Arthur Fuller) Date: Sun, 11 Jul 2004 15:25:49 -0400 Subject: [AccessD] Need ADO ADP help In-Reply-To: <20040711163006.WXQW1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: <039a01c4677c$df938850$6601a8c0@rock> Just out of curiosity, what is/are the advantage(s) of using a recordset rather than a query or a bound form? I've been reading this thread sporadically, but have never used a recordset for either a form or a report. What significant powers am I missing due to this ignorance? So do you do this because it's difficult or impossible to create a query that does the same thing? TIA, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, July 11, 2004 12:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * >From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jul 11 15:29:20 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 11 Jul 2004 16:29:20 -0400 Subject: [AccessD] Got it! In-Reply-To: <20040711160353.0BE1F52AB6@smtp4.wanadoo.nl> Message-ID: <20040711202918.HSGT1775.imf19aec.mail.bellsouth.net@SUSANONE> >From Help -- not sure if this answers your question or not. I've been reviewing the differences between Connection and AccessConnection myself this afternoon. Susan H. The AccessConnection property returns an ADO connection that uses two OLE DB providers. It uses the Microsoft OLE DB Provider for Microsoft Jet (Microsoft.Jet.OLEDB.4.0) as the data provider and the Microsoft OLE DB Provider for Microsoft Access 10 (Microsoft.Access.OLEDB.10.0) as the service provider. You should use the AccessConnection property if you intend to create ADO recordsets that will be bound to Access forms. The form will not be updateable unless it is created by using the OLE DB Provider for Microsoft Access 10, even if the recordset is updateable in ADO. Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Sun Jul 11 15:45:41 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 22:45:41 +0200 Subject: [AccessD] Need ADO ADP help In-Reply-To: <039a01c4677c$df938850$6601a8c0@rock> Message-ID: <20040711203503.AC0325A995@smtp8.wanadoo.nl> Hi Arthur, Well for starters I am playing around with ADO and application roles and trying to figure out what I can use best when not wanting users to have permissions on a SQL Server database except the one to connect to a certain database. This can be accomplished by using an application role. It would also be possible to use DAO but ADO is a bit more enhanced though DAO is optimized for Access, ohwell:-) Here's an interesting link about application roles and SQL Server combined with Access: http://www.winnetmag.com/SQLServer/Articles/ArticleID/20534/pg/1/1.html There is no real difference with queries/tables as a recordsource since the use a recordset makes the form bound the way you are familiar with. I just found out that reports in an MDB do not support the ADO recordset binding (haven't tried DAO yet) so ohwell:-) ADP is another option I have and should do the trick though I haven't got it running yet. What makes it all a bit nasty is all the versions and different techniques to get the job done... So much for plain and simple:-) Recordset advantages can be... Unless you use a pass-through query, networkload and performance. Less Server-connections if you make use of 'disconnected' recordsets. On the other hand, I think that pass-through queries do not work with subforms... Not sure if a recordset will but I haven't read about this yet or tried this. The thing is I'd like to work as much unbound as possible and as secure as possible and have little SQL server user maintenance. I'd advise you to start sniffing around a little since I haven't got that much experience myself yet and it's a pretty big workfield to explore. Having DotNet as the next generation platform and thin clients etc... ADO knowledge will be necessary and I am running a bit behind:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Arthur Fuller Verzonden: zondag 11 juli 2004 21:26 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Just out of curiosity, what is/are the advantage(s) of using a recordset rather than a query or a bound form? I've been reading this thread sporadically, but have never used a recordset for either a form or a report. What significant powers am I missing due to this ignorance? So do you do this because it's difficult or impossible to create a query that does the same thing? TIA, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Sunday, July 11, 2004 12:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need ADO ADP help No -- I haven't tried it in either version -- only used the Form's Recordset property -- didn't know the Report property was limited. Susan H. Have you actually tried this Susan?:-) In an Access 2002 whitepaper I found the following and it matches my case in Access 2003 thinking MS has not yet covered this: In Microsoft Access 2002, it is now possible to use ADO recordsets with reports in Microsoft Access project files. Unfortunately, the use of the report Recordset property is limited to project files. If you try to set or retrieve a report's Recordset property in a Jet database (.mdb) file, you receive the following error message: 'This feature is not available in an MBD'. Regards, Eric -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 18:08 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Need ADO ADP help Ofcourse, if someone knows a work-around for the report ADO 'problem' in my MDB that would also be just fine though I'd rather do not want to use ODBC DNS. =============I may not have followed the exact problem -- but Access 2003 supports using Recordset objects as source for forms and reports -- using the Report object's Recordset property. And, the Recordset can be ADO. Susan H. Recordset Property See AlsoApplies ToExampleSpecificsReturns or sets the ADO Recordset or DAO Recordset object representing the record source for the specified form, report, list box control, or combo box control. Read/write. expression.Recordset expression Required. An expression that returns one of the objects in the Applies To list. Remarks You cannot use this property with ODBCDirect recordset types in DAO. The Recordset property returns the recordset object that provides the data being browsed in a form, report, list box control, or combo box control. If a form is based on a query, for example, referring to the Recordset property is the equivalent of cloning a Recordset object by using the same query. However, unlike using the RecordsetClone property, changing which record is current in the recordset returned by the form's Recordset property also sets the current record of the form. This property is available only by using Visual Basic. The read/write behavior of the Recordset property is determined by the type of recordset (ADO or DAO) and the type of data (Jet or SQL) contained in the recordset identified by the property. Recordset type Based on SQL data Based on Jet data ADO Read/Write Read/Write DAO N/A Read/Write The following example opens a form, opens a recordset, and then binds the form to the recordset by setting the form's Recordset property to the newly created Recordset object. Global rstSuppliers As ADODB.Recordset Sub MakeRW() DoCmd.OpenForm "Suppliers" Set rstSuppliers = New ADODB.Recordset rstSuppliers.CursorLocation = adUseClient rstSuppliers.Open "Select * >From Suppliers", _ CurrentProject.Connection, adOpenKeyset, adLockOptimistic Set Forms("Suppliers").Recordset = rstSuppliers End Sub Use the Recordset property: To bind multiple forms to a common data set. This allows synchronization of multiple forms. For example, Set Me.Recordset = Forms!Form1.Recordset To use methods with the Recordset object that aren't directly supported on forms. For example, you can use the Recordset property with the ADO Find or DAO Find methods in a custom dialog for finding a record. To wrap a transaction (which can be rolled back) around a set of edits that affect multiple forms. Changing a form's Recordset property may also change the RecordSource, RecordsetType, and RecordLocks properties. Also, some data-related properties may be overridden, for example, the Filter, FilterOn, OrderBy, and OrderByOn properties. Calling the Requery method of a form's recordset (for example, Forms(0).Recordset.Requery) can cause the form to become unbound. To refresh the data in a form bound to a recordset, set the RecordSource property of the form to itself (Forms(0).RecordSource = Forms(0).RecordSource). When a form is bound to a recordset, an error occurs if you use the Filter by Form command. Example The following example uses the Recordset property to create a new copy of the Recordset object from the current form and then prints the names of the fields in the Debug window. Sub Print_Field_Names() Dim rst As DAO.Recordset, intI As Integer Dim fld As Field Set rst = Me.Recordset For Each fld in rst.Fields ' Print field names. Debug.Print fld.Name Next End Sub The next example uses the Recordset property and the Recordset object to synchronize a recordset with the form's current record. When a company name is selected from a combo box, the FindFirst method is used to locate the record for that company, causing the form to display the found record. Sub SupplierID_AfterUpdate() Dim rst As DAO.Recordset Dim strSearchName As String Set rst = Me.Recordset strSearchName = CStr(Me!SupplierID) rst.FindFirst "SupplierID = " & strSearchName If rst.NoMatch Then MsgBox "Record not found" End If rst.Close End Sub The following code helps to determine what type of recordset is returned by the Recordset property under different conditions. Sub CheckRSType() Dim rs as Object Set rs=Forms(0).Recordset If TypeOf rs Is DAO.Recordset Then MsgBox "DAO Recordset" ElseIf TypeOf rs is ADODB.Recordset Then MsgBox "ADO Recordset" End If End Sub -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:31:59 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 22:45:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Sun Jul 11 15:51:56 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Sun, 11 Jul 2004 22:51:56 +0200 Subject: [AccessD] Got it! In-Reply-To: <20040711202918.HSGT1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040711204118.9950E5A8BC@smtp8.wanadoo.nl> Hi Susan, I've read this part also and to be honest... There seem to be so many exceptions with ADO (MDB/ADP) having so many connect options and providers, not to mention known ADO bugs etc... I was already happy I got it to work (again):-) Maybe DAO would be easier?:-) -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Susan Harkins Verzonden: zondag 11 juli 2004 22:29 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Got it! >From Help -- not sure if this answers your question or not. I've been reviewing the differences between Connection and AccessConnection myself this afternoon. Susan H. The AccessConnection property returns an ADO connection that uses two OLE DB providers. It uses the Microsoft OLE DB Provider for Microsoft Jet (Microsoft.Jet.OLEDB.4.0) as the data provider and the Microsoft OLE DB Provider for Microsoft Access 10 (Microsoft.Access.OLEDB.10.0) as the service provider. You should use the AccessConnection property if you intend to create ADO recordsets that will be bound to Access forms. The form will not be updateable unless it is created by using the OLE DB Provider for Microsoft Access 10, even if the recordset is updateable in ADO. Okay, last question can be forgotten:-) The trick is to use a connected ADP and set the connection object to: CurrentProject.AccessConnection. That was all I needed to have my forms act the way they did in the MDB. I still wonder though why I couldn't get it to work using a disconnected ADP and the original code but at least I got it to work...pfew:-) Regards, Eric Starkenburg Starkenburg Office Solutions _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 18:14:40 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0428-1, 09-07-2004 Getest op: 11-7-2004 22:51:55 avast! auteursrecht (c) 2000-2004 ALWIL Software. From martyconnelly at shaw.ca Sun Jul 11 17:35:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 11 Jul 2004 15:35:14 -0700 Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL References: <20040711203503.AC0325A995@smtp8.wanadoo.nl> Message-ID: <40F1C0A2.1010407@shaw.ca> Just came across this article that gives both points of view Migrating from Microsoft SQL Server and Access to MySQL http://dev.mysql.com/tech-resources/articles/migrating-from-microsoft.html It also describe briefly some conversion methods and helpful programs Note that a lot of problems will be resolved by MySQL 5.0 where stored procedures, triggers and views have been introduced, although the stored procedure syntax will vary in some degree from Microsoft's T-SQL language. However MySQL 5.0 is still in alpha which was released in Febuary. You will have problems with the various dialects of SQL like T-SQL from Microsoft or PL-SQL from Oracle. It is not plug and play. More like plug and pray. MySQL Server has many extensions to the SQL standard (so does everyone else), but does have a startup switch to use only ANSI SQL:2003 compliant code. MySQL does have a heavier duty database MAXDB from SAP which uses an Oracle like SQL syntax, there are perhaps problems with the ODBC bridge to MAXDB. I have connected to it using Access, but nothing heavy duty. Also, there is no OLEDB bridge yet to MySQL, for use with .Net, the people I have heard who know how to write this (they are thin on the ground) want cash to write it. Open Source is fine, but not if you have to take off three months to write and test this. Probably MYSQL or SAP will pay for it. -- Marty Connelly Victoria, B.C. Canada From davide at dalyn.co.nz Mon Jul 12 00:37:16 2004 From: davide at dalyn.co.nz (David Emerson) Date: Mon, 12 Jul 2004 17:37:16 +1200 Subject: [AccessD] Recording field changes In-Reply-To: Message-ID: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> I have finally got round to implementing Bob's code. It is working well but I have a problem with combo boxes. In cases where there are more than 1 columns and the first column is an ID number, I would like to show the 2nd column value (which is what is shown on the screen as the first column is 0cm width). I can get the new value of the combo box with "C.Column(1)" (C is dimmed as a control). How do I get the old value of the 2nd column though? David At 21/06/2004, you wrote: >Hi David, > >You could play with adding a memo field to your form's record source >called "Updates", add a textbox control to your form thats bound to >"Updates" (you can hide this field if you like), add =AuditTrailX() as a >function call in your form's Before Update event, then add the following >module to your project. Wish I could remember where this came from but i >can't. The code iterates through all the data entry controls in your >form's controls collection, recording old and new values for only those >fields that have changed. From stuart at lexacorp.com.pg Mon Jul 12 00:55:08 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Mon, 12 Jul 2004 15:55:08 +1000 Subject: [AccessD] Recording field changes In-Reply-To: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> References: Message-ID: <40F2B45C.6457.5977C34@lexacorp.com.pg> On 12 Jul 2004 at 17:37, David Emerson wrote: > I have finally got round to implementing Bob's code. It is working well > but I have a problem with combo boxes. In cases where there are more than > 1 columns and the first column is an ID number, I would like to show the > 2nd column value (which is what is shown on the screen as the first column > is 0cm width). > > I can get the new value of the combo box with "C.Column(1)" (C is dimmed as > a control). How do I get the old value of the 2nd column though? > You can't from the combobox directly, you will have to get it from the underlying data, something like =DLookup("DisplayName","tblLookupTable","PK = " & cboC) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Mon Jul 12 02:22:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 09:22:17 +0200 Subject: [AccessD] Recording field changes In-Reply-To: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> References: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> Message-ID: <1613474466.20040712092217@cactus.dk> Hi David If you store the ListIndex of the old selection, you can look up the value of any column directly: ' Save index of selected row. lngListIndex = Me!cboC.ListIndex ... ... ' Look up value of Column(1) or row lngListIndex. strOldValue = Me!cboC.Column(1, lngListIndex) /gustav > I have finally got round to implementing Bob's code. It is working well > but I have a problem with combo boxes. In cases where there are more than > 1 columns and the first column is an ID number, I would like to show the > 2nd column value (which is what is shown on the screen as the first column > is 0cm width). > I can get the new value of the combo box with "C.Column(1)" (C is dimmed as > a control). How do I get the old value of the 2nd column though? > David > At 21/06/2004, you wrote: >>Hi David, >> >>You could play with adding a memo field to your form's record source >>called "Updates", add a textbox control to your form thats bound to >>"Updates" (you can hide this field if you like), add =AuditTrailX() as a >>function call in your form's Before Update event, then add the following >>module to your project. Wish I could remember where this came from but i >>can't. The code iterates through all the data entry controls in your >>form's controls collection, recording old and new values for only those >>fields that have changed. From paul.hartland at fsmail.net Mon Jul 12 05:47:28 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 12:47:28 +0200 (CEST) Subject: [AccessD] Date Ranges Message-ID: <27822843.1089629248821.JavaMail.www@wwinf3006> To all, Either I am getting too old for this programming lark or just can?t seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn?t due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report ..and this person didn?t appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From mikedorism at adelphia.net Mon Jul 12 06:38:40 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 12 Jul 2004 07:38:40 -0400 Subject: [AccessD] Date Ranges In-Reply-To: <27822843.1089629248821.JavaMail.www@wwinf3006> Message-ID: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Change your criteria so that you are pulling start dates between DateFrom and DateTo OR finish dates between DateFrom and DateTo. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 6:47 AM To: accessd Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jul 12 07:18:20 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 14:18:20 +0200 (CEST) Subject: [AccessD] Date Ranges Message-ID: <11204449.1089634700461.JavaMail.www@wwinf3006> thats what I done but the start date for one of the records was before the start date required for the report and the finish date for the record was after the finish date required for the report, so I have had to also put for start date being before the startdate (report) AND finish date being after the finishdate (report) as well.... Thanks for help. I'm hoping this will solve it now Message date : Jul 12 2004, 12:39 PM >From : "Mike & Doris Manning" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] Date Ranges Change your criteria so that you are pulling start dates between DateFrom and DateTo OR finish dates between DateFrom and DateTo. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 6:47 AM To: accessd Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From djkr at msn.com Mon Jul 12 07:22:36 2004 From: djkr at msn.com (DJK(John) Robinson) Date: Mon, 12 Jul 2004 13:22:36 +0100 Subject: [AccessD] Date Ranges In-Reply-To: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Message-ID: <000301c4680a$ea666fc0$3500a8c0@dabsight> Not enough, sorry, Doris. Paul, what you need is this: start date between DateFrom and DateTo OR finish date between DateFrom and DateTo OR (start date before DateFrom AND finish date after DateTo) HTH John > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mike & Doris Manning > Sent: 12 July 2004 12:39 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Date Ranges > > > Change your criteria so that you are pulling start dates > between DateFrom and DateTo OR finish dates between DateFrom > and DateTo. > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > paul.hartland at fsmail.net > Sent: Monday, July 12, 2004 6:47 AM > To: accessd > Subject: [AccessD] Date Ranges > > > To all, > > Either I am getting too old for this programming lark or just > can't seem to think anymore. We have a personnel & absence > database from which we can pull off reports on certain date > ranges. The problem I have is that one person was off from > 16/06/04 and isn't due to return until 14/08/04. One of the > HR girls entered the dates 27/06/04 as the start date for a > report and 07/07/04 and a finish date for the report...and > this person didn't appear on the records cause basically I > have if the DateFrom in their absence record is greater than > equal to the start date they enter and to DateTo in the > absence record is less than or equal to the finish date for > the report it gives those records. How would I take into > account anyone that is off at any point between the startdate > and finishdate that we enter for a report. > > Thanks in advance for all your help. > > Paul Hartland > > -- > > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > > This email has been checked for most known viruses - find out > more at: http://www.wanadoo.co.uk/help/id/7098.htm > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JHewson at karta.com Mon Jul 12 08:05:25 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 08:05:25 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> Sorry, left for the weekend before I received any replies. Thanks for your replies. I'll answer each now. Chris - requery is called from the after update event of the text box. Doesn't work. I've tried repaint and refresh - still doesn't work. John - the event property of the control is filled in, checked it numerous times - even made sure the name of the controls were different than field names. Rocky - set a breakpoint it stops correctly, set a breakpoint on the line after - it stops correctly. I've tried using a querydef as the row source and a SQL statement. Doesn't make a difference. I also added a line to setfocus on the control, then requery and then setfocus on another control. The focus changes as expected and moves to the control after the requery line... still doesn't requery. Any other suggestions? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of bchacc at san.rr.com Sent: Saturday, July 10, 2004 8:51 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Requery ListBox doesn't work Jim: Didi you set a breakpoint on the second one to see if the code is actually being executed? Rocky Original Message: ----------------- From: Jim Hewson JHewson at karta.com Date: Fri, 09 Jul 2004 15:00:14 -0500 To: accessD at databaseadvisors.com Subject: [AccessD] Requery ListBox doesn't work Two identical lines of code to requery a ListBox, one works, one doesn't. Both on the same form, both reference the same ListBox. The one that works is located on the on click event of a button to delete the current record. Delete the record - requery the ListBox. Works. The one that doesn't work is on the after update event of a text box. Enter text - move to next text box - requery ListBox. Doesn't work. A2K - I also imported everything into a new database container. still didn't work. Any idea why? Thanks in advance, Jim -------------------------------------------------------------------- mail2web - Check your email from the web at http://mail2web.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 Jul 12 08:09:49 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 15:09:49 +0200 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> References: <9C382E065F54AE48BC3AA7925DCBB01C0103E095@karta-exc-int.Karta.com> Message-ID: <13224326079.20040712150949@cactus.dk> Hi Jim I guess you need to save the record before asking for the requery. /gustav > Two identical lines of code to requery a ListBox, one works, one doesn't. > Both on the same form, both reference the same ListBox. > > The one that works is located on the on click event of a button to delete > the current record. Delete the record - requery the ListBox. Works. > > The one that doesn't work is on the after update event of a text box. > Enter text - move to next text box - requery ListBox. Doesn't work. From JHewson at karta.com Mon Jul 12 08:48:52 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 08:48:52 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> Thanks for the suggestion. Tried it - still doesn't work. However, it does requery and displace the previous change! I've used the requery on several forms and it usually works. I just cannot figure out why on this form it doesn't! Thanks Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Monday, July 12, 2004 8:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Requery ListBox doesn't work Hi Jim I guess you need to save the record before asking for the requery. /gustav > Two identical lines of code to requery a ListBox, one works, one doesn't. > Both on the same form, both reference the same ListBox. > > The one that works is located on the on click event of a button to delete > the current record. Delete the record - requery the ListBox. Works. > > The one that doesn't work is on the after update event of a text box. > Enter text - move to next text box - requery ListBox. Doesn't work. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheygood at abestsystems.com Mon Jul 12 08:50:03 2004 From: bheygood at abestsystems.com (Bob Heygood) Date: Mon, 12 Jul 2004 06:50:03 -0700 Subject: [AccessD] Microsoft Access Annoyances In-Reply-To: <11204449.1089634700461.JavaMail.www@wwinf3006> Message-ID: Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee From gustav at cactus.dk Mon Jul 12 09:04:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 16:04:13 +0200 Subject: [AccessD] Requery ListBox doesn't work In-Reply-To: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> References: <9C382E065F54AE48BC3AA7925DCBB01C0103E096@karta-exc-int.Karta.com> Message-ID: <16827589631.20040712160413@cactus.dk> Hi Jim Then you probably need to requery the form after having saved the record ... /gustav > Thanks for the suggestion. Tried it - still doesn't work. > However, it does requery and displace the previous change! > I've used the requery on several forms and it usually works. > I just cannot figure out why on this form it doesn't! > Thanks > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Monday, July 12, 2004 8:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Requery ListBox doesn't work > Hi Jim > I guess you need to save the record before asking for the requery. > /gustav >> Two identical lines of code to requery a ListBox, one works, one doesn't. >> Both on the same form, both reference the same ListBox. >> >> The one that works is located on the on click event of a button to delete >> the current record. Delete the record - requery the ListBox. Works. >> >> The one that doesn't work is on the after update event of a text box. >> Enter text - move to next text box - requery ListBox. Doesn't work. From paul.hartland at fsmail.net Mon Jul 12 09:24:03 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 16:24:03 +0200 (CEST) Subject: [AccessD] Summing Time Message-ID: <29312307.1089642243429.JavaMail.www@wwinf3006> To all, I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two dates, thought I had done this but apprently it's not calculating correctly. Any ideas how I can calculate this exactly to the minute. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Mon Jul 12 09:41:45 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 16:41:45 +0200 Subject: [AccessD] Summing Time In-Reply-To: <29312307.1089642243429.JavaMail.www@wwinf3006> References: <29312307.1089642243429.JavaMail.www@wwinf3006> Message-ID: <17629842050.20040712164145@cactus.dk> Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland From CMackin at Quiznos.com Mon Jul 12 09:50:51 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 12 Jul 2004 08:50:51 -0600 Subject: [AccessD] Summing Time Message-ID: Just get the difference in seconds using DateDiff then divide by 60 to get minutes. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 8:24 AM To: accessd Subject: [AccessD] Summing Time To all, I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two dates, thought I had done this but apprently it's not calculating correctly. Any ideas how I can calculate this exactly to the minute. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Mon Jul 12 09:52:54 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Mon, 12 Jul 2004 16:52:54 +0200 (CEST) Subject: [AccessD] Summing Time Message-ID: <23666582.1089643974165.JavaMail.www@wwinf3006> Not sure I explained properly an example table would be: INPUTDATE TIME 28/06/04 00:10 28/06/04 00:10 28/06/04 00:12 28/06/04 00:10 28/06/04 00:13 28/06/04 00:10 28/06/04 01:18 29/06/04 00:10 29/06/04 00:10 29/06/04 00:30 29/06/04 00:10 29/06/04 00:13 29/06/04 00:10 29/06/04 02:00 So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get TotalHours 04:48 I only want to sum the actual time field Paul Hartland Message date : Jul 12 2004, 03:44 PM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] Summing Time Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From gustav at cactus.dk Mon Jul 12 10:12:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 12 Jul 2004 17:12:32 +0200 Subject: [AccessD] Summing Time In-Reply-To: <23666582.1089643974165.JavaMail.www@wwinf3006> References: <23666582.1089643974165.JavaMail.www@wwinf3006> Message-ID: <1931688705.20040712171232@cactus.dk> Hi Paul > Not sure I explained properly an example table would be: > INPUTDATE TIME > 28/06/04 00:10 > 28/06/04 00:10 > 28/06/04 00:12 > 28/06/04 00:10 > 28/06/04 00:13 > 28/06/04 00:10 > 28/06/04 01:18 > 29/06/04 00:10 > 29/06/04 00:10 > 29/06/04 00:30 > 29/06/04 00:10 > 29/06/04 00:13 > 29/06/04 00:10 > 29/06/04 02:00 > So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get > TotalHours > 04:48 > I only want to sum the actual time field Then you can get the minutes for each record: WaitMinutes: DateDiff("n", #00:00#, datefield2) and sum these. /gustav > lngWaitMinutes = DateDiff("n", datefield1, datefield2) > /gustav >> To all, >> I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 >> upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two >> dates, thought I had done this but apprently it's not calculating correctly. >> Any ideas how I can calculate this exactly to the minute. >> Thanks in advance for any help. >> Paul Hartland > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > Whatever you Wanadoo: > http://www.wanadoo.co.uk/time/ > This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From CMackin at Quiznos.com Mon Jul 12 10:19:22 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 12 Jul 2004 09:19:22 -0600 Subject: [AccessD] Summing Time Message-ID: So you just Group By INPUTDATE and Sum the Time and you should be fine. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Monday, July 12, 2004 8:53 AM To: Access Developers discussion and problem solving Subject: Re: Re: [AccessD] Summing Time Not sure I explained properly an example table would be: INPUTDATE TIME 28/06/04 00:10 28/06/04 00:10 28/06/04 00:12 28/06/04 00:10 28/06/04 00:13 28/06/04 00:10 28/06/04 01:18 29/06/04 00:10 29/06/04 00:10 29/06/04 00:30 29/06/04 00:10 29/06/04 00:13 29/06/04 00:10 29/06/04 02:00 So if I entered 28/06/04 as the start date and 29/06/04 as the finish date I would get TotalHours 04:48 I only want to sum the actual time field Paul Hartland Message date : Jul 12 2004, 03:44 PM >From : "Gustav Brock" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] Summing Time Hi Paul lngWaitMinutes = DateDiff("n", datefield1, datefield2) /gustav > To all, > I have a database which holds the shifts of inputting based on various orders that are being counted, one particular field of the record is waiting time, which will hold anything from 00:01 > upwards. I also have a date field in the record called InputDate, what I want to be able to do is allow the user to enter two dates then calculate the total waiting time there was between the two > dates, thought I had done this but apprently it's not calculating correctly. > Any ideas how I can calculate this exactly to the minute. > Thanks in advance for any help. > Paul Hartland -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Mon Jul 12 11:41:28 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 12 Jul 2004 11:41:28 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD8B@corp-es01.fleetpride.com> Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 12 12:02:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 10:02:04 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JHewson at karta.com Mon Jul 12 12:14:34 2004 From: JHewson at karta.com (Jim Hewson) Date: Mon, 12 Jul 2004 12:14:34 -0500 Subject: [AccessD] Requery ListBox doesn't work Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E09A@karta-exc-int.Karta.com> Thanks, Gustav! It works. On a whim, I decided to try refresh one more time. It worked! Thanks everyone for your help. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Monday, July 12, 2004 9:04 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Requery ListBox doesn't work Hi Jim Then you probably need to requery the form after having saved the record ... /gustav > Thanks for the suggestion. Tried it - still doesn't work. > However, it does requery and displace the previous change! > I've used the requery on several forms and it usually works. > I just cannot figure out why on this form it doesn't! > Thanks > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Monday, July 12, 2004 8:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Requery ListBox doesn't work > Hi Jim > I guess you need to save the record before asking for the requery. > /gustav >> Two identical lines of code to requery a ListBox, one works, one doesn't. >> Both on the same form, both reference the same ListBox. >> >> The one that works is located on the on click event of a button to delete >> the current record. Delete the record - requery the ListBox. Works. >> >> The one that doesn't work is on the after update event of a text box. >> Enter text - move to next text box - requery ListBox. Doesn't work. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 12:17:27 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 13:17:27 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. From Jim.Hale at FleetPride.com Mon Jul 12 12:16:52 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 12 Jul 2004 12:16:52 -0500 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FD8C@corp-es01.fleetpride.com> No, I'm using A2000; Jim Lawrence is using A2003 Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Monday, July 12, 2004 12:02 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 12:31:38 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 13:31:38 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Lembit.Soobik at t-online.de Mon Jul 12 12:44:44 2004 From: Lembit.Soobik at t-online.de (Lembit Soobik) Date: Mon, 12 Jul 2004 19:44:44 +0200 Subject: [AccessD] Date Ranges References: <27822843.1089629248821.JavaMail.www@wwinf3006> Message-ID: <09b901c46837$ec72c110$0400a8c0@S856> Paul, you may want to download the Collision check from our website. its just for such cases Lembit Lembit Soobik ----- Original Message ----- From: To: "accessd" Sent: Monday, July 12, 2004 12:47 PM Subject: [AccessD] Date Ranges To all, Either I am getting too old for this programming lark or just can't seem to think anymore. We have a personnel & absence database from which we can pull off reports on certain date ranges. The problem I have is that one person was off from 16/06/04 and isn't due to return until 14/08/04. One of the HR girls entered the dates 27/06/04 as the start date for a report and 07/07/04 and a finish date for the report...and this person didn't appear on the records cause basically I have if the DateFrom in their absence record is greater than equal to the start date they enter and to DateTo in the absence record is less than or equal to the finish date for the report it gives those records. How would I take into account anyone that is off at any point between the startdate and finishdate that we enter for a report. Thanks in advance for all your help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Mon Jul 12 13:01:48 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Mon, 12 Jul 2004 14:01:48 -0400 Subject: [AccessD] Access over network Message-ID: When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark From rjhjr at cox.net Mon Jul 12 13:20:23 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 12 Jul 2004 14:20:23 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> References: <20040712171723.WDOH1705.imf16aec.mail.bellsouth.net@SUSANONE> <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712182020.GA13260@kongemord.krig.net> On Mon, Jul 12, 2004 at 01:31:38PM -0400, Susan Harkins wrote: > Well, I did a poor job of asking that... > > My question is -- does checking a reference or modifying a reference using > the Reference object and its many properties and methods fall into either > category? No. >From a Knowledge Base article on Access: "Dim objAccess As Access.Application" This type of declaration is called early binding, which is fastest. The article's example of late binding is Dim objAccess As Object "Binding" refers to binding a variable to an object. Setting a reference tells your code where a predefined class can be found. Of course, you've got to set a reference to do early binding, so the two tend to get mixed together. From starkey at wanadoo.nl Mon Jul 12 13:30:46 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:30:46 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: Message-ID: <20040712182903.ECF5516536@smtp6.wanadoo.nl> Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Developer at UltraDNT.com Mon Jul 12 13:29:16 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Mon, 12 Jul 2004 14:29:16 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: <000801c4683e$26c9ffd0$6401a8c0@COA3> Susan: The early/late binding is entirely in the HOW, but how meaning in terms of creating and specifying the object type. By checking references, you are just being a good citizen and making sure your early binding is going to work. Ensuring a Word reference is Not "blnBroken" then dimming a Word.Application is still early binding (maybe we could call it "Dynamic Early-binding"); CreateObject("Word.Application") is still late-binding, no matter else you do. Steve PS: do you write for "Advisor"? If so, can you email me off-list? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 1:32 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 jimdettman at earthlink.net Mon Jul 12 13:30:30 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 12 Jul 2004 14:30:30 -0400 Subject: [AccessD] Access over network In-Reply-To: Message-ID: John, <> Opens it and pulls data as needed. If Access/JET (MDB) all data is processed on the client side. Server acts only as a file sharing device. If ADP, data is processed on the server and only the result set is returned. <> Not a good thing to do if Access/JET. JET was designed for LANs, not WANs. Your asking for trouble. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Monday, July 12, 2004 2:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Mon Jul 12 13:32:36 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 11:32:36 -0700 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Message-ID: But I'm not using 2000 or 97, except for testing. I work in 2002 and I think I'll stay there for a while. I've worked a lot with ADO but I'll be moving to .Net in the not too distant future, so I'll give 2003 a pass ... Except for testing. I'm not a hot for XML as many people, although it is a handy way to share data. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Monday, July 12, 2004 10:31 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Mon Jul 12 13:35:50 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:35:50 +0200 Subject: [AccessD] more on early versus late binding In-Reply-To: <000801c4683e$26c9ffd0$6401a8c0@COA3> Message-ID: <20040712183407.D13C716149@smtp6.wanadoo.nl> I'd call it pre-early binding;-) -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Steve Conklin (Developer at UltraDNT) Verzonden: maandag 12 juli 2004 20:29 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] more on early versus late binding Susan: The early/late binding is entirely in the HOW, but how meaning in terms of creating and specifying the object type. By checking references, you are just being a good citizen and making sure your early binding is going to work. Ensuring a Word reference is Not "blnBroken" then dimming a Word.Application is still early binding (maybe we could call it "Dynamic Early-binding"); CreateObject("Word.Application") is still late-binding, no matter else you do. Steve PS: do you write for "Advisor"? If so, can you email me off-list? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 1:32 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:35:50 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Mon Jul 12 13:39:07 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Mon, 12 Jul 2004 20:39:07 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ In-Reply-To: Message-ID: <20040712183724.CABD516800@smtp6.wanadoo.nl> I understand... I skipped 2002 on purpose since I haven't seen any office environment overhere working with it... Most of them still use A2K or 97. -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 20:33 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ But I'm not using 2000 or 97, except for testing. I work in 2002 and I think I'll stay there for a while. I've worked a lot with ADO but I'll be moving to .Net in the not too distant future, so I'll give 2003 a pass ... Except for testing. I'm not a hot for XML as many people, although it is a handy way to share data. Charlotte Foust -----Original Message----- From: StaRKeY [mailto:starkey at wanadoo.nl] Sent: Monday, July 12, 2004 10:31 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well Charlotte to be honest I'd recommend you should... I was using Office 2K on Win2K before upgrading to 2K3 and it went like a charme for me... Just like 1-2-3, updating no problems, even though the upgrade went from UK english to Dutch... First time for me a ms product installed so smoothly:-) And for those interested A2K3 is able to handle filesystems from 2K /2K2 and ofcourse 2K3 which is also a big plus not to mention the ability to use DotNet instead of VBA and a lot of other nice goodies... I think it's a good time to upgrade to 2K3 if you're still using A2K or A97, a lot of ADO stuff is actually working and improved like being updatable, more XML options... In short, I like it so far:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Charlotte Foust Verzonden: maandag 12 juli 2004 19:02 Aan: Access Developers discussion and problem solving Onderwerp: RE: Subject: RE: [AccessD] db1, 2, 3 ........ I don't think you mentioned A2003 in your original post. I haven't ventured into those water yet. Maybe I won't. ;-} Charlotte Foust -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Monday, July 12, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Well its good to know I'm not crazy. (At least on this particular subject. I told the voices if they didn't shut up I'd poke 'em with a Q tip again. that seemed to quiet them) :-) Jim Hale -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Saturday, July 10, 2004 2:04 PM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Yes, I have. Some other issues, I have ran into are: 1. Having to exit and restart Access again, after running an application, before being able to do anymore coding. 2. Having to install A2003, as many as four time before the product stabliized. 3. Having to reboot before A2003 will recognize an update even though it was not requested. There are a few other but those are the high-lights, Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hale, Jim Sent: Friday, July 09, 2004 9:16 AM To: 'Access Developers discussion and problem solving' Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ Slightly different question- have you run into cases where after "x" number of changes to code Access just decides not to run them, ie it just executes the old code and completely ignores the new? It is extremely annoying. The only cure I've found is to import everything into a new database container. Jim Hale -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Friday, July 09, 2004 10:16 AM To: Access Developers discussion and problem solving Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ The db1.mdb, etc., files are compacted copies of the database that couldn't be renamed, perhaps because the original couldn't be deleted for some reason. If you're spawning those, then you probably aren't actually compacting your database even though you may think you are. If the database is in a partially compiled state (this is a VBA project issue, not compact and repair), then that might be what is causing the problem. Try turning off the autocompact and then using the decompile switch to open the database and use the bypass key to avoid running any code. Then close the database, reopen without the decompile switch but using the bypass, and compile and save the VBA project. Then try turning compact on exit back on and see if that cures the problem. Charlotte Foust -----Original Message----- From: pedro at plex.nl [mailto:pedro at plex.nl] Sent: Friday, July 09, 2004 1:21 AM To: AccessD at databaseadvisors.com Subject: Subject: RE: [AccessD] db1, 2, 3 ........ Hello Charlotte, i indeed have turned on Compile (compact and repair) after Exit, and indeed its a permissions protected database. So i can delete these db1.mdb etc without any troubles?? Another question: Is compiling after exit a good option, because the fact that in this way the database several times a day wil be compacted. Pedro Janssen From: "Charlotte Foust" To: "Access Developers discussion and problem solving" Date: Thu, 8 Jul 2004 14:01:58 -0700 Subject: RE: [AccessD] db1, 2, 3 ........ Do you have Compile on Exit turned on? I've usually seen that kind of thing when the database attempted to compact but for some reason (often permissions), it couldn't delete the original and rename the db1.mdb, etc. Charlotte Foust -----Original Message----- From: Pedro Janssen [mailto:pedro at plex.nl] Sent: Thursday, July 08, 2004 12:56 PM To: AccessD at databaseadvisors.com Subject: [AccessD] db1, 2, 3 ........ Hello Group, i have an front & backend mdb on a server. The front-end creates temporary?? databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different filesize. Why is this and why are these not deleted automatically? TIA Pedro Janssen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:30:46 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 12-7-2004 20:39:07 avast! auteursrecht (c) 2000-2004 ALWIL Software. From cfoust at infostatsystems.com Mon Jul 12 13:37:32 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 12 Jul 2004 11:37:32 -0700 Subject: [AccessD] more on early versus late binding Message-ID: I certainly would call what I did in this respect early binding. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, July 12, 2004 9:17 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] more on early versus late binding This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 13:42:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:42:16 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712183407.D13C716149@smtp6.wanadoo.nl> Message-ID: <20040712184212.CJRF1775.imf19aec.mail.bellsouth.net@SUSANONE> There's one in every joint... ;) Susan H. I'd call it pre-early binding;-) From ssharkins at bellsouth.net Mon Jul 12 13:50:20 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:50:20 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040712185016.CPXG1775.imf19aec.mail.bellsouth.net@SUSANONE> I kind of see the terms early and late -- in Access -- a bit differently than the way most documentation wants to define them. To me, early just means the library is referenced, hence the objects are instantiated, but not being used -- late, the object is instantiated at the time it's needed -- the reference is implicit. I see a lot of documentation that refer to setting references manually via the References dialog box as "early" binding, but using the References collection and object are never mentioned -- however... Seems to me you're setting the reference and instantiating the objects without using them, so, to my mind, it's early. Susan H. I certainly would call what I did in this respect early binding. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Monday, July 12, 2004 9:17 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] more on early versus late binding This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 ssharkins at bellsouth.net Mon Jul 12 13:55:50 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 14:55:50 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712182020.GA13260@kongemord.krig.net> Message-ID: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> > > My question is -- does checking a reference or modifying a reference > using the Reference object and its many properties and methods fall > into either category? No. >From a Knowledge Base article on Access: "Dim objAccess As Access.Application" This type of declaration is called early binding, which is fastest. The article's example of late binding is Dim objAccess As Object "Binding" refers to binding a variable to an object. Setting a reference tells your code where a predefined class can be found. Of course, you've got to set a reference to do early binding, so the two tend to get mixed together. ===========Interesting take -- the terminology's the thing... :) So, the References collection and Reference objects are just explicit referencing -- nothing to do with binding other than it enables early binding -- OK. Susan H. From accessd at shaw.ca Mon Jul 12 14:08:09 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 12:08:09 -0700 Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL In-Reply-To: <40F1C0A2.1010407@shaw.ca> Message-ID: Hi Marty: Good information. I especially like you statemet "It is not plug and play. More like plug and pray."...it about sums it up. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Sunday, July 11, 2004 3:35 PM To: Access Developers discussion and problem solving Subject: [AccessD] INFO: Why You Should and Should Not Migrate to MySQL Just came across this article that gives both points of view Migrating from Microsoft SQL Server and Access to MySQL http://dev.mysql.com/tech-resources/articles/migrating-from-microsoft.html It also describe briefly some conversion methods and helpful programs Note that a lot of problems will be resolved by MySQL 5.0 where stored procedures, triggers and views have been introduced, although the stored procedure syntax will vary in some degree from Microsoft's T-SQL language. However MySQL 5.0 is still in alpha which was released in Febuary. You will have problems with the various dialects of SQL like T-SQL from Microsoft or PL-SQL from Oracle. It is not plug and play. More like plug and pray. MySQL Server has many extensions to the SQL standard (so does everyone else), but does have a startup switch to use only ANSI SQL:2003 compliant code. MySQL does have a heavier duty database MAXDB from SAP which uses an Oracle like SQL syntax, there are perhaps problems with the ODBC bridge to MAXDB. I have connected to it using Access, but nothing heavy duty. Also, there is no OLEDB bridge yet to MySQL, for use with .Net, the people I have heard who know how to write this (they are thin on the ground) want cash to write it. Open Source is fine, but not if you have to take off three months to write and test this. Probably MYSQL or SAP will pay for it. -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Mon Jul 12 14:46:35 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 15:46:35 -0400 Subject: [AccessD] Summing Time is missing minutes In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 From rbgajewski at adelphia.net Mon Jul 12 14:58:47 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 15:58:47 -0400 Subject: [AccessD] Summing Time is missing minutes (fixed typo) In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 From DWUTKA at marlow.com Mon Jul 12 15:23:54 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 12 Jul 2004 15:23:54 -0500 Subject: [AccessD] Microsoft Access Annoyances Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB111@main2.marlow.com> The fact that Access 2000 and up, which use VBA 6.0, allow for the use of AddressOf of a Public function, but when an API callback is used, if you ever go into the VBE, you'll lock up Access. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bob Heygood Sent: Monday, July 12, 2004 8:50 AM To: Access Developers discussion and problem solving Subject: [AccessD] Microsoft Access Annoyances Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From donald.a.Mcgillivray at mail.sprint.com Mon Jul 12 15:28:49 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Mon, 12 Jul 2004 15:28:49 -0500 Subject: [AccessD] Summing Time is missing minutes Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEA1C@PKDWB01C.ad.sprint.com> Bob, When you wrap a value in a Format function, the result is returned as a string (as you obviously know.) When you convert that string using the Val function, the conversion halts at the first non-numeric character in the string, in your case the colon between the hours and minutes. You'll have to convert the string to a time value again before summing and reformatting. HTH, Don -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Gajewski Sent: Monday, July 12, 2004 12:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Mon Jul 12 16:54:13 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 12 Jul 2004 17:54:13 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> References: <20040712182020.GA13260@kongemord.krig.net> <20040712185547.CTPX1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040712215410.GB15891@kongemord.krig.net> On Mon, Jul 12, 2004 at 02:55:50PM -0400, Susan Harkins wrote: > > > > My question is -- does checking a reference or modifying a reference > > using the Reference object and its many properties and methods fall > > into either category? > > No. > > From a Knowledge Base article on Access: > > "Dim objAccess As Access.Application" > This type of declaration is called early binding, which is fastest. > > The article's example of late binding is > > Dim objAccess As Object > > "Binding" refers to binding a variable to an object. Setting a reference > tells your code where a predefined class can be found. Of course, you've got > to set a reference to do early binding, so the two tend to get mixed > together. > > ===========Interesting take -- the terminology's the thing... :) So, the > References collection and Reference objects are just explicit referencing -- > nothing to do with binding other than it enables early binding -- OK. Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. From donald.a.Mcgillivray at mail.sprint.com Mon Jul 12 17:38:27 2004 From: donald.a.Mcgillivray at mail.sprint.com (Mcgillivray, Donald [ITS]) Date: Mon, 12 Jul 2004 17:38:27 -0500 Subject: [AccessD] more on early versus late binding Message-ID: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> To the extent that I can call myself a programmer (not far I promise!) I'm totally self-taught, so when topics like this come up, I follow them with an eye toward expanding my knowledge and understanding of the finer points. That said, I'm not sure I follow the distinction between the two examples you cite. True, one assigns a specific value directly to the variable, while the other calls a separate function to do so, but the choice of one over the other is less a matter of speed versus flexibility than it is a matter of what's available at runtime to assign to the variable. If the value is unknown until retrieved via some other process, there really isn't much choice, is there? Similarly, if the value IS known and can be reliably coded into the procedure (number of days in a week, for example), why run some other procedure to retrieve it? Whether "hard-coded" or dynamic, neither one actually does anything until the code is run, right? Or am I misunderstanding something in the concept being illustrated? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Hall Sent: Monday, July 12, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] more on early versus late binding Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 17:49:01 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 15:49:01 -0700 Subject: [AccessD] Microsoft Access Annoyances In-Reply-To: Message-ID: Hi Bob: I will post it on our front web page and see if it catches any other surfers. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bob Heygood Sent: Monday, July 12, 2004 6:50 AM To: Access Developers discussion and problem solving Subject: [AccessD] Microsoft Access Annoyances Hey to the group, I received the letter below and thought that some of the group might like to contribute. Bob Heygood Dear User Group Leader: O'Reilly is pulling together a new book called "Microsoft Access Annoyances" and, once again, we'd like your help! As you might guess, "Access Annoyances" ponders the problems, snarls, quirks, bugs, and just dumb things about Access that drive users nuts. The annoyances will encompass a range of topics: the Access interface, entering data, queries, reporting hassles, VBA, moving data to and from Excel and SQL databases, data tables, expressions, macros, deployment, security--well, you get the idea. If any members of your group use Access--be they newbies or Access masters--and they have annoyances they'd like to see solved, have them email marsee at oreilly.com with "Access Annoyances" in the subject line. Just have them note what version of Access and Windows they're using. As always, thanks for sharing. We'll make sure to get copies of "Access Annoyances" sent to your group shortly after publication. --Marsee -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 18:06:35 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 16:06:35 -0700 Subject: [AccessD] Access over network In-Reply-To: Message-ID: Hi John: I believe it is the works. Generally not a issue with fast connection and a FE of 100MB or less. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Monday, July 12, 2004 11:02 AM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 12 18:06:34 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 12 Jul 2004 16:06:34 -0700 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712173134.WNAA1705.imf16aec.mail.bellsouth.net@SUSANONE> Message-ID: Hi Susan: If I am reading this correctly, merely checking the reference does not fall into either. Only when the 'declaring' is performed can the binding type be ascertained. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 10:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 davide at dalyn.co.nz Mon Jul 12 18:10:20 2004 From: davide at dalyn.co.nz (David Emerson) Date: Tue, 13 Jul 2004 11:10:20 +1200 Subject: [AccessD] Recording field changes In-Reply-To: <1613474466.20040712092217@cactus.dk> References: <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> <5.2.0.9.0.20040712173311.00b2d1d0@mail.dalyn.co.nz> Message-ID: <5.2.0.9.0.20040713111006.00b4e5d8@mail.dalyn.co.nz> Thanks Gustav. David At 12/07/2004, you wrote: >Hi David > >If you store the ListIndex of the old selection, you can look up the >value of any column directly: > > ' Save index of selected row. > lngListIndex = Me!cboC.ListIndex > ... > > ... > ' Look up value of Column(1) or row lngListIndex. > strOldValue = Me!cboC.Column(1, lngListIndex) > >/gustav > > > > I have finally got round to implementing Bob's code. It is working well > > but I have a problem with combo boxes. In cases where there are more than > > 1 columns and the first column is an ID number, I would like to show the > > 2nd column value (which is what is shown on the screen as the first column > > is 0cm width). > > > I can get the new value of the combo box with "C.Column(1)" (C is > dimmed as > > a control). How do I get the old value of the 2nd column though? > > > David > > > At 21/06/2004, you wrote: > >>Hi David, > >> > >>You could play with adding a memo field to your form's record source > >>called "Updates", add a textbox control to your form thats bound to > >>"Updates" (you can hide this field if you like), add =AuditTrailX() as a > >>function call in your form's Before Update event, then add the following > >>module to your project. Wish I could remember where this came from but i > >>can't. The code iterates through all the data entry controls in your > >>form's controls collection, recording old and new values for only those > >>fields that have changed. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 12 18:38:01 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 19:38:01 -0400 Subject: [AccessD] Access over network In-Reply-To: Message-ID: <000901c46869$4584c380$0501a8c0@colbyws> It pulls the pieces on an as needed basis. For example, if you try to open a form, it will pull form itself, the queries for the form and all controls such as combos (if stored as queries, else they are just SQL in the form definition itself). Then the data required to populate the form and controls. Etc. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Monday, July 12, 2004 2:02 PM To: accessd at databaseadvisors.com Subject: [AccessD] Access over network When you open an Access DB, over a network, does it pull the whole DB over, or does it just open it, until the data is needed? This has been coming up quite a bit lately. Not so much for my programs, but for 'other' stuff. For instance we currently have an imaging program, which has a Access DB behind it. They are trying to run this between offices, which are about 25 miles apart. Thanks John W Clark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Mon Jul 12 18:40:06 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Mon, 12 Jul 2004 19:40:06 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040712234002.PJID1737.imf24aec.mail.bellsouth.net@SUSANONE> I agree -- completely. Susan H. Hi Susan: If I am reading this correctly, merely checking the reference does not fall into either. Only when the 'declaring' is performed can the binding type be ascertained. Jim Well, I did a poor job of asking that... My question is -- does checking a reference or modifying a reference using the Reference object and its many properties and methods fall into either category? When seems to be the defining issue, not how -- right? Susan H. This is a question of just terminology. I understand the difference between early and late binding, so nobody needs to launch into an exhaustive explanation. :) My question takes us back to the VBA's buggy References collection and Reference object. I'm assuming that if you decided to use the available properties and methods to set references this way, you'd consider it early binding. Anyone disagree? 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 Mon Jul 12 19:11:35 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 10:11:35 +1000 Subject: [AccessD] Date Ranges In-Reply-To: <000301c4680a$ea666fc0$3500a8c0@dabsight> References: <000e01c46804$c76a3200$cc0aa845@hargrove.internal> Message-ID: <40F3B556.968.210337B@lexacorp.com.pg> On 12 Jul 2004 at 13:22, DJK(John) Robinson wrote: > Not enough, sorry, Doris. > > Paul, what you need is this: > > start date between DateFrom and DateTo > OR finish date between DateFrom and DateTo > OR (start date before DateFrom AND finish date after DateTo) > Why not just StartDate <= DateTo and FinishDate >= DateFrom -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From KP at sdsonline.net Mon Jul 12 20:16:50 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 11:16:50 +1000 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <003a01c46877$13c4fb90$6501a8c0@user> I need to set up an overnight task in Windows Scheduler, (Win XP Pro) to open an Access database. This is what I have put in the 'Run' line, but I don't get even a flicker from it. "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd AutoRun The TestBatch.mdb has a startup form, with this 'On Open' event: -------------------------------------------------------------------------------- Private Sub Form_Open(Cancel As Integer) If Command$ = "AutoRun" Then MsgBox ("In") ' Call procedure(s) to perform the necessary tasks. 'Call BasProcessItems End If End Sub -------------------------------------------------------------------------------- This one is urgent - any help?? Kath Pelletti Software Design & Solutions Pty Ltd. Ph: 9505-6714 Fax: 9505-6430 KP at SDSOnline.net From jwcolby at colbyconsulting.com Mon Jul 12 20:28:34 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 21:28:34 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712185016.CPXG1775.imf19aec.mail.bellsouth.net@SUSANONE> Message-ID: <000a01c46878$b7138310$0501a8c0@colbyws> Nope, early is not that, and late is not that. Early is dimensioning a variable as a specific object type - for example as an excel object or a word object or a command control etc. then referencing the object properties directly. Dim cbo as combo debug.print cbo.Name Late is dimensioning a variable as an OBJECT data type, then referencing the property but using the "object object". Dim cbo as object debug.print cbo.name The reason it is called early and late is simply that early binding: Dim cbo as combo Causes the compiler (interpreter actually) to find and set a reference to the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. Late binding causes the interpreter to "discover" what the object is by what is stored in the variable AT RUN TIME and look up the properties and stuff in the actual object (library, ocx etc) at run time. Thus the early binding causes the map of dim to real thing without ever even running the code. Late binding simply cannot discover what to do with the dimensioned variable until the variable is set = to something. This is very often used to pass in different things to a function for example. Function MyObject(obj as object) debug.print object.name End function Function TestObjects() MyObject MyCbo MyObject MyForm End function MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word document, a combo box. What happens inside of MyObject may or may not be legal depending on what you pass in to the function, but you can pass in ANY OBJECT AT ALL because the compiler does not check the dimensioned type against the passed in type (other than to determine that it is an object). Function MyControl(txt As TextBox) Debug.Print txt.Name End Function Function TestControls() Dim MyCbo As ComboBox Dim MyTextBox As TextBox Dim MyForm As Form Set MyForm = New Form_Form1 MyControl MyForm '<<<<< ERROR AT RUN TIME MyControl MyCbo MyControl MyTextBox End Function Test control will correctly pass in controls but won't run since MyForm is dimensioned as a form and at RUN TIME the interpreter checks all calls to MyControl to see if what is being passed in is a variable of type control. With early binding, since you dimension an object specifically to its object type, you can use intellisense because the compiler knows how to find the object information. With late binding, the object type isn't determined until something is actually passed in so how can intellisense help you out. Hope this helps explain what early and late binding are really all about. Now... Setting the reference really has nothing to do with any of this OTHER THAN allowing some specific object type to be found in a library, and thus be dimensioned to a specific object type. IOW, If I don't reference the excel library, I can STILL USE EXCEL, but I have to late bind, dim as an object, then store an Excel object (spreadsheet, cell etc) in the variable. If I reference the excel library, now I can early bind and dimension a variable as a spreadsheet, or a cell, or whatever I want since those things can be found in a referenced library. So setting the reference is neither early binding nor late binding. It ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel in any way whatsoever. However I cannot reference an excel object type (dim a variable as a cell or spreadsheet etc) unless I reference the Excel library. Referencing a library does nothing more than load (before compiling) a table of objects inside that library into a table of all possible objects for the compiler to use to look up dimension statement datatypes in. If a dimension statement datatype is not found in the table of all possible datatypes, then a compile error is thrown on the dim statement. Clear as mud? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins Sent: Monday, July 12, 2004 2:50 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding I kind of see the terms early and late -- in Access -- a bit differently than the way most documentation wants to define them. To me, early just means the library is referenced, hence the objects are instantiated, but not being used -- late, the object is instantiated at the time it's needed -- the reference is implicit. I see a lot of documentation that refer to setting references manually via the References dialog box as "early" binding, but using the References collection and object are never mentioned -- however... Seems to me you're setting the reference and instantiating the objects without using them, so, to my mind, it's early. Susan H. From jwcolby at colbyconsulting.com Mon Jul 12 20:39:20 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Mon, 12 Jul 2004 21:39:20 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040712215410.GB15891@kongemord.krig.net> Message-ID: <000b01c4687a$37f6b370$0501a8c0@colbyws> >The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Not exactly true. If Function ReadSomeFileAndFetchWibbleValue() as String (for example) then the returned value is a string and the compiler can check that the function is returning the same data type as lngWibble. Early binding (kind of). If: Function ReadSomeFileAndFetchWibbleValue() Then the returned value is a variant (in VB anyway) and the process will still work correctly due to coercion however it is "late bound" (kind of). In fact early and late binding don't really apply to built in data types such as strings and numbers (in VB at any rate) since these are not objects. Objects are typically classes or OCXs etc which have methods and properties. In .Net however, even variables such as integers and strings are objects with methods and properties so all of a sudden early and late binding might just apply to them... John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Hall Sent: Monday, July 12, 2004 5:54 PM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] more on early versus late binding On Mon, Jul 12, 2004 at 02:55:50PM -0400, Susan Harkins wrote: > > > > My question is -- does checking a reference or modifying a reference > > using the Reference object and its many properties and methods fall > > into either category? > > No. > > From a Knowledge Base article on Access: > > "Dim objAccess As Access.Application" > This type of declaration is called early binding, which is > fastest. > > The article's example of late binding is > > Dim objAccess As Object > > "Binding" refers to binding a variable to an object. Setting a > reference tells your code where a predefined class can be found. Of > course, you've got to set a reference to do early binding, so the two > tend to get mixed together. > > ===========Interesting take -- the terminology's the thing... :) So, > the References collection and Reference objects are just explicit > referencing -- nothing to do with binding other than it enables early > binding -- OK. Right. Early and late binding are generic coding concepts; they have nothing to do with Microsoft or the Reference collection. The line lngWibble = 47 is an example of early binding; the variable is bound to the specific value when the code is written. Note that the Reference collection isn't involved. The line lngWibble = ReadSomeFileAndFetchWibbleValue() is late binding. The variable isn't bound to the specific value until the code is run. Generally, late binding gives you more flexibility and early binding gives you more speed. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Mon Jul 12 21:40:04 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Mon, 12 Jul 2004 22:40:04 -0400 Subject: [AccessD] Summing Time is missing minutes SOLVED In-Reply-To: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEA1C@PKDWB01C.ad.sprint.com> Message-ID: Don That was certainly it! sttlTimeDiff: Format(Sum(IIf([EndTime]>[StartTime],[EndTime]-[StartTime],(DateAdd("d",1,[E ndTime]-[StartTime]))),"h:nn") ttlTimeDiff: Format(Sum(IIf([EndTime]>[StartTime],[EndTime]-[StartTime],(DateAdd("d",1,[E ndTime]-[StartTime]))),"h:nn") The only difference with this is that the subtotals and totals now print as hours and minutes (5:30) instead of hours (5.5). That works fine for this application. Thanks a HUGE BUNCH! As always, this list is great!!! Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mcgillivray, Donald [ITS] Sent: Monday, July 12, 2004 16:29 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Bob, When you wrap a value in a Format function, the result is returned as a string (as you obviously know.) When you convert that string using the Val function, the conversion halts at the first non-numeric character in the string, in your case the colon between the hours and minutes. You'll have to convert the string to a time value again before summing and reformatting. HTH, Don -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bob Gajewski Sent: Monday, July 12, 2004 12:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Summing Time is missing minutes Dear Group: This is a similar issue to the recent one about summing time. I have two actual fields and one calculated field in each detail record: StartTime EndTime txtTimeDiff (calculated) On the report, I print the StartTime, EndTime, and txtTimeDiff - all using Short Time format. I group and subtotal the data at the deepest level. The detail records show the true time difference (such as 02:30 for two and one-half hours difference). PROBLEM: My subtotals and totals for the txtTimeDiff are only adding the integers (hours); not the minutes (In the above example, it is only adding two hours). All my fields are set to one decimal place. Any suggestions where I have gone awry? Below is the code and a sample output: TIA Bob Gajewski REPORT CODE ==================================================== rptMembers FullName Header IncidentClassMajorName Header IncidentClassMinorName Header Detail [PageNumber] [StartTime] [EndTime] [txtTimeDiff] txtTimeDiff: IIf([EndTime]>[StartTime],Format([EndTime]-[StartTime],"Short Time"),Format(DateAdd("d",1,[EndTime]-[StartTime]),"Short Time")) IncidentClassMinorName Footer [sttlCountIncidentID] [sttlTimeDiff] sttlCountIncidentID: Count([IncidentID]) sttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 IncidentClassMajorName Footer FullName Footer [ttlCountIncidentID] ttlCountIncidentID: Count([IncidentID]) ttlTimeDiff: Sum(Val([txtTimeDiff])) Format 0.0 REPORT SAMPLE OUTPUT ==================================================== Jones, John Drill Fire Drill 19:00 20:00 01:00 19:00 20:30 01:30 STTL 2 2.0 hrs 'should be 2.5 EMS Drill 23:00 02:00 03:00 19:30 21:00 01:30 10:00 15:30 05:30 STTL 3 8.0 hrs 'should be 9.0 TTL 5 10.0 hrs 'should be 11.5 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Tue Jul 13 00:28:46 2004 From: rjhjr at cox.net (Bob Hall) Date: Tue, 13 Jul 2004 01:28:46 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> References: <6FC1C7A6E7BD5540AB0A8436713C43BF099BEB27@PKDWB01C.ad.sprint.com> Message-ID: <20040713052844.GL19664@kongemord.krig.net> On Mon, Jul 12, 2004 at 05:38:27PM -0500, Mcgillivray, Donald [ITS] wrote: > To the extent that I can call myself a programmer (not far I promise!) > I'm totally self-taught, so when topics like this come up, I follow them > with an eye toward expanding my knowledge and understanding of the finer > points. That said, I'm not sure I follow the distinction between the > two examples you cite. True, one assigns a specific value directly to > the variable, while the other calls a separate function to do so, but > the choice of one over the other is less a matter of speed versus > flexibility than it is a matter of what's available at runtime to assign > to the variable. If the value is unknown until retrieved via some other > process, there really isn't much choice, is there? Similarly, if the > value IS known and can be reliably coded into the procedure (number of > days in a week, for example), why run some other procedure to retrieve > it? Whether "hard-coded" or dynamic, neither one actually does anything > until the code is run, right? Or am I misunderstanding something in the > concept being illustrated? If you bind a variable early, e.g. lngWibble = 47 then you have to go into the code and change the code if you want to change the value you are binding to lngWibble. If you bind late, e.g. lngWibble = ReadSomeFileAndFetchWibbleValue() then you can change the value assigned to lngWibble by changing data in the file. Any can do this with a text editor and it doesn't require rewriting and recompiling the code. Configuration files all work this way. From andy at minstersystems.co.uk Tue Jul 13 02:05:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 08:05:18 +0100 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <003a01c46877$13c4fb90$6501a8c0@user> Message-ID: <000701c468a7$cdb38d20$b274d0d5@minster33c3r25> Kath Unless it's changed in A2K the command line in A97 would end ".... /x Autorun" not /cmd. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kath Pelletti > Sent: 13 July 2004 02:17 > To: AccessD at databaseadvisors.com > Subject: [AccessD] Scheduled Access task - URGENT > > > I need to set up an overnight task in Windows Scheduler, (Win > XP Pro) to open an Access database. This is what I have put > in the 'Run' line, but I don't get even a flicker from it. > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd AutoRun > > The TestBatch.mdb has a startup form, with this 'On Open' event: > > -------------------------------------------------------------- > ------------------ > > Private Sub Form_Open(Cancel As Integer) > If Command$ = "AutoRun" Then > MsgBox ("In") > ' Call procedure(s) to perform the necessary tasks. > 'Call BasProcessItems > End If > > End Sub > > -------------------------------------------------------------- > ------------------ > > > This one is urgent - any help?? > > > Kath Pelletti > Software Design & Solutions Pty Ltd. > Ph: 9505-6714 > Fax: 9505-6430 > KP at SDSOnline.net > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From stuart at lexacorp.com.pg Tue Jul 13 02:12:34 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 17:12:34 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <000701c468a7$cdb38d20$b274d0d5@minster33c3r25> References: <003a01c46877$13c4fb90$6501a8c0@user> Message-ID: <40F41802.18104.391A06D@lexacorp.com.pg> On 13 Jul 2004 at 8:05, Andy Lacey wrote: > Kath > Unless it's changed in A2K the command line in A97 would end ".... /x > Autorun" not /cmd. > "/cmd commands" is the correct syntax to pass command line arguments. "/x macroname" is used to run the named macro on startup. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From rjhjr at cox.net Tue Jul 13 02:27:28 2004 From: rjhjr at cox.net (Bob Hall) Date: Tue, 13 Jul 2004 03:27:28 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <000b01c4687a$37f6b370$0501a8c0@colbyws> References: <20040712215410.GB15891@kongemord.krig.net> <000b01c4687a$37f6b370$0501a8c0@colbyws> Message-ID: <20040713072725.GM19664@kongemord.krig.net> On Mon, Jul 12, 2004 at 09:39:20PM -0400, jwcolby wrote: > >The line > lngWibble = ReadSomeFileAndFetchWibbleValue() > is late binding. The variable isn't bound to the specific value until the > code is run. > > > Not exactly true. If My example comes from a book published by Microsoft call "Code Complete". > In fact early and late binding don't really apply to built in data types > such as strings and numbers (in VB at any rate) since these are not objects. It doesn't matter whether we're talking about primitive data types or user defined classes. Strings, numbers, and objects are all instances of of types (classes). The only difference between a primitive type and a user defined class is the "user defined". When you declare a String or Integer variable, you actually are declaring an object that gets it's operations and properties from its type. The extra work involved in declaring a VBA object is due to the fact that it isn't an instance of a primitive type. Since it's not built in to the language, you have to do extra work to tell VBA what it is. > Objects are typically classes or OCXs etc which have methods and properties. Both classes and primitive data types have operations and properties. The fact that class operations are called methods and are called using a different syntax doesn't change the fact that they are the same thing. You obviously can't have primitive types inheriting procedures from other types; it wouldn't have any point. But type operators are overloaded; the "+" operator does one thing with numbers and another with strings. And integer multiplication is not the same as floating point mulitiplication. So where it is relevant, primitive and non-primitive types act the same way. Early and late binding can be used in purely non-OOP languages. A definition: "early binding: A characteristic of programming languages that perform most bindings during translation, usually to achieve execution efficiency. For example, COBOL, Fortran, Pascal." And a binding doesn't have to involve an object. An example of early binding from Java: int wibble = 47; I've seen early and late binding discussed in terms of variable names, function names, and object names. From KP at sdsonline.net Tue Jul 13 02:38:59 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 17:38:59 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <003a01c46877$13c4fb90$6501a8c0@user> <40F41802.18104.391A06D@lexacorp.com.pg> Message-ID: <002101c468ac$767577d0$6501a8c0@user> Does anyone have a line currently working as a scheduled task to open an .mdb? I would love to see the syntax. Kath ----- Original Message ----- From: Stuart McLachlan To: Access Developers discussion and problemsolving Sent: Tuesday, July 13, 2004 5:12 PM Subject: RE: [AccessD] Scheduled Access task - URGENT On 13 Jul 2004 at 8:05, Andy Lacey wrote: > Kath > Unless it's changed in A2K the command line in A97 would end ".... /x > Autorun" not /cmd. > "/cmd commands" is the correct syntax to pass command line arguments. "/x macroname" is used to run the named macro on startup. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 03:30:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 10:30:19 +0200 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002101c468ac$767577d0$6501a8c0@user> References: <003a01c46877$13c4fb90$6501a8c0@user> <40F41802.18104.391A06D@lexacorp.com.pg> <002101c468ac$767577d0$6501a8c0@user> Message-ID: <1497137242.20040713103019@cactus.dk> Hi Kath I think you need to modify "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd AutoRun to "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" /cmd "AutoRun" One line, of course. A Space must separate the parts. /gustav > Does anyone have a line currently working as a scheduled task to open an .mdb? I would love to see the syntax. From viner at eunet.yu Tue Jul 13 03:46:58 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 13 Jul 2004 10:46:58 +0200 Subject: [AccessD] Batch printing the .doc files from a folder Message-ID: <002201c468b6$18217940$0100a8c0@razvoj> Hi, there are a plenty of .doc files in a particular folder, and I want to print them without manually opening every single file. I'm interested in VBA or .bat or whatever solution! Many TIA's Ervin From stuart at lexacorp.com.pg Tue Jul 13 04:10:08 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 19:10:08 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <1497137242.20040713103019@cactus.dk> References: <002101c468ac$767577d0$6501a8c0@user> Message-ID: <40F43390.8329.3FD439A@lexacorp.com.pg> On 13 Jul 2004 at 10:30, Gustav Brock wrote: > Hi Kath > > I think you need to modify > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd AutoRun > > to > > "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" > "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" > /cmd "AutoRun" > It works fine for me without quotes around the argument(s) Trying to find Kath's problem, this works as expected and a message box displays the two words when called from a form's on_open "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test Argument It works fine whether in a shortcut or a batch file (Win2K, A2K) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Tue Jul 13 04:25:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 11:25:08 +0200 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <40F43390.8329.3FD439A@lexacorp.com.pg> References: <002101c468ac$767577d0$6501a8c0@user> <40F43390.8329.3FD439A@lexacorp.com.pg> Message-ID: <7710425821.20040713112508@cactus.dk> Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) From gustav at cactus.dk Tue Jul 13 04:52:58 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 11:52:58 +0200 Subject: [AccessD] Rotate label in report design Message-ID: <12712096533.20040713115258@cactus.dk> Hi all If you set property Vertical to True, text is written up-down. Can it somehow be rotated 180 degrees to be down-up? Stephen Lebans features a RotateText ocx but I would rather be without an ocx. /gustav From andy at minstersystems.co.uk Tue Jul 13 06:17:53 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 12:17:53 +0100 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <20040713111751.5E90424CB3F@smtp.nildram.co.uk> Oops sorry! -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] Scheduled Access task - URGENT Date: 13/07/04 07:14 > > On 13 Jul 2004 at 8:05, Andy Lacey wrote: > > > Kath > > Unless it's changed in A2K the command line in A97 would end ".... /x > > Autorun" not /cmd. > > > > "/cmd commands" is the correct syntax to pass command line arguments. > "/x macroname" is used to run the named macro on startup. > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 From Mark.Mitsules at ngc.com Tue Jul 13 07:02:10 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 13 Jul 2004 08:02:10 -0400 Subject: [AccessD] Batch printing the .doc files from a folder Message-ID: Ervin, The quickest, simplest way I know of is to highlight them all, right-click, and choose print. They will each open, print, and close automatically. Mark -----Original Message----- From: Ervin Brindza [mailto:viner at eunet.yu] Sent: Tuesday, July 13, 2004 4:47 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Batch printing the .doc files from a folder Hi, there are a plenty of .doc files in a particular folder, and I want to print them without manually opening every single file. I'm interested in VBA or .bat or whatever solution! Many TIA's Ervin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KP at sdsonline.net Tue Jul 13 07:27:12 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Tue, 13 Jul 2004 22:27:12 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <002101c468ac$767577d0$6501a8c0@user><40F43390.8329.3FD439A@lexacorp.com.pg> <7710425821.20040713112508@cactus.dk> Message-ID: <002d01c468d4$b9feb750$6501a8c0@user> Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From viner at eunet.yu Tue Jul 13 07:08:04 2004 From: viner at eunet.yu (Ervin Brindza) Date: Tue, 13 Jul 2004 14:08:04 +0200 Subject: [AccessD] Batch printing the .doc files from a folder References: Message-ID: <000201c468d6$f05e04c0$0100a8c0@razvoj> Mark, many thanks for the suggestion, but my customer want a single button push :-( Ervin ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 2:02 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Ervin, > > The quickest, simplest way I know of is to highlight them all, right-click, > and choose print. They will each open, print, and close automatically. > > > Mark > > > -----Original Message----- > From: Ervin Brindza [mailto:viner at eunet.yu] > Sent: Tuesday, July 13, 2004 4:47 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Batch printing the .doc files from a folder > > > Hi, > there are a plenty of .doc files in a particular folder, and I want to print > them without manually opening every single file. I'm interested in VBA or > .bat or whatever solution! > Many TIA's > Ervin > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Tue Jul 13 07:55:14 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 13 Jul 2004 08:55:14 -0400 Subject: [AccessD] Linked Table Permissions Message-ID: I need someone to refresh my memory. I have db 'A' in a folder 'A', secured using NTFS folder permissions. If I place db 'B' in a unrestricted folder 'B' and "link" to the tables in db 'A'...who can open these linked tables or run queries based on these linked tables? 1. Only those with permissions to folder 'A'. 2. All those with permissions to folder 'B'. Mark From stuart at lexacorp.com.pg Tue Jul 13 08:12:17 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 13 Jul 2004 23:12:17 +1000 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002d01c468d4$b9feb750$6501a8c0@user> Message-ID: <40F46C51.29911.4DAF67C@lexacorp.com.pg> On 13 Jul 2004 at 22:27, Kath Pelletti wrote: > Hi Gustav / Stuart / Andy - thanks for suggestions - > > I can't get it to work with or without the quotes around the Autorun parameter. > > This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. > > My syntax works as a shortcut, but simply does not run as a scheduled task. > > To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? > With the attached test.mdb (not attached to list reply) in C:\ I've just run a scheduled task with the comand line "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmd Test Argument It works fine (opens the mdb and displays two message boxes, once from a function called in the Autoexec macro and a second one called from the startup forms on_open. Having just set up the task, the thought struck me that you may not have set the run permissions for the task properly. You need to set the "Run as" and password for the task. Attachments: C:\test.mdb -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From andy at minstersystems.co.uk Tue Jul 13 09:23:16 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 13 Jul 2004 15:23:16 +0100 Subject: [AccessD] Scheduled Access task - URGENT Message-ID: <20040713142313.2B58925198F@smtp.nildram.co.uk> Kath You haven't got an Autoexec macro that's interfering have you? That'll always get called first. -- Andy Lacey http://www.minstersystems.co.uk ________________________________________________ Message sent using UebiMiau 2.7.2 From paul.hartland at fsmail.net Tue Jul 13 09:38:27 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 16:38:27 +0200 (CEST) Subject: [AccessD] DateDiff or other function Message-ID: <16697945.1089729507920.JavaMail.www@wwinf3002> To all, Our financial year starts at 1st April and all I?m trying to do is get the number of weeks between 1st April and any date a user types in. I have just played with datediff for around 30 minutes using something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I used 12/07/04 for the me.txtDate which is around 16 weeks but I?m getting 28. Can someone tell me where I can find the answer or send me an example of how to do this please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From stuart at lexacorp.com.pg Tue Jul 13 09:54:44 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jul 2004 00:54:44 +1000 Subject: [AccessD] DateDiff or other function In-Reply-To: <16697945.1089729507920.JavaMail.www@wwinf3002> Message-ID: <40F48454.20605.538C0BD@lexacorp.com.pg> On 13 Jul 2004 at 16:38, paul.hartland at fsmail.net wrote: > To all, Our financial year starts at 1st April and all I?m trying to do > is get the number of weeks between 1st April and any date a user types > in. I have just played with datediff for around 30 minutes using > something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I > used 12/07/04 for the me.txtDate which is around 16 weeks but I?m > getting 28. Can someone tell me where I can find the answer or send > me an example of how to do this please. Thanks in advance for any help. Looks like an internationalisation issue. Is 01/04/04 1 April or 4 January 04? Try using an unambigous form like Datediff("ww","1 apr 04",me.txtdate) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mikedorism at adelphia.net Tue Jul 13 10:14:57 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jul 2004 11:14:57 -0400 Subject: [AccessD] Linked Table Permissions In-Reply-To: Message-ID: <000001c468ec$28d51400$cc0aa845@hargrove.internal> Combination of the two... All those with permissions to folder 'B' who have permissions to folder 'A' Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Tuesday, July 13, 2004 8:55 AM To: [AccessD] Subject: [AccessD] Linked Table Permissions I need someone to refresh my memory. I have db 'A' in a folder 'A', secured using NTFS folder permissions. If I place db 'B' in a unrestricted folder 'B' and "link" to the tables in db 'A'...who can open these linked tables or run queries based on these linked tables? 1. Only those with permissions to folder 'A'. 2. All those with permissions to folder 'B'. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Tue Jul 13 10:14:01 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 17:14:01 +0200 (CEST) Subject: [AccessD] DateDiff or other function Message-ID: <19763086.1089731641991.JavaMail.www@wwinf3002> Thanks, works perfect like that..... Message date : Jul 13 2004, 03:56 PM >From : "Stuart McLachlan" To : "Access Developers discussion and problem solving" Copy to : Subject : Re: [AccessD] DateDiff or other function On 13 Jul 2004 at 16:38, paul.hartland at fsmail.net wrote: > To all, Our financial year starts at 1st April and all I?m trying to do > is get the number of weeks between 1st April and any date a user types > in. I have just played with datediff for around 30 minutes using > something similar to intWeeks = Datediff(?ww?,01/04/04,Me.txtDate) I > used 12/07/04 for the me.txtDate which is around 16 weeks but I?m > getting 28. Can someone tell me where I can find the answer or send > me an example of how to do this please. Thanks in advance for any help. Looks like an internationalisation issue. Is 01/04/04 1 April or 4 January 04? Try using an unambigous form like Datediff("ww","1 apr 04",me.txtdate) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From bchacc at san.rr.com Tue Jul 13 10:17:48 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 08:17:48 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <00ff01c468ec$8e96baf0$6601a8c0@HAL9002> Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is From mikedorism at adelphia.net Tue Jul 13 10:21:47 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 13 Jul 2004 11:21:47 -0400 Subject: [AccessD] DateDiff or other function In-Reply-To: <16697945.1089729507920.JavaMail.www@wwinf3002> Message-ID: <000101c468ed$1cf5dfb0$cc0aa845@hargrove.internal> You need to specify the FirstWeekOfYear...A constant that specifies the first week of the year. If not specified, the first week is assumed to be the week in which January 1 occurs. DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Tuesday, July 13, 2004 10:38 AM To: accessd Subject: [AccessD] DateDiff or other function To all, Our financial year starts at 1st April and all I'm trying to do is get the number of weeks between 1st April and any date a user types in. I have just played with datediff for around 30 minutes using something similar to intWeeks = Datediff("ww",01/04/04,Me.txtDate) I used 12/07/04 for the me.txtDate which is around 16 weeks but I'm getting 28. Can someone tell me where I can find the answer or send me an example of how to do this please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From chris at piasd.org Tue Jul 13 10:23:24 2004 From: chris at piasd.org (Chris Kettenbach) Date: Tue, 13 Jul 2004 08:23:24 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <2F7BA03C93D17D48B13C42228C8FDAF2785276@server.domain.local> I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mgauk at btconnect.com Tue Jul 13 10:25:05 2004 From: mgauk at btconnect.com (mgauk at btconnect.com) Date: Tue, 13 Jul 2004 16:25:05 +0100 Subject: [AccessD] Batch printing the .doc files from a folder In-Reply-To: <000201c468d6$f05e04c0$0100a8c0@razvoj> Message-ID: <200407131526.i6DFQLQ23813@databaseadvisors.com> Try This: Create a Button on a form call ButPrintAllDocFiles and put this code behind the form Option Compare Database Option Explicit Private Sub ButPrintWordDocs_Click() Call fPrintAllDocFiles End Sub Private Function fPrintAllDocFiles() ' FileDialog require a Reference to Microsoft Office 11 Object Library ' and we also need a reference to Microsoft Word 11 Object Library ' in HELP, search under 'system' in the index Dim fs, f, f1, fc, sDocs, folderspec As String, iResponse As Integer Dim sFN As String Dim objWord As Word.Application Set fs = CreateObject("Scripting.FileSystemObject") Set objWord = New Word.Application folderspec = pfGetSingleFolder("C:\") If Len(folderspec) = 0 Then GoTo exithere Set f = fs.GetFolder(folderspec) Set fc = f.Files For Each f1 In fc If Right(f1.Name, 4) = ".doc" And Not Left(f1.Name, 1) = "~" Then sFN = folderspec & "\" & f1.Name ' comment out the next 2 lines for autoprinting and the corresponding 'End If' iResponse = MsgBox("Print This File:-" & vbCrLf & vbCrLf & sFN, vbYesNo + vbQuestion, "Print All") If iResponse = vbYes Then objWord.Documents.Add Template:=sFN, NewTemplate:=False objWord.Options.PrintBackground = True objWord.ActiveDocument.PrintOut objWord.ActiveDocument.Close End If End If Next exithere: Set objWord = Nothing MsgBox "Finished" Exit Function End Function Public Function pfGetSingleFolder(Optional strStartFolder As String) As Variant ' FileDialog require a Reference to Microsoft Office 11 Object Library On Error GoTo errhandler Dim fd As FileDialog Set fd = FileDialog(msoFileDialogFolderPicker) fd.AllowMultiSelect = False fd.Title = "Select a Folder to Auto-Print ALL Word documents in that Folder" fd.ButtonName = "Select Folder" fd.InitialFileName = strStartFolder fd.Show pfGetSingleFolder = fd.SelectedItems.Item(1) ' only 1 allowed 'MsgBox pfGetSingleFolder exithere: Set fd = Nothing Exit Function errhandler: Select Case Err.Number Case 5 ' user cancelled pfGetSingleFolder = "" Case Else MsgBox Err.Number & vbCrLf & Err.Description End Select Resume exithere End Function Max Sherman -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ervin Brindza Sent: 13 July 2004 13:08 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Batch printing the .doc files from a folder Mark, many thanks for the suggestion, but my customer want a single button push :-( Ervin ----- Original Message ----- From: "Mitsules, Mark S. (Newport News)" To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 2:02 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Ervin, > > The quickest, simplest way I know of is to highlight them all, right-click, > and choose print. They will each open, print, and close automatically. > > > Mark > > > -----Original Message----- > From: Ervin Brindza [mailto:viner at eunet.yu] > Sent: Tuesday, July 13, 2004 4:47 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Batch printing the .doc files from a folder > > > Hi, > there are a plenty of .doc files in a particular folder, and I want to print > them without manually opening every single file. I'm interested in VBA > or .bat or whatever solution! > Many TIA's > Ervin > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 From paul.hartland at fsmail.net Tue Jul 13 10:32:20 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 13 Jul 2004 17:32:20 +0200 (CEST) Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <15655739.1089732740871.JavaMail.www@wwinf3002> I use the vbSendMail.dll with the problem being it goes straight to the SMTP server and you need to know the name of the SMTP server. Apparently I think there's something out there called Outlook Redemption (or similar) which you can use. Think both are free to download, not sure about other costs though Paul Hartland Message date : Jul 13 2004, 04:28 PM >From : "Chris Kettenbach" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From rl_stewart at highstream.net Tue Jul 13 10:40:25 2004 From: rl_stewart at highstream.net (Robert L. Stewart) Date: Tue, 13 Jul 2004 10:40:25 -0500 Subject: [AccessD] Re: Rotate label in report design In-Reply-To: <200407131120.i6DBKsQ08394@databaseadvisors.com> Message-ID: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> Gustav, StrReverse(YourString) will reverse the string then you can se the property to vertical. Robert At 06:20 AM 13/07/2004 -0500, you wrote: >Date: Tue, 13 Jul 2004 11:52:58 +0200 >From: Gustav Brock >Subject: [AccessD] Rotate label in report design >To: Access Developer >Message-ID: <12712096533.20040713115258 at cactus.dk> >Content-Type: text/plain; charset=us-ascii > >Hi all > >If you set property Vertical to True, text is written up-down. >Can it somehow be rotated 180 degrees to be down-up? > >Stephen Lebans features a RotateText ocx but I would rather be without >an ocx. > >/gustav From CMackin at Quiznos.com Tue Jul 13 10:43:59 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 13 Jul 2004 09:43:59 -0600 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: Rocky, See the archives on Outlook and the Security patch that is causing this. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 9:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 10:52:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 17:52:03 +0200 Subject: [AccessD] Re: Rotate label in report design In-Reply-To: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> References: <5.1.0.14.2.20040713103813.02d086d8@pop3.highstream.net> Message-ID: <8533641363.20040713175203@cactus.dk> Hi Robert > StrReverse(YourString) > will reverse the string then you can se the property to vertical. Hey, very creative Robert! That was not what I meant; it will give me treboR for Robert but I do need Robert - only rotated 180 degrees (not mirrored or sort of). /gustav >>If you set property Vertical to True, text is written up-down. >>Can it somehow be rotated 180 degrees to be down-up? >> >>Stephen Lebans features a RotateText ocx but I would rather be without >>an ocx. From dwaters at usinternet.com Tue Jul 13 10:55:59 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 13 Jul 2004 10:55:59 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <20972704.1089733242688.JavaMail.root@sniper2.usinternet.com> Message-ID: <001401c468f1$e48adf90$de1811d8@danwaters> Paul, If you want to use SMTP email, vbSendMail is a good choice. You can get the SMTP Server name from the network administrator. They have to know it. Or, if you're using this at home, you can use your ISP's name, like 'mail.usinternet.com' Best of Luck! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of paul.hartland at fsmail.net Sent: Tuesday, July 13, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: Re: RE: [AccessD] Outlook Asks Too Many Questions I use the vbSendMail.dll with the problem being it goes straight to the SMTP server and you need to know the name of the SMTP server. Apparently I think there's something out there called Outlook Redemption (or similar) which you can use. Think both are free to download, not sure about other costs though Paul Hartland Message date : Jul 13 2004, 04:28 PM >From : "Chris Kettenbach" To : "Access Developers discussion and problem solving" Copy to : Subject : RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pharold at proftesting.com Tue Jul 13 10:59:29 2004 From: pharold at proftesting.com (Perry Harold) Date: Tue, 13 Jul 2004 11:59:29 -0400 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <00ff01c468ec$8e96baf0$6601a8c0@HAL9002> Message-ID: <003601c468f2$612b79b0$082da8c0@D58BT131> Try using ClickYes http://www.contextmagic.com/express-clickyes/ Can be called programmatically as well I believe. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 11:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From liz at symphonyinfo.com Tue Jul 13 11:21:40 2004 From: liz at symphonyinfo.com (Liz Doering) Date: Tue, 13 Jul 2004 11:21:40 -0500 Subject: [AccessD] Advantage Database Message-ID: Is anyone aware of any tools or tips for extracting .adt files to any other format? My boss has promised that we can do this magic.... Thanks, Liz Doering Symphony Information Services liz at symphonyinfo.com www.symphonyinfo.com From cfoust at infostatsystems.com Tue Jul 13 11:26:56 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:26:56 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust From cfoust at infostatsystems.com Tue Jul 13 11:27:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:27:58 -0700 Subject: [AccessD] Advantage Database Message-ID: You could look at DataJunction, but be prepared to pay up for it. Charlotte Foust -----Original Message----- From: Liz Doering [mailto:liz at symphonyinfo.com] Sent: Tuesday, July 13, 2004 8:22 AM To: accessd at databaseadvisors.com Subject: [AccessD] Advantage Database Is anyone aware of any tools or tips for extracting .adt files to any other format? My boss has promised that we can do this magic.... Thanks, Liz Doering Symphony Information Services liz at symphonyinfo.com www.symphonyinfo.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 11:29:33 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 09:29:33 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 11:29:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 18:29:48 +0200 Subject: [AccessD] Advantage Database In-Reply-To: References: Message-ID: <035906120.20040713182948@cactus.dk> Hi Liz As far as I know that's a proprietary format. You would probably need to do that from within Advantage or use their ODBC driver if you have that at hand. /gustav > Is anyone aware of any tools or tips for extracting .adt files to any other > format? My boss has promised that we can do this magic.... From Developer at UltraDNT.com Tue Jul 13 11:32:43 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Tue, 13 Jul 2004 12:32:43 -0400 Subject: [AccessD] Scheduled Access task - URGENT In-Reply-To: <002d01c468d4$b9feb750$6501a8c0@user> Message-ID: <000901c468f7$08b1fe30$6401a8c0@COA3> Does the Windows user id have a password? In my experience, WinXP won't run a Scheduled Task for a user id that does not have one. hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kath Pelletti Sent: Tuesday, July 13, 2004 8:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 13 11:38:33 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 13 Jul 2004 18:38:33 +0200 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: References: Message-ID: <13736430744.20040713183833@cactus.dk> Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We have > an app that simply sits there and distributes reports, either by email, > to a printer or to PDF files. It operates on a timer and checks to see > if new data has been received. If it has, it checks the distributions > configured and sends the reports. The baffling thing is that at some > point, we get a "not enough memory" error that brings it to a halt. The > brute force method is to shut the thing down and restart it. We could > even do that automatically, but the trouble is we can't figure out what > causes it. It does not appear to be memory leak and we've tried > everything we can think of: tweaking the virtual memory, turning off > file indexing, changing the interval, updating the jet service pack to > 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and the > slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the > machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 > adapters. The best performance is coming from the 256 MB RAM machine > with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust From JColby at dispec.com Tue Jul 13 11:41:16 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 13 Jul 2004 12:41:16 -0400 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD2D@DISABILITYINS01> Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 12:03:13 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 10:03:13 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: Yep. It spikes at the time we get the message, but it doesn't look like a leak, since it isn't crawling up gradually. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 12:08:16 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 10:08:16 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Tue Jul 13 12:47:28 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Tue, 13 Jul 2004 10:47:28 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: Message-ID: Charlotte: Your right it is definitely not a leak more like a flood. Sorry but it has been a long night/day so far. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 10:03 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Yep. It spikes at the time we get the message, but it doesn't look like a leak, since it isn't crawling up gradually. Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 8:41 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Have you looked at task manager to see if the memory usage is inching upwards? -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 13, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Further to this, the low end machine it failing at nearly 5000 distributions over several days, while the others are blowing up at around 500 or 600 over some hours. Charlotte Foust -----Original Message----- From: Charlotte Foust Sent: Tuesday, July 13, 2004 8:27 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Out of Memory problems - AXP/WinXP I'm wracking my brains to figure out why an AXP application of ours exhibits different behavior on different but similar machines. We have an app that simply sits there and distributes reports, either by email, to a printer or to PDF files. It operates on a timer and checks to see if new data has been received. If it has, it checks the distributions configured and sends the reports. The baffling thing is that at some point, we get a "not enough memory" error that brings it to a halt. The brute force method is to shut the thing down and restart it. We could even do that automatically, but the trouble is we can't figure out what causes it. It does not appear to be memory leak and we've tried everything we can think of: tweaking the virtual memory, turning off file indexing, changing the interval, updating the jet service pack to 8, etc. It is very consistent on each machine, but the machines we can test it on don't fall over at the same point. The best performance comes from the machine with the least RAM, the oldest video card and the slowest processor, but all are running WinXP SP-1 and OXP SP-2. All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA Getforce2 adapters. The best performance is coming from the 256 MB RAM machine with a 1.50 Ghz CPU. I'm tearing my hair out in handfuls, and I can't find a clue anywhere I've looked. Can anyone shed any light on this? Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jul 13 13:56:29 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 13 Jul 2004 13:56:29 -0500 Subject: [AccessD] Out of Memory problems - AXP/WinXP In-Reply-To: <18447350.1089743241138.JavaMail.root@sniper3.usinternet.com> Message-ID: <000001c4690b$1bb28ea0$de1811d8@danwaters> Charlotte, I remember that when an application is opened by automation it is sometimes not visible. For example if I open Excel from Access and I want to see the spreadsheet on screen, I have to explicitly set a visible property to true. Could your code be recursively opening objects but not closing them? I guess this would apply to applications, recordsets, queries, and other things too. I'm just trying to save the wall ;-) Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 13 14:44:45 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 13 Jul 2004 15:44:45 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD67@DISABILITYINS01> I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC From BBarabash at TappeConstruction.com Tue Jul 13 15:02:44 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Tue, 13 Jul 2004 15:02:44 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <100F91B31300334B89EC531C9DCB086506580A@tccexch01.tappeconstruction.net> Hi John, Try xlApp.DisplayAlerts = False (it's the equivalent of DoCmd.SetWarnings False) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From CMackin at Quiznos.com Tue Jul 13 15:10:09 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 13 Jul 2004 14:10:09 -0600 Subject: [AccessD] Preventing user prompts from Excel Message-ID: Try, xlApp.DisplayAlerts False This is off the top of my head so it may nee some minor tweaking, but I think the DisplayAlerts property is what you're after. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 1:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 13 15:12:48 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 13 Jul 2004 13:12:48 -0700 Subject: [AccessD] Out of Memory problems - AXP/WinXP Message-ID: I'm pretty careful about that. Some of our previous developers relied on the built-in garbage collection (LOL) but I don't ever assume objects will go out of scope when they should. I always destroy them explicitly. Every place I find something like that, I fix it, so I don't think that's the problem. Besides, I don't think that would cause a *sudden* memory spike. We aren't automating another application, we call into dlls for extended functionality like creating the PDF files. The only recursive code in the whole blasted app is some callbacks to populate comboboxes, so I don't think that's it either. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Tuesday, July 13, 2004 10:56 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP Charlotte, I remember that when an application is opened by automation it is sometimes not visible. For example if I open Excel from Access and I want to see the spreadsheet on screen, I have to explicitly set a visible property to true. Could your code be recursively opening objects but not closing them? I guess this would apply to applications, recordsets, queries, and other things too. I'm just trying to save the wall ;-) Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Tuesday, July 13, 2004 12:08 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Out of Memory problems - AXP/WinXP We aren't testing the print part at this point, only email and PDF file distribution. Of course, the PDF driver is a printer, but we're stuck there. All the machines we're testing are Dells and we can't really switch video cards easily, but I'll keep it in mind as a last resort. I'm fixating on the video cards because it seems like the only explanation left. Actually, at least one of the machines with poor performance has additional on-board memory on the video card. That knocking you hear is my head beating againt the wall. ;-{ Charlotte Foust -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Tuesday, July 13, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Out of Memory problems - AXP/WinXP Hi Charlotte You mention it yourself. It could be the video driver. Or the printer driver. If used for nothing else than running your reporting engine, try switching to plain VGA or SVGA or switch to a proven video card like Matrox or ATI. Also check the printer drivers. If printing via PCL try switching to Postscript. I'm have an app like this in my plans (and so did Steve?) and would be very interested if you could report back your findings. /gustav > I'm wracking my brains to figure out why an AXP application of ours > exhibits different behavior on different but similar machines. We > have an app that simply sits there and distributes reports, either by > email, to a printer or to PDF files. It operates on a timer and > checks to see if new data has been received. If it has, it checks the > distributions configured and sends the reports. The baffling thing is > that at some point, we get a "not enough memory" error that brings it > to a halt. The brute force method is to shut the thing down and > restart it. We could even do that automatically, but the trouble is > we can't figure out what causes it. It does not appear to be memory > leak and we've tried everything we can think of: tweaking the virtual > memory, turning off file indexing, changing the interval, updating the > jet service pack to 8, etc. It is very consistent on each machine, but the machines we can > test it on don't fall over at the same point. The best performance > comes from the machine with the least RAM, the oldest video card and > the slowest processor, but all are running WinXP SP-1 and OXP SP-2. > All the machines are P-4s, have 40GB HD and have some flavor of NVIDIA > Getforce2 adapters. The best performance is coming from the 256 MB > RAM machine with a 1.50 Ghz CPU. > I'm tearing my hair out in handfuls, and I can't find a clue anywhere > I've looked. Can anyone shed any light on this? > Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Tue Jul 13 15:16:26 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Tue, 13 Jul 2004 22:16:26 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD67@DISABILITYINS01> Message-ID: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Tue Jul 13 15:25:32 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Tue, 13 Jul 2004 22:25:32 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> Message-ID: <20040713202359.A81405AD7F@smtp8.wanadoo.nl> That is if the setwarnings false mentioned in earlier mail does not work..;-) Pffff -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens StaRKeY Verzonden: dinsdag 13 juli 2004 22:16 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:25:32 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Jim.Hale at FleetPride.com Tue Jul 13 15:33:05 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 13 Jul 2004 15:33:05 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDA0@corp-es01.fleetpride.com> try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Tue Jul 13 16:23:12 2004 From: pedro at plex.nl (Pedro Janssen) Date: Tue, 13 Jul 2004 23:23:12 +0200 Subject: Subject: RE: [AccessD] db1, 2, 3 ........ References: <004001c46676$9ecee5f0$0501a8c0@colbyws> Message-ID: <001f01c4691f$c1c71950$fac581d5@pedro> Thanks to all that responded on my question. I wil try all options on test front-ends and i'll hope that they wil properly be compiled / compacted. Pedro Janssen ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Saturday, July 10, 2004 2:08 PM Subject: RE: Subject: RE: [AccessD] db1, 2, 3 ........ > Pedro, > > Just remember that if you run a split database, i.e. FE/BE, doing a compact > on exit will only compact the FE, not the BE. Compacting the FE may not > even be necessary depending on whether you get a new copy daily (as I do) or > what you do with the FE. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of pedro at plex.nl > Sent: Friday, July 09, 2004 9:21 AM > To: AccessD at databaseadvisors.com > Subject: Subject: RE: [AccessD] db1, 2, 3 ........ > > > Hello Charlotte, > > i indeed have turned on Compile (compact and repair) after Exit, and indeed > its a permissions protected database. > So i can delete these db1.mdb etc without any troubles?? > > Another question: Is compiling after exit a good option, because the fact > that in this way the database several times a day wil be compacted. > > Pedro Janssen > > > > > > From: "Charlotte Foust" > To: "Access Developers discussion and problem solving" > Date: Thu, 8 Jul 2004 14:01:58 -0700 > Subject: RE: [AccessD] db1, 2, 3 ........ > > Do you have Compile on Exit turned on? I've usually seen that kind of thing > when the database attempted to compact but for some reason (often > permissions), it couldn't delete the original and rename the db1.mdb, etc. > > Charlotte Foust > > -----Original Message----- > From: Pedro Janssen [mailto:pedro at plex.nl] > Sent: Thursday, July 08, 2004 12:56 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] db1, 2, 3 ........ > > > Hello Group, > > i have an front & backend mdb on a server. The front-end creates temporary?? > databases named as db1.mdb, db2.mdb, db3.mdb etc. each with different > filesize. > > Why is this and why are these not deleted automatically? > > TIA > > Pedro Janssen > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DaveSharpe2 at cox.net Tue Jul 13 17:24:47 2004 From: DaveSharpe2 at cox.net (Dave Sharpe) Date: Tue, 13 Jul 2004 18:24:47 -0400 Subject: [AccessD] New MS Demonstration Databases Available Message-ID: <008101c46928$34c153f0$dd2f0a44@bcsrkeext6137> Applies to Microsoft Office Access 2003 Microsoft Access 2000 and 2002 One of the best ways to put Access to work is to adapt an existing database or database object (database objects: An Access database contains objects such as tables, queries, forms, reports, pages, macros, and modules. An Access project contains objects such as forms, reports, pages, macros, and modules.) to suit your needs. To help you be more productive, the Access team provides a number of databases that you can download and adapt for your own use. http://www.office.microsoft.com/assistance/preview.aspx?AssetID=HA011201381033 From KP at sdsonline.net Tue Jul 13 18:00:03 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Wed, 14 Jul 2004 09:00:03 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <40F46C51.29911.4DAF67C@lexacorp.com.pg> Message-ID: <002f01c4692d$22c754b0$6501a8c0@user> Thanks very much Stuart - it's always great to have a version that someone has working! You were right about the run permissions - I had checked them but as I do not have a password for user Win I didn't enter one - I had no idea that that was required (which still strikes me as odd) Brilliant - thanks all. Kath ----- Original Message ----- From: Stuart McLachlan To: access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 11:12 PM Subject: Re: [AccessD] Scheduled Access task - URGENT On 13 Jul 2004 at 22:27, Kath Pelletti wrote: > Hi Gustav / Stuart / Andy - thanks for suggestions - > > I can't get it to work with or without the quotes around the Autorun parameter. > > This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. > > My syntax works as a shortcut, but simply does not run as a scheduled task. > > To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? > With the attached test.mdb (not attached to list reply) in C:\ I've just run a scheduled task with the comand line "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmd Test Argument It works fine (opens the mdb and displays two message boxes, once from a function called in the Autoexec macro and a second one called from the startup forms on_open. Having just set up the task, the thought struck me that you may not have set the run permissions for the task properly. You need to set the "Run as" and password for the task. Attachments: C:\test.mdb -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From KP at sdsonline.net Tue Jul 13 18:02:19 2004 From: KP at sdsonline.net (Kath Pelletti) Date: Wed, 14 Jul 2004 09:02:19 +1000 Subject: [AccessD] Scheduled Access task - URGENT References: <000901c468f7$08b1fe30$6401a8c0@COA3> Message-ID: <003901c4692d$737e0520$6501a8c0@user> Thanks Steve - that was it. Glad to have this one in the archives. Kath ----- Original Message ----- From: Steve Conklin (Developer at UltraDNT) To: 'Access Developers discussion and problem solving' Sent: Wednesday, July 14, 2004 2:32 AM Subject: RE: [AccessD] Scheduled Access task - URGENT Does the Windows user id have a password? In my experience, WinXP won't run a Scheduled Task for a user id that does not have one. hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kath Pelletti Sent: Tuesday, July 13, 2004 8:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Gustav / Stuart / Andy - thanks for suggestions - I can't get it to work with or without the quotes around the Autorun parameter. This is Win XP Pro - so maybe there is a difference between Win 2K and XP Pro here. The mdb I am using is completely empty - vanilla - I started with an empty mdb and just added one startup form when I couldn't get the more complex one to work. My syntax works as a shortcut, but simply does not run as a scheduled task. To confirm that it is a Win issue, could you send me your Win2K line syntax with an mdb which it opens? Much appreciated Kath ----- Original Message ----- From: Gustav Brock To: Access Developers discussion and problem solving Sent: Tuesday, July 13, 2004 7:25 PM Subject: Re: [AccessD] Scheduled Access task - URGENT Hi Stuart OK, I didn't test it myself, neither have I never had the need. I guess that leaves Kath with a problem somewhere else ... /gustav >> I think you need to modify >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd AutoRun >> >> to >> >> "C:\Program Files\Microsoft Office 2000\Office\MSACCESS.EXE" >> "E:\Sds\Clients\DDTolhurst\IressPricesDatabase\TestBatch.mdb" >> /cmd "AutoRun" >> > It works fine for me without quotes around the argument(s) > Trying to find Kath's problem, this works as expected and a message box > displays the two words when called from a form's on_open > "C:\Program Files\Microsoft Office\Office\MsAccess.exe" "c:\test.mdb" /cmb Test > Argument > It works fine whether in a shortcut or a batch file (Win2K, A2K) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From glen_mcwilliams at msn.com Tue Jul 13 20:14:32 2004 From: glen_mcwilliams at msn.com (Glen McWilliams) Date: Tue, 13 Jul 2004 18:14:32 -0700 Subject: [AccessD] more on early versus late binding Message-ID: John Excelent description of referencing and binding, both early and late. No mud at all. Very, very clear. Glen McWilliams glen at creativehightek.com >From: "jwcolby" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] more on early versus late binding >Date: Mon, 12 Jul 2004 21:28:34 -0400 > >Nope, early is not that, and late is not that. > >Early is dimensioning a variable as a specific object type - for example as >an excel object or a word object or a command control etc. then referencing >the object properties directly. > >Dim cbo as combo > debug.print cbo.Name > >Late is dimensioning a variable as an OBJECT data type, then referencing >the >property but using the "object object". > >Dim cbo as object > debug.print cbo.name > >The reason it is called early and late is simply that early binding: > >Dim cbo as combo > >Causes the compiler (interpreter actually) to find and set a reference to >the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > >Late binding causes the interpreter to "discover" what the object is by >what >is stored in the variable AT RUN TIME and look up the properties and stuff >in the actual object (library, ocx etc) at run time. > >Thus the early binding causes the map of dim to real thing without ever >even >running the code. Late binding simply cannot discover what to do with the >dimensioned variable until the variable is set = to something. > >This is very often used to pass in different things to a function for >example. > >Function MyObject(obj as object) > debug.print object.name >End function > >Function TestObjects() > MyObject MyCbo > MyObject MyForm >End function > >MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word >document, a combo box. What happens inside of MyObject may or may not be >legal depending on what you pass in to the function, but you can pass in >ANY >OBJECT AT ALL because the compiler does not check the dimensioned type >against the passed in type (other than to determine that it is an object). > >Function MyControl(txt As TextBox) > Debug.Print txt.Name >End Function > >Function TestControls() >Dim MyCbo As ComboBox >Dim MyTextBox As TextBox >Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox >End Function > >Test control will correctly pass in controls but won't run since MyForm is >dimensioned as a form and at RUN TIME the interpreter checks all calls to >MyControl to see if what is being passed in is a variable of type control. > >With early binding, since you dimension an object specifically to its >object >type, you can use intellisense because the compiler knows how to find the >object information. With late binding, the object type isn't determined >until something is actually passed in so how can intellisense help you out. > >Hope this helps explain what early and late binding are really all about. > >Now... Setting the reference really has nothing to do with any of this >OTHER >THAN allowing some specific object type to be found in a library, and thus >be dimensioned to a specific object type. IOW, If I don't reference the >excel library, I can STILL USE EXCEL, but I have to late bind, dim as an >object, then store an Excel object (spreadsheet, cell etc) in the variable. >If I reference the excel library, now I can early bind and dimension a >variable as a spreadsheet, or a cell, or whatever I want since those things >can be found in a referenced library. > >So setting the reference is neither early binding nor late binding. It >ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY >EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel >in any way whatsoever. However I cannot reference an excel object type >(dim >a variable as a cell or spreadsheet etc) unless I reference the Excel >library. > >Referencing a library does nothing more than load (before compiling) a >table >of objects inside that library into a table of all possible objects for the >compiler to use to look up dimension statement datatypes in. If a >dimension >statement datatype is not found in the table of all possible datatypes, >then >a compile error is thrown on the dim statement. > >Clear as mud? > >John W. Colby >www.ColbyConsulting.com > From connie.kamrowski at agric.nsw.gov.au Tue Jul 13 20:56:34 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Wed, 14 Jul 2004 11:56:34 +1000 Subject: [AccessD] Invalid reference to the property Form/Report Message-ID: Hi All I notice Susan had this problem in the Archives with no solve but was hoping someone had further ideas. I have completed my database and testing the new release and suddenly getting an error in a place where I did not get one in an older version. I'm not getting it on the development machine, only on test machines, and them only on some of the test machines. The code is called when my form opens and is as follows: Private Sub Species_RowSource() 'Species are required on Approval (non Schedule 2 Species only) and Permit (Schedule 2 Species only) type Authorities only On Error GoTo Failure If gfSpeciesRequired = True Then 'Species is required Me.sfrDAuthoritySpecies.Visible = True If gfSchedule2Only = True Then 'Only Schedule 2 Required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to schedule 2 only Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpecies2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery Else 'gfSchedule2Only = False 'Species other than 2 required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to nonSchedule 2 Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpeciesNon2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery End If Else 'Species is not required at all - Licence type Authority Me.sfrDAuthoritySpecies.Visible = False End If ExitRoutine: Exit Sub Failure: Call ErrorHandler(lngErrorNumber:=Err.Number, strErrorDescription:=Err.Description, strErrorSource:=Err.Source) Resume ExitRoutine End Sub The code runs through and throws to the error handler - crashes with error 2455 you have entered an expression with an invalid reference to the property Form/Report Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From michael.broesdorf at web.de Tue Jul 13 21:25:41 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Wed, 14 Jul 2004 04:25:41 +0200 Subject: AW: [AccessD] Invalid reference to the property Form/Report In-Reply-To: Message-ID: A while ago I had a strange problem like this too. There seems to be a problem if you have a couple of subforms on tab-controls. If I remember this correctly, the solution was to bring the subform to the foreground in design view (no joke!). If that might be the case with your app I can dig out the details. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von connie.kamrowski at agric.nsw.gov.au Gesendet: Mittwoch, 14. Juli 2004 03:57 An: accessd at databaseadvisors.com Betreff: [AccessD] Invalid reference to the property Form/Report Hi All I notice Susan had this problem in the Archives with no solve but was hoping someone had further ideas. I have completed my database and testing the new release and suddenly getting an error in a place where I did not get one in an older version. I'm not getting it on the development machine, only on test machines, and them only on some of the test machines. The code is called when my form opens and is as follows: Private Sub Species_RowSource() 'Species are required on Approval (non Schedule 2 Species only) and Permit (Schedule 2 Species only) type Authorities only On Error GoTo Failure If gfSpeciesRequired = True Then 'Species is required Me.sfrDAuthoritySpecies.Visible = True If gfSchedule2Only = True Then 'Only Schedule 2 Required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to schedule 2 only Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpecies2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery Else 'gfSchedule2Only = False 'Species other than 2 required 'Limit the RowSource of the Species combobox in sfrDAuthoritySpecies to nonSchedule 2 Me![sfrDAuthoritySpecies].Form![Species].RowSource = "qryDAuthoritySpeciesNon2Only" Me![sfrDAuthoritySpecies].Form![Species].Requery End If Else 'Species is not required at all - Licence type Authority Me.sfrDAuthoritySpecies.Visible = False End If ExitRoutine: Exit Sub Failure: Call ErrorHandler(lngErrorNumber:=Err.Number, strErrorDescription:=Err.Description, strErrorSource:=Err.Source) Resume ExitRoutine End Sub The code runs through and throws to the error handler - crashes with error 2455 you have entered an expression with an invalid reference to the property Form/Report Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jul 13 21:40:25 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 14 Jul 2004 12:40:25 +1000 Subject: [AccessD] Invalid reference to the property Form/Report In-Reply-To: Message-ID: <40F529B9.30877.833BF2@lexacorp.com.pg> On 14 Jul 2004 at 11:56, connie.kamrowski at agric.nsw.go wrote: > > The code is called when my form opens and is as follows: > .... > > The code runs through and throws to the error handler - crashes with error > 2455 you have entered an expression with an invalid reference to the > property Form/Report > If you take the error handler out, what line does the function break on? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jwcolby at colbyconsulting.com Tue Jul 13 21:56:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 22:56:56 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713202359.A81405AD7F@smtp8.wanadoo.nl> Message-ID: <001801c4694e$39bb7a90$0501a8c0@colbyws> Setwarnings does NOT work. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:26 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel That is if the setwarnings false mentioned in earlier mail does not work..;-) Pffff -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens StaRKeY Verzonden: dinsdag 13 juli 2004 22:16 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:25:32 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 21:56:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 22:56:56 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <20040713201453.52BE55B2C5@smtp8.wanadoo.nl> Message-ID: <001901c4694e$3a4f5620$0501a8c0@colbyws> That's what I like, a man with multiple valid suggestions. The answers in all cases is simply that I have always just opened the damned spreadsheet and renamed the sheet to what I wanted. I guess I could open the sheet, close it, open the link and edit that. I am getting a spreadsheet from a client, attached to an email. I use outlook (withevents) to copy the email to a specific email folder (using a rule) then raise an event for each attachment. My code in another class figures out what to do with the attachment including just using the messages .save method to put it in a folder on the disk. I then take that saved email and copy it to another location with a common name (always the same), open the spreadsheet (if it is a spreadsheet, some aren't) and rename the interior sheet since clients can NEVER be expected to name the sheets the same thing from day to day). Having done all that I have a spreadsheet of a given name with an interior sheet of a given name and the link just works. The alternative is to (and I have done this also) save the sheet, get the interior sheet name, open the table def, and edit the filename and sheet name portions and save the tabledef back again. Both do work, both require Excel automation to open the sheet. Anyway, thanks for the suggestions. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:16 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel John, you'd better use the filesystemobject if it's just renaming, set a reference to Scripting and voila... you are able to check each filetype if you want to loop a dir, rename,copy etc... OR if it's just a sheet inside Excel (haven't been paying too much attention here) then why don't you check the imported excel version and do a saveas before closing? My guess is that will do the trick.. OR if the sheet is always the first then why not change the linked table tablename in the connectstring (+ refresh) based on the name of the first sheet?:-) Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Colby, John Verzonden: dinsdag 13 juli 2004 21:45 Aan: 'accessd at databaseadvisors.com' Onderwerp: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 13-7-2004 22:16:26 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 22:02:00 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 23:02:00 -0400 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <100F91B31300334B89EC531C9DCB086506580A@tccexch01.tappeconstruction.net> Message-ID: <001a01c4694e$eee4bcb0$0501a8c0@colbyws> Thanks, that is probably what I am looking for. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Brett Barabash Sent: Tuesday, July 13, 2004 4:03 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Preventing user prompts from Excel Hi John, Try xlApp.DisplayAlerts = False (it's the equivalent of DoCmd.SetWarnings False) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 13 22:07:33 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Tue, 13 Jul 2004 23:07:33 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <001b01c4694f$b57abff0$0501a8c0@colbyws> :) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Glen McWilliams Sent: Tuesday, July 13, 2004 9:15 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] more on early versus late binding John Excelent description of referencing and binding, both early and late. No mud at all. Very, very clear. Glen McWilliams glen at creativehightek.com >From: "jwcolby" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] more on early versus late binding >Date: Mon, 12 Jul 2004 21:28:34 -0400 > >Nope, early is not that, and late is not that. > >Early is dimensioning a variable as a specific object type - for >example as an excel object or a word object or a command control etc. >then referencing the object properties directly. > >Dim cbo as combo > debug.print cbo.Name > >Late is dimensioning a variable as an OBJECT data type, then >referencing >the >property but using the "object object". > >Dim cbo as object > debug.print cbo.name > >The reason it is called early and late is simply that early binding: > >Dim cbo as combo > >Causes the compiler (interpreter actually) to find and set a reference >to the actual object (class, ocx etc) that the cbo truly is AT COMPILE >TIME. > >Late binding causes the interpreter to "discover" what the object is by >what >is stored in the variable AT RUN TIME and look up the properties and stuff >in the actual object (library, ocx etc) at run time. > >Thus the early binding causes the map of dim to real thing without ever >even >running the code. Late binding simply cannot discover what to do with the >dimensioned variable until the variable is set = to something. > >This is very often used to pass in different things to a function for >example. > >Function MyObject(obj as object) > debug.print object.name >End function > >Function TestObjects() > MyObject MyCbo > MyObject MyForm >End function > >MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word >document, a combo box. What happens inside of MyObject may or may not >be legal depending on what you pass in to the function, but you can >pass in ANY OBJECT AT ALL because the compiler does not check the >dimensioned type against the passed in type (other than to determine >that it is an object). > >Function MyControl(txt As TextBox) > Debug.Print txt.Name >End Function > >Function TestControls() >Dim MyCbo As ComboBox >Dim MyTextBox As TextBox >Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox >End Function > >Test control will correctly pass in controls but won't run since MyForm >is dimensioned as a form and at RUN TIME the interpreter checks all >calls to MyControl to see if what is being passed in is a variable of >type control. > >With early binding, since you dimension an object specifically to its >object >type, you can use intellisense because the compiler knows how to find the >object information. With late binding, the object type isn't determined >until something is actually passed in so how can intellisense help you out. > >Hope this helps explain what early and late binding are really all >about. > >Now... Setting the reference really has nothing to do with any of this >OTHER >THAN allowing some specific object type to be found in a library, and thus >be dimensioned to a specific object type. IOW, If I don't reference the >excel library, I can STILL USE EXCEL, but I have to late bind, dim as an >object, then store an Excel object (spreadsheet, cell etc) in the variable. >If I reference the excel library, now I can early bind and dimension a >variable as a spreadsheet, or a cell, or whatever I want since those things >can be found in a referenced library. > >So setting the reference is neither early binding nor late binding. It >ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY >EXCEL CODE... I haven't early or late bound to Excel - I haven't used >Excel in any way whatsoever. However I cannot reference an excel >object type (dim a variable as a cell or spreadsheet etc) unless I >reference the Excel library. > >Referencing a library does nothing more than load (before compiling) a >table >of objects inside that library into a table of all possible objects for the >compiler to use to look up dimension statement datatypes in. If a >dimension >statement datatype is not found in the table of all possible datatypes, >then >a compile error is thrown on the dim statement. > >Clear as mud? > >John W. Colby >www.ColbyConsulting.com > From bchacc at san.rr.com Tue Jul 13 22:46:51 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 20:46:51 -0700 Subject: [AccessD] more on early versus late binding References: <000a01c46878$b7138310$0501a8c0@colbyws> Message-ID: <032f01c46955$33113980$6601a8c0@HAL9002> John: Re: speed, after the object is late binded, is there any difference in execution speed? Rocky ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 12, 2004 6:28 PM Subject: RE: [AccessD] more on early versus late binding > Nope, early is not that, and late is not that. > > Early is dimensioning a variable as a specific object type - for example as > an excel object or a word object or a command control etc. then referencing > the object properties directly. > > Dim cbo as combo > debug.print cbo.Name > > Late is dimensioning a variable as an OBJECT data type, then referencing the > property but using the "object object". > > Dim cbo as object > debug.print cbo.name > > The reason it is called early and late is simply that early binding: > > Dim cbo as combo > > Causes the compiler (interpreter actually) to find and set a reference to > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > Late binding causes the interpreter to "discover" what the object is by what > is stored in the variable AT RUN TIME and look up the properties and stuff > in the actual object (library, ocx etc) at run time. > > Thus the early binding causes the map of dim to real thing without ever even > running the code. Late binding simply cannot discover what to do with the > dimensioned variable until the variable is set = to something. > > This is very often used to pass in different things to a function for > example. > > Function MyObject(obj as object) > debug.print object.name > End function > > Function TestObjects() > MyObject MyCbo > MyObject MyForm > End function > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > document, a combo box. What happens inside of MyObject may or may not be > legal depending on what you pass in to the function, but you can pass in ANY > OBJECT AT ALL because the compiler does not check the dimensioned type > against the passed in type (other than to determine that it is an object). > > Function MyControl(txt As TextBox) > Debug.Print txt.Name > End Function > > Function TestControls() > Dim MyCbo As ComboBox > Dim MyTextBox As TextBox > Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox > End Function > > Test control will correctly pass in controls but won't run since MyForm is > dimensioned as a form and at RUN TIME the interpreter checks all calls to > MyControl to see if what is being passed in is a variable of type control. > > With early binding, since you dimension an object specifically to its object > type, you can use intellisense because the compiler knows how to find the > object information. With late binding, the object type isn't determined > until something is actually passed in so how can intellisense help you out. > > Hope this helps explain what early and late binding are really all about. > > Now... Setting the reference really has nothing to do with any of this OTHER > THAN allowing some specific object type to be found in a library, and thus > be dimensioned to a specific object type. IOW, If I don't reference the > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > object, then store an Excel object (spreadsheet, cell etc) in the variable. > If I reference the excel library, now I can early bind and dimension a > variable as a spreadsheet, or a cell, or whatever I want since those things > can be found in a referenced library. > > So setting the reference is neither early binding nor late binding. It > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel > in any way whatsoever. However I cannot reference an excel object type (dim > a variable as a cell or spreadsheet etc) unless I reference the Excel > library. > > Referencing a library does nothing more than load (before compiling) a table > of objects inside that library into a table of all possible objects for the > compiler to use to look up dimension statement datatypes in. If a dimension > statement datatype is not found in the table of all possible datatypes, then > a compile error is thrown on the dim statement. > > Clear as mud? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Monday, July 12, 2004 2:50 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] more on early versus late binding > > > I kind of see the terms early and late -- in Access -- a bit differently > than the way most documentation wants to define them. To me, early just > means the library is referenced, hence the objects are instantiated, but not > being used -- late, the object is instantiated at the time it's needed -- > the reference is implicit. > > I see a lot of documentation that refer to setting references manually via > the References dialog box as "early" binding, but using the References > collection and object are never mentioned -- however... > > Seems to me you're setting the reference and instantiating the objects > without using them, so, to my mind, it's early. > > Susan H. > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Tue Jul 13 22:51:56 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 13 Jul 2004 20:51:56 -0700 Subject: [AccessD] Outlook Asks Too Many Questions References: <003601c468f2$612b79b0$082da8c0@D58BT131> Message-ID: <038601c46955$e875fe00$6601a8c0@HAL9002> Perry: That looks like precisely what is needed. Thank you. Thank you. Thank you. Rocky ----- Original Message ----- From: "Perry Harold" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 13, 2004 8:59 AM Subject: RE: [AccessD] Outlook Asks Too Many Questions > Try using ClickYes > > http://www.contextmagic.com/express-clickyes/ > > Can be called programmatically as well I believe. > > Perry Harold > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - > Beach Access Software > Sent: Tuesday, July 13, 2004 11:18 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Outlook Asks Too Many Questions > > > Dear List: > > I have a program which send out batches of emails. I'm now, thanks to the > list, using late binding, and the Outlook object model. Recently the client > upgraded to Office XP from O2K. Now when she sends a batch of emails she > gets a message that says "A program is trying to automatically send e-mail > on your behalf. Do you want to allow this?" (yes, no, help). > > Help says it is because I'm using the VBA command .Send (which is true). So > helpful and yet so annoying. Thank you MS for watching over me and my apps. > > Is there a way to suppress this message? If she sends 100 e-mails, she has > to answer this question 100 times. > > MTIA > > is > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From viner at eunet.yu Wed Jul 14 00:53:37 2004 From: viner at eunet.yu (Ervin Brindza) Date: Wed, 14 Jul 2004 07:53:37 +0200 Subject: [AccessD] Batch printing the .doc files from a folder References: <200407131526.i6DFQLQ23813@databaseadvisors.com> Message-ID: <00b401c46969$32d1a860$0100a8c0@razvoj> Max, It's perfect!!! Many thanks for the code. I need it for Access97 too(forgot to mention), but you helped me a lot! Have a nice day, Ervin ----- Original Message ----- From: To: "'Access Developers discussion and problem solving'" Sent: 13 July, 2004 5:25 PM Subject: RE: [AccessD] Batch printing the .doc files from a folder > Try This: Create a Button on a form call ButPrintAllDocFiles and put this > code behind the form > > Option Compare Database > Option Explicit > > Private Sub ButPrintWordDocs_Click() > Call fPrintAllDocFiles > End Sub > Private Function fPrintAllDocFiles() > ' FileDialog require a Reference to Microsoft Office 11 Object Library > ' and we also need a reference to Microsoft Word 11 Object Library > ' in HELP, search under 'system' in the index > Dim fs, f, f1, fc, sDocs, folderspec As String, iResponse As Integer > Dim sFN As String > Dim objWord As Word.Application > Set fs = CreateObject("Scripting.FileSystemObject") > Set objWord = New Word.Application > folderspec = pfGetSingleFolder("C:\") > If Len(folderspec) = 0 Then GoTo exithere > Set f = fs.GetFolder(folderspec) > Set fc = f.Files > For Each f1 In fc > If Right(f1.Name, 4) = ".doc" And Not Left(f1.Name, 1) = "~" Then > sFN = folderspec & "\" & f1.Name > ' comment out the next 2 lines for autoprinting and the corresponding > 'End If' > iResponse = MsgBox("Print This File:-" & vbCrLf & vbCrLf & sFN, > vbYesNo + vbQuestion, "Print All") > If iResponse = vbYes Then > objWord.Documents.Add Template:=sFN, NewTemplate:=False > objWord.Options.PrintBackground = True > objWord.ActiveDocument.PrintOut > objWord.ActiveDocument.Close > End If > End If > Next > exithere: > Set objWord = Nothing > MsgBox "Finished" > Exit Function > End Function > Public Function pfGetSingleFolder(Optional strStartFolder As String) As > Variant > ' FileDialog require a Reference to Microsoft Office 11 Object Library > On Error GoTo errhandler > Dim fd As FileDialog > Set fd = FileDialog(msoFileDialogFolderPicker) > fd.AllowMultiSelect = False > fd.Title = "Select a Folder to Auto-Print ALL Word documents in that > Folder" > fd.ButtonName = "Select Folder" > fd.InitialFileName = strStartFolder > fd.Show > pfGetSingleFolder = fd.SelectedItems.Item(1) ' only 1 allowed > 'MsgBox pfGetSingleFolder > exithere: > Set fd = Nothing > Exit Function > errhandler: > Select Case Err.Number > Case 5 ' user cancelled > pfGetSingleFolder = "" > Case Else > MsgBox Err.Number & vbCrLf & Err.Description > End Select > Resume exithere > End Function > > Max Sherman > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ervin Brindza > Sent: 13 July 2004 13:08 > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Batch printing the .doc files from a folder > > Mark, > many thanks for the suggestion, but my customer want a single button push > :-( Ervin > ----- Original Message ----- > From: "Mitsules, Mark S. (Newport News)" > To: "'Access Developers discussion and problem solving'" > > Sent: 13 July, 2004 2:02 PM > Subject: RE: [AccessD] Batch printing the .doc files from a folder > > > > Ervin, > > > > The quickest, simplest way I know of is to highlight them all, > right-click, > > and choose print. They will each open, print, and close automatically. > > > > > > Mark > > > > > > -----Original Message----- > > From: Ervin Brindza [mailto:viner at eunet.yu] > > Sent: Tuesday, July 13, 2004 4:47 AM > > To: AccessD at databaseadvisors.com > > Subject: [AccessD] Batch printing the .doc files from a folder > > > > > > Hi, > > there are a plenty of .doc files in a particular folder, and I want to > print > > them without manually opening every single file. I'm interested in VBA > > or .bat or whatever solution! > > Many TIA's > > Ervin > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > --- > Incoming mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Wed Jul 14 08:11:14 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 09:11:14 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <032f01c46955$33113980$6601a8c0@HAL9002> Message-ID: <20040714131109.PCEE1705.imf16aec.mail.bellsouth.net@SUSANONE> And I'm curious if it's enough with today's systems to really matter. Susan H. John: Re: speed, after the object is late binded, is there any difference in execution speed? From gustav at cactus.dk Wed Jul 14 08:57:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 15:57:48 +0200 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <32007103843568110723d0567@global.net.pg> References: <2F8793082E00D4119A1700B0D0216BF8017A1F98@main2.marlow.com> <32007103843568110723d0567@global.net.pg> Message-ID: <11525103216.20040714155748@cactus.dk> Hi all This topic popped up in all its glory in the recent issue of "Woody's Access Watch" where Helen Feddema is goofing around trying to parse date/time strings to figure out time zones. Of course, this dirty deroute is paved with traps so it doesn't work outside the US where other regional settings are used. Just in case anyone should have a need for dealing with time zones, here are a couple of functions we use. You'll quickly notice that essentially it is nothing more than a little clean up and one single line of code: datRemote = DateAdd("n", lngBias, datLocal) If you have nothing to do Friday you may wish to browse Helen's demo: ftp://ftp.helenfeddema.com/pub/accarch121.zip Public Function TimeZoneBiasDiff( _ ByVal lngLocalTimeBias As Long, _ ByVal lngRemoteTimeBias As Long) _ As Long ' Calculates the difference in minutes between two time zones, ' typically the local time zone and a remote time zone. ' Both time zones must be expressed by their bias relative to ' UTC (Coordinated Universal Time) which is measured in minutes. ' ' 2000-05-30. Cactus Data ApS, CPH. ' Minimum amount of minutes for a time zone bias. Const clngTimeZoneBiasMin As Long = 15 Dim lngTimeZoneBiasDiff As Long ' Round off time zone bias by minimum time zone difference. lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin ' Calculate difference in time zone bias. lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias TimeZoneBiasDiff = lngTimeZoneBiasDiff End Function Public Function DateAddTimeZoneDiff( _ ByVal datLocal As Date, _ ByVal lngLocalBias, _ ByVal lngRemoteBias) _ As Date ' Calculates the date/time of datLocal in a remote time zone. ' The difference in minutes will be the difference between the ' local time zone bias and the remote time zone bias where the ' bias are relative to UTC. ' ' Examples: ' ' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) ' will return datRemote as eleven hours behind local time. ' ' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) ' will return datRemote as eleven hours ahead of local time. ' ' 2000-05-30. Cactus Data ApS, CPH. Dim datRemote As Date Dim lngBias As Long ' Get difference (in minutes) in time zone bias. lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) ' Calculate remote date/time. datRemote = DateAdd("n", lngBias, datLocal) DateAddTimeZoneDiff = datRemote End Function Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. /gustav > On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> Hi Drew >> >> > Thanks. Next version I'll incorporate that. >> >> OK. >> >> > Time zones are pretty easy. In fact, all of this date stuff is too. The >> > only real monster is Arizona, which decreed to ignore daylight savings time. >> >> So how DO you deal with the time zones? >> >> I have seen no options in Access for this contrary to Oracle which can >> record date/time including the time zone. >> >> My thought was to use a byte field with a shifted value similar to how >> MySQL can store a year value in a byte field ... >> > You could get the Bias member of the Time_Zone_Information structure > retrieved with the GetTimeZoneInformation API function and either > apply it to the time in question or store it in another field as a > long (or integer if space is critical) > > Stuart From artful at rogers.com Wed Jul 14 09:17:49 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 14 Jul 2004 10:17:49 -0400 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <2F7BA03C93D17D48B13C42228C8FDAF2785276@server.domain.local> Message-ID: <010a01c469ad$57facf10$6601a8c0@rock> Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:22:45 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:22:45 -0400 Subject: [AccessD] Time zones (was: internationalization) Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> >Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. Are you seriously suggesting that the British Empire is not the center of the Universe anymore? ;-) So what is UTC (for us internationally challenged individuals). JWC -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, July 14, 2004 9:58 AM To: AccessD at databaseadvisors.com Subject: Re: [AccessD] Time zones (was: internationalization) Hi all This topic popped up in all its glory in the recent issue of "Woody's Access Watch" where Helen Feddema is goofing around trying to parse date/time strings to figure out time zones. Of course, this dirty deroute is paved with traps so it doesn't work outside the US where other regional settings are used. Just in case anyone should have a need for dealing with time zones, here are a couple of functions we use. You'll quickly notice that essentially it is nothing more than a little clean up and one single line of code: datRemote = DateAdd("n", lngBias, datLocal) If you have nothing to do Friday you may wish to browse Helen's demo: ftp://ftp.helenfeddema.com/pub/accarch121.zip Public Function TimeZoneBiasDiff( _ ByVal lngLocalTimeBias As Long, _ ByVal lngRemoteTimeBias As Long) _ As Long ' Calculates the difference in minutes between two time zones, ' typically the local time zone and a remote time zone. ' Both time zones must be expressed by their bias relative to ' UTC (Coordinated Universal Time) which is measured in minutes. ' ' 2000-05-30. Cactus Data ApS, CPH. ' Minimum amount of minutes for a time zone bias. Const clngTimeZoneBiasMin As Long = 15 Dim lngTimeZoneBiasDiff As Long ' Round off time zone bias by minimum time zone difference. lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin ' Calculate difference in time zone bias. lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias TimeZoneBiasDiff = lngTimeZoneBiasDiff End Function Public Function DateAddTimeZoneDiff( _ ByVal datLocal As Date, _ ByVal lngLocalBias, _ ByVal lngRemoteBias) _ As Date ' Calculates the date/time of datLocal in a remote time zone. ' The difference in minutes will be the difference between the ' local time zone bias and the remote time zone bias where the ' bias are relative to UTC. ' ' Examples: ' ' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) ' will return datRemote as eleven hours behind local time. ' ' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) ' will return datRemote as eleven hours ahead of local time. ' ' 2000-05-30. Cactus Data ApS, CPH. Dim datRemote As Date Dim lngBias As Long ' Get difference (in minutes) in time zone bias. lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) ' Calculate remote date/time. datRemote = DateAdd("n", lngBias, datLocal) DateAddTimeZoneDiff = datRemote End Function Also, note "GMT" has been considered obsolete for years and has for every serious use been replaced with UTC. /gustav > On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> Hi Drew >> >> > Thanks. Next version I'll incorporate that. >> >> OK. >> >> > Time zones are pretty easy. In fact, all of this date stuff is too. The >> > only real monster is Arizona, which decreed to ignore daylight savings time. >> >> So how DO you deal with the time zones? >> >> I have seen no options in Access for this contrary to Oracle which can >> record date/time including the time zone. >> >> My thought was to use a byte field with a shifted value similar to how >> MySQL can store a year value in a byte field ... >> > You could get the Bias member of the Time_Zone_Information structure > retrieved with the GetTimeZoneInformation API function and either > apply it to the time in question or store it in another field as a > long (or integer if space is critical) > > Stuart -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:26:55 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:26:55 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6A@DISABILITYINS01> Rocky, The issue isn't that simple. No, after the object is bound the speed is the same. It's just that the object has to be looked up EVERY TIME it is bound. If you have a function that opens a spreadsheet, with early binding this is done ONCE at compile time. With late binding it is done every time the function is called. OTOH, you no longer have to worry about lib version / names. Tradeoffs. JWC -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 13, 2004 11:47 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] more on early versus late binding John: Re: speed, after the object is late binded, is there any difference in execution speed? Rocky ----- Original Message ----- From: "jwcolby" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 12, 2004 6:28 PM Subject: RE: [AccessD] more on early versus late binding > Nope, early is not that, and late is not that. > > Early is dimensioning a variable as a specific object type - for example as > an excel object or a word object or a command control etc. then referencing > the object properties directly. > > Dim cbo as combo > debug.print cbo.Name > > Late is dimensioning a variable as an OBJECT data type, then referencing the > property but using the "object object". > > Dim cbo as object > debug.print cbo.name > > The reason it is called early and late is simply that early binding: > > Dim cbo as combo > > Causes the compiler (interpreter actually) to find and set a reference to > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > Late binding causes the interpreter to "discover" what the object is by what > is stored in the variable AT RUN TIME and look up the properties and stuff > in the actual object (library, ocx etc) at run time. > > Thus the early binding causes the map of dim to real thing without ever even > running the code. Late binding simply cannot discover what to do with the > dimensioned variable until the variable is set = to something. > > This is very often used to pass in different things to a function for > example. > > Function MyObject(obj as object) > debug.print object.name > End function > > Function TestObjects() > MyObject MyCbo > MyObject MyForm > End function > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > document, a combo box. What happens inside of MyObject may or may not be > legal depending on what you pass in to the function, but you can pass in ANY > OBJECT AT ALL because the compiler does not check the dimensioned type > against the passed in type (other than to determine that it is an object). > > Function MyControl(txt As TextBox) > Debug.Print txt.Name > End Function > > Function TestControls() > Dim MyCbo As ComboBox > Dim MyTextBox As TextBox > Dim MyForm As Form > Set MyForm = New Form_Form1 > MyControl MyForm '<<<<< ERROR AT RUN TIME > MyControl MyCbo > MyControl MyTextBox > End Function > > Test control will correctly pass in controls but won't run since MyForm is > dimensioned as a form and at RUN TIME the interpreter checks all calls to > MyControl to see if what is being passed in is a variable of type control. > > With early binding, since you dimension an object specifically to its object > type, you can use intellisense because the compiler knows how to find the > object information. With late binding, the object type isn't determined > until something is actually passed in so how can intellisense help you out. > > Hope this helps explain what early and late binding are really all about. > > Now... Setting the reference really has nothing to do with any of this OTHER > THAN allowing some specific object type to be found in a library, and thus > be dimensioned to a specific object type. IOW, If I don't reference the > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > object, then store an Excel object (spreadsheet, cell etc) in the variable. > If I reference the excel library, now I can early bind and dimension a > variable as a spreadsheet, or a cell, or whatever I want since those things > can be found in a referenced library. > > So setting the reference is neither early binding nor late binding. It > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > EXCEL CODE... I haven't early or late bound to Excel - I haven't used Excel > in any way whatsoever. However I cannot reference an excel object type (dim > a variable as a cell or spreadsheet etc) unless I reference the Excel > library. > > Referencing a library does nothing more than load (before compiling) a table > of objects inside that library into a table of all possible objects for the > compiler to use to look up dimension statement datatypes in. If a dimension > statement datatype is not found in the table of all possible datatypes, then > a compile error is thrown on the dim statement. > > Clear as mud? > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > Sent: Monday, July 12, 2004 2:50 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] more on early versus late binding > > > I kind of see the terms early and late -- in Access -- a bit differently > than the way most documentation wants to define them. To me, early just > means the library is referenced, hence the objects are instantiated, but not > being used -- late, the object is instantiated at the time it's needed -- > the reference is implicit. > > I see a lot of documentation that refer to setting references manually via > the References dialog box as "early" binding, but using the References > collection and object are never mentioned -- however... > > Seems to me you're setting the reference and instantiating the objects > without using them, so, to my mind, it's early. > > 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 JColby at dispec.com Wed Jul 14 09:30:15 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:30:15 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6B@DISABILITYINS01> Nope, this didn't work either. 8-( JWC -----Original Message----- From: Mackin, Christopher [mailto:CMackin at quiznos.com] Sent: Tuesday, July 13, 2004 4:10 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Preventing user prompts from Excel Try, xlApp.DisplayAlerts False This is off the top of my head so it may nee some minor tweaking, but I think the DisplayAlerts property is what you're after. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 13, 2004 1:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 14 09:33:28 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 16:33:28 +0200 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> Message-ID: <3027243594.20040714163328@cactus.dk> Hi John Oh, it isn't me, but yes you are right. I guess the astronomers have had a big word here: http://wwp.greenwichmeantime.com/info/utc.htm /gustav > Also, note "GMT" has been considered obsolete for years and has for every > serious use been replaced with UTC. > Are you seriously suggesting that the British Empire is not the center of > the Universe anymore? ;-) > So what is UTC (for us internationally challenged individuals). From JColby at dispec.com Wed Jul 14 09:35:36 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:35:36 -0400 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6C@DISABILITYINS01> LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 09:37:58 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:37:58 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> >try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close I get a compile error on xlNormal JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 13, 2004 4:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC From JColby at dispec.com Wed Jul 14 09:43:17 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 10:43:17 -0400 Subject: Late binding - RE: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6E@DISABILITYINS01> LOL. Because I am using late binding, and the xlNormal is a constant in the excel library which I do NOT have referenced I cannot use that constant directly. I have to reference the library, look up that constant and see what it really is (the integer value), then either declare that constant in my own module or simply use that value as a "magic number". This is another value that you get from early binding - the constants defined in the lib are available to you to use in your programming. John W. Colby -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 13, 2004 4:33 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal before you close Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 14 09:44:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 14 Jul 2004 16:44:22 +0200 Subject: [AccessD] Preventing user prompts from Excel In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> References: <05C61C52D7CAD211A7830008C7DF6F1079BD6D@DISABILITYINS01> Message-ID: <11327896893.20040714164422@cactus.dk> Hi John Try with the specific file format: .SaveAs FileName:=strPathFileName, FileFormat:=xlExcel5, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False .Close In addition to this you may need to set Application.DisplayAlerts to False as well. This works for me. /gustav >>try xlApp.ActiveWorkbook.SaveAs Filename:=atrFileName, FileFormat:=xlNormal > before you close > I get a compile error on xlNormal From Jim.Hale at FleetPride.com Wed Jul 14 09:43:45 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Wed, 14 Jul 2004 09:43:45 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDA5@corp-es01.fleetpride.com> Since you are already in the spreadsheet when you rename it why not read the data into a table right then and there. No linking. In fact, you dont even need to rename the sheet because you can use appexcel.worksheet(1) syntax. Something like the code that follows. BTW I solved the problem from an earlier thread of how to force text "numbers" to be recognized by Excel as numbers if that is still a problem for you. Regards, Jim Hale .WorkSheets(1).Select 'erase old data strQry(1) = "DELETE tblOutPut_Data.*, tblOutPut_Data.DEPT, tblOutPut_Data.COMPY " _ & " FROM tblOutPut_Data WHERE (((tblOutPut_Data.DEPT)=" & intBusUnit & ") AND ((tblOutPut_Data.COMPY)=" & intCo & "));" DoCmd.RunSQL strQry(1) 'Read results into tblOutPut_Data table Set dbs = WhichDB("tblOutPut_Data") 'CurrentDb() 'opens the Plan table Set rstbase = dbs.OpenRecordset("tblOutPut_Data", dbOpenTable) On Error Resume Next .Range("A2").Select 'select first cell of first record to read Dim x As Integer Do While Not IsEmpty(ActiveCell) rstbase.AddNew 'create records in output table For x = 0 To 16 If x < 4 Then rstbase.Fields(x) = .ActiveCell.Offset(0, x) 'change sign on Jan-Dec revenue If x > 3 Then If rstbase.Fields("rptline") = 4100 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4110 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4120 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 4130 Then rstbase.Fields(x) = -Round(.ActiveCell.Offset(0, x), 3) ElseIf rstbase.Fields("rptline") = 15000 Then rstbase.Fields(x) = Round(.ActiveCell.Offset(0, x), 3) Else rstbase.Fields(x) = Round(.ActiveCell.Offset(0, x), 3) End If End If Next x If Not rstbase.Fields("rptline") = 0 Then rstbase.Update 'This error occurs if duplicate Business Unit are loaded into the table. 'Business Unit is a primary key so duplicates are not allowed If Err.Number = 3022 Then MsgBox "Error #: " & Err.Number & " This record is already in the Database!", 16, "Error" Err.Clear ' Clear Err object fields End If .ActiveCell.Offset(1, 0).Select 'find first cell of next record Loop -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Tuesday, July 13, 2004 9:57 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel That's what I like, a man with multiple valid suggestions. The answers in all cases is simply that I have always just opened the damned spreadsheet and renamed the sheet to what I wanted. I guess I could open the sheet, close it, open the link and edit that. I am getting a spreadsheet from a client, attached to an email. I use outlook (withevents) to copy the email to a specific email folder (using a rule) then raise an event for each attachment. My code in another class figures out what to do with the attachment including just using the messages .save method to put it in a folder on the disk. I then take that saved email and copy it to another location with a common name (always the same), open the spreadsheet (if it is a spreadsheet, some aren't) and rename the interior sheet since clients can NEVER be expected to name the sheets the same thing from day to day). Having done all that I have a spreadsheet of a given name with an interior sheet of a given name and the link just works. The alternative is to (and I have done this also) save the sheet, get the interior sheet name, open the table def, and edit the filename and sheet name portions and save the tabledef back again. Both do work, both require Excel automation to open the sheet. Anyway, thanks for the suggestions. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Tuesday, July 13, 2004 4:16 PM To: 'Access Developers discussion and problem solving' S From bchacc at san.rr.com Wed Jul 14 10:12:10 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 14 Jul 2004 08:12:10 -0700 Subject: [AccessD] more on early versus late binding References: <05C61C52D7CAD211A7830008C7DF6F1079BD6A@DISABILITYINS01> Message-ID: <00bc01c469b4$efb4a680$6601a8c0@HAL9002> John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 14, 2004 7:26 AM Subject: RE: [AccessD] more on early versus late binding > Rocky, > > The issue isn't that simple. No, after the object is bound the speed is the > same. It's just that the object has to be looked up EVERY TIME it is bound. > If you have a function that opens a spreadsheet, with early binding this is > done ONCE at compile time. With late binding it is done every time the > function is called. OTOH, you no longer have to worry about lib version / > names. > > Tradeoffs. > > JWC > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 13, 2004 11:47 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] more on early versus late binding > > > John: > > Re: speed, after the object is late binded, is there any difference in > execution speed? > > Rocky > > ----- Original Message ----- > From: "jwcolby" > To: "'Access Developers discussion and problem solving'" > > Sent: Monday, July 12, 2004 6:28 PM > Subject: RE: [AccessD] more on early versus late binding > > > > Nope, early is not that, and late is not that. > > > > Early is dimensioning a variable as a specific object type - for example > as > > an excel object or a word object or a command control etc. then > referencing > > the object properties directly. > > > > Dim cbo as combo > > debug.print cbo.Name > > > > Late is dimensioning a variable as an OBJECT data type, then referencing > the > > property but using the "object object". > > > > Dim cbo as object > > debug.print cbo.name > > > > The reason it is called early and late is simply that early binding: > > > > Dim cbo as combo > > > > Causes the compiler (interpreter actually) to find and set a reference to > > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > > > Late binding causes the interpreter to "discover" what the object is by > what > > is stored in the variable AT RUN TIME and look up the properties and stuff > > in the actual object (library, ocx etc) at run time. > > > > Thus the early binding causes the map of dim to real thing without ever > even > > running the code. Late binding simply cannot discover what to do with the > > dimensioned variable until the variable is set = to something. > > > > This is very often used to pass in different things to a function for > > example. > > > > Function MyObject(obj as object) > > debug.print object.name > > End function > > > > Function TestObjects() > > MyObject MyCbo > > MyObject MyForm > > End function > > > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > > document, a combo box. What happens inside of MyObject may or may not be > > legal depending on what you pass in to the function, but you can pass in > ANY > > OBJECT AT ALL because the compiler does not check the dimensioned type > > against the passed in type (other than to determine that it is an object). > > > > Function MyControl(txt As TextBox) > > Debug.Print txt.Name > > End Function > > > > Function TestControls() > > Dim MyCbo As ComboBox > > Dim MyTextBox As TextBox > > Dim MyForm As Form > > Set MyForm = New Form_Form1 > > MyControl MyForm '<<<<< ERROR AT RUN TIME > > MyControl MyCbo > > MyControl MyTextBox > > End Function > > > > Test control will correctly pass in controls but won't run since MyForm is > > dimensioned as a form and at RUN TIME the interpreter checks all calls to > > MyControl to see if what is being passed in is a variable of type control. > > > > With early binding, since you dimension an object specifically to its > object > > type, you can use intellisense because the compiler knows how to find the > > object information. With late binding, the object type isn't determined > > until something is actually passed in so how can intellisense help you > out. > > > > Hope this helps explain what early and late binding are really all about. > > > > Now... Setting the reference really has nothing to do with any of this > OTHER > > THAN allowing some specific object type to be found in a library, and thus > > be dimensioned to a specific object type. IOW, If I don't reference the > > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > > object, then store an Excel object (spreadsheet, cell etc) in the > variable. > > If I reference the excel library, now I can early bind and dimension a > > variable as a spreadsheet, or a cell, or whatever I want since those > things > > can be found in a referenced library. > > > > So setting the reference is neither early binding nor late binding. It > > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > > EXCEL CODE... I haven't early or late bound to Excel - I haven't used > Excel > > in any way whatsoever. However I cannot reference an excel object type > (dim > > a variable as a cell or spreadsheet etc) unless I reference the Excel > > library. > > > > Referencing a library does nothing more than load (before compiling) a > table > > of objects inside that library into a table of all possible objects for > the > > compiler to use to look up dimension statement datatypes in. If a > dimension > > statement datatype is not found in the table of all possible datatypes, > then > > a compile error is thrown on the dim statement. > > > > Clear as mud? > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > > Sent: Monday, July 12, 2004 2:50 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] more on early versus late binding > > > > > > I kind of see the terms early and late -- in Access -- a bit differently > > than the way most documentation wants to define them. To me, early just > > means the library is referenced, hence the objects are instantiated, but > not > > being used -- late, the object is instantiated at the time it's needed -- > > the reference is implicit. > > > > I see a lot of documentation that refer to setting references manually via > > the References dialog box as "early" binding, but using the References > > collection and object are never mentioned -- however... > > > > Seems to me you're setting the reference and instantiating the objects > > without using them, so, to my mind, it's early. > > > > 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 ssharkins at bellsouth.net Wed Jul 14 10:17:38 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 11:17:38 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <00bc01c469b4$efb4a680$6601a8c0@HAL9002> Message-ID: <20040714151738.OWPR1701.imf20aec.mail.bellsouth.net@SUSANONE> My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. From accessd at shaw.ca Wed Jul 14 10:20:16 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 14 Jul 2004 08:20:16 -0700 Subject: [AccessD] Time zones (was: internationalization) In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD69@DISABILITYINS01> Message-ID: Just for information, the new center of the universe is now just outside of Victoria. http://www.hia-iha.nrc-cnrc.gc.ca/cu/main_e.html Jim > Are you seriously suggesting that the British Empire is not the center of > the Universe anymore? ;-) > JWC From GregSmith at starband.net Wed Jul 14 10:43:03 2004 From: GregSmith at starband.net (Greg Smith) Date: Wed, 14 Jul 2004 10:43:03 -0500 (CDT) Subject: [AccessD] Open a File Dialog Box In-Reply-To: <00b401c46969$32d1a860$0100a8c0@razvoj> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> Message-ID: <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net From JColby at dispec.com Wed Jul 14 10:50:43 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 11:50:43 -0400 Subject: [AccessD] more on early versus late binding Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD6F@DISABILITYINS01> Rocky, The Set objX = ... is the key. It is at that instant that the lookup is performed. Every object has stuff inside it that tells the compiler what it is. At that instant the compiler has to set it up such that it's properties and methods can be used. With early binding, that can occur at compile time (and thus one time) since you have specified: Dim xl as Excel.Application (or something similar) With late binding: Dim objX as object Doesn't DO anything except tell the compiler that sometime some OBJECT may be stored here - just hang out and wait for the set= statement. that Set Object= ... ACTUALLY RUNNING then triggers the compiler to look inside the object on the right side of the = for something that the compiler can look up in all of the DLLs and OCXs it has stored in System32 and other locations to see if it can find that something inside one of those DLLs or OCXs. Actually I suspect that it looks inside of each and every one of the objects that are NOT checked in that Reference dialog (until a match is found). THAT is why it is so slow... it has to do a brute force lookup. My guess (and it is just that) is that all of the objects inside all of the CHECKED references are actually loaded into a table when Access loads. These are "early bound", fast. All the unchecked objects have objects inside them as well but since they are not loaded in the table (to save memory and keep the Access load time up) if you late bind... well... we just start searching through each of these unchecked items looking for a match. But it is at the statement Set objX = ... that this lookup occurs. Once looked up, does Access keep the thing in the table? I.e. does doing the late bind act as if you had checked the reference at that instant? Does it load all the stuff from that lib into the lookup table at that instant? The things that keep me up at night. ;-) JWC -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Wednesday, July 14, 2004 11:12 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] more on early versus late binding John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 14, 2004 7:26 AM Subject: RE: [AccessD] more on early versus late binding > Rocky, > > The issue isn't that simple. No, after the object is bound the speed is the > same. It's just that the object has to be looked up EVERY TIME it is bound. > If you have a function that opens a spreadsheet, with early binding this is > done ONCE at compile time. With late binding it is done every time the > function is called. OTOH, you no longer have to worry about lib version / > names. > > Tradeoffs. > > JWC > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 13, 2004 11:47 PM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] more on early versus late binding > > > John: > > Re: speed, after the object is late binded, is there any difference in > execution speed? > > Rocky > > ----- Original Message ----- > From: "jwcolby" > To: "'Access Developers discussion and problem solving'" > > Sent: Monday, July 12, 2004 6:28 PM > Subject: RE: [AccessD] more on early versus late binding > > > > Nope, early is not that, and late is not that. > > > > Early is dimensioning a variable as a specific object type - for example > as > > an excel object or a word object or a command control etc. then > referencing > > the object properties directly. > > > > Dim cbo as combo > > debug.print cbo.Name > > > > Late is dimensioning a variable as an OBJECT data type, then referencing > the > > property but using the "object object". > > > > Dim cbo as object > > debug.print cbo.name > > > > The reason it is called early and late is simply that early binding: > > > > Dim cbo as combo > > > > Causes the compiler (interpreter actually) to find and set a reference to > > the actual object (class, ocx etc) that the cbo truly is AT COMPILE TIME. > > > > Late binding causes the interpreter to "discover" what the object is by > what > > is stored in the variable AT RUN TIME and look up the properties and stuff > > in the actual object (library, ocx etc) at run time. > > > > Thus the early binding causes the map of dim to real thing without ever > even > > running the code. Late binding simply cannot discover what to do with the > > dimensioned variable until the variable is set = to something. > > > > This is very often used to pass in different things to a function for > > example. > > > > Function MyObject(obj as object) > > debug.print object.name > > End function > > > > Function TestObjects() > > MyObject MyCbo > > MyObject MyForm > > End function > > > > MyObject can be passed ANYTHING at all (objects), a spreadsheet, a word > > document, a combo box. What happens inside of MyObject may or may not be > > legal depending on what you pass in to the function, but you can pass in > ANY > > OBJECT AT ALL because the compiler does not check the dimensioned type > > against the passed in type (other than to determine that it is an object). > > > > Function MyControl(txt As TextBox) > > Debug.Print txt.Name > > End Function > > > > Function TestControls() > > Dim MyCbo As ComboBox > > Dim MyTextBox As TextBox > > Dim MyForm As Form > > Set MyForm = New Form_Form1 > > MyControl MyForm '<<<<< ERROR AT RUN TIME > > MyControl MyCbo > > MyControl MyTextBox > > End Function > > > > Test control will correctly pass in controls but won't run since MyForm is > > dimensioned as a form and at RUN TIME the interpreter checks all calls to > > MyControl to see if what is being passed in is a variable of type control. > > > > With early binding, since you dimension an object specifically to its > object > > type, you can use intellisense because the compiler knows how to find the > > object information. With late binding, the object type isn't determined > > until something is actually passed in so how can intellisense help you > out. > > > > Hope this helps explain what early and late binding are really all about. > > > > Now... Setting the reference really has nothing to do with any of this > OTHER > > THAN allowing some specific object type to be found in a library, and thus > > be dimensioned to a specific object type. IOW, If I don't reference the > > excel library, I can STILL USE EXCEL, but I have to late bind, dim as an > > object, then store an Excel object (spreadsheet, cell etc) in the > variable. > > If I reference the excel library, now I can early bind and dimension a > > variable as a spreadsheet, or a cell, or whatever I want since those > things > > can be found in a referenced library. > > > > So setting the reference is neither early binding nor late binding. It > > ENABLES early binding. If I reference the Excel lib, BUT NEVER USE ANY > > EXCEL CODE... I haven't early or late bound to Excel - I haven't used > Excel > > in any way whatsoever. However I cannot reference an excel object type > (dim > > a variable as a cell or spreadsheet etc) unless I reference the Excel > > library. > > > > Referencing a library does nothing more than load (before compiling) a > table > > of objects inside that library into a table of all possible objects for > the > > compiler to use to look up dimension statement datatypes in. If a > dimension > > statement datatype is not found in the table of all possible datatypes, > then > > a compile error is thrown on the dim statement. > > > > Clear as mud? > > > > John W. Colby > > www.ColbyConsulting.com > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Susan Harkins > > Sent: Monday, July 12, 2004 2:50 PM > > To: 'Access Developers discussion and problem solving' > > Subject: RE: [AccessD] more on early versus late binding > > > > > > I kind of see the terms early and late -- in Access -- a bit differently > > than the way most documentation wants to define them. To me, early just > > means the library is referenced, hence the objects are instantiated, but > not > > being used -- late, the object is instantiated at the time it's needed -- > > the reference is implicit. > > > > I see a lot of documentation that refer to setting references manually via > > the References dialog box as "early" binding, but using the References > > collection and object are never mentioned -- however... > > > > Seems to me you're setting the reference and instantiating the objects > > without using them, so, to my mind, it's early. > > > > 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 cfoust at infostatsystems.com Wed Jul 14 10:56:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 08:56:20 -0700 Subject: [AccessD] Open a File Dialog Box Message-ID: You have to use API calls in 97. There are lots of examples of the code on the web and I know it's been posted here. Try searching the archives for "Open File Dialog". Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Wednesday, July 14, 2004 7:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 10:59:58 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 08:59:58 -0700 Subject: [AccessD] more on early versus late binding Message-ID: Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, July 14, 2004 7:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 11:02:41 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 09:02:41 -0700 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: Sure you can, John. You just have to do an end run on MAPI, which is where the security hole looms large. Microsoft poured concrete into the hole, which tends to get in the way when you want to use Outlook. Redemption works nicely because it uses Extended MAPI calls, which are concrete-free so far. ;-} Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Wednesday, July 14, 2004 6:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 14 11:10:49 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jul 2004 12:10:49 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: <20040714151738.OWPR1701.imf20aec.mail.bellsouth.net@SUSANONE> Message-ID: Susan, I've always heard that it's in the 10-15% range, which the few times that I've bothered to check, seems to be about right. You do notice the difference. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Wednesday, July 14, 2004 11:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding My understanding is it's each time you use it because VBA has to go get the particular info for the property, method, whatever. I'm also curious about the speed issue -- I think many times, the things we "learn" are holdovers from the old days when systems really were slow and memory really was an issue. I can't imagine the performance hit for even being noticeable. But then, you might actually see it -- I know I've got a list box that drives me nuts -- first time I use it every day, it takes a second or so to load -- so if this is happening every time... It might actually be important. Does anyone have in actual experience to share on the speed issue? Susan H. John: Another clarification, please: "...every time the function is called." Does this mean every time the "Set ojbX = " is executed or every time I reference the object while I've got the object open. I might set an object to a spread sheet or word doc once but refer to it thousands of times before I close it. And maybe I'm writing simple apps, but I've pretty much given up trying to optimize my code up front for speed and gone for clarity and maintainability instead. Because it doesn't seem to make any difference. I rarely have a client say something is running too slow. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From prodevmg at yahoo.com Wed Jul 14 11:23:20 2004 From: prodevmg at yahoo.com (Lonnie Johnson) Date: Wed, 14 Jul 2004 09:23:20 -0700 (PDT) Subject: [AccessD] Create Table of System Objects ** Free Tip ** Message-ID: <20040714162320.11382.qmail@web20411.mail.yahoo.com> Here is a snippit of code you can put into a module that will create a table of system objects if you would need such a thing. Public Sub CreateObjList() DoCmd.RunSQL "SELECT MSysObjects.DateCreate, MSysObjects.DateUpdate, MSysObjects.Name, GetobjType(MSysObjects.Type) AS ObjectType " _ & " INTO tblSystemObjects From MSysObjects " _ & " WHERE (MSysObjects.Type) In (1,5,6,-32768,-32764,-32761);" End Sub Public Function GetobjType(typeID As Integer) Select Case typeID Case Is = 1 GetobjType = "Table" Case Is = 5 GetobjType = "Query" Case Is = 6 GetobjType = "Attached Table" Case Is = -32768 GetobjType = "Form" Case Is = -32764 GetobjType = "Report" Case Is = -32761 GetobjType = "Module" End Select End Function Happy Coding!!! May God bless you beyond your imagination! Lonnie Johnson ProDev, Professional Development of MS Access Databases Visit me at ==> http://www.prodev.us --------------------------------- Do you Yahoo!? New and Improved Yahoo! Mail - Send 10MB messages! From Mark.Mitsules at ngc.com Wed Jul 14 11:33:49 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 14 Jul 2004 12:33:49 -0400 Subject: [AccessD] Open a File Dialog Box Message-ID: Greg, Here is an example: http://www.mvps.org/access/api/api0001.htm Mark -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Wednesday, July 14, 2004 11:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Wed Jul 14 11:44:00 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Wed, 14 Jul 2004 09:44:00 -0700 Subject: [AccessD] Open a File Dialog Box References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Message-ID: <007801c469c1$c3f0a870$6601a8c0@HAL9002> Greg: I did it but I cribbed it right out of the ADH CD. That's the best place to get it. There's a bunch of constants they use, the Function declarations, and then the code itself. But it works real well. Rocky ----- Original Message ----- From: "Greg Smith" To: Sent: Wednesday, July 14, 2004 8:43 AM Subject: [AccessD] Open a File Dialog Box > Hello everyone! > > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. > > TIA! > Greg Smith > GregSmith at Starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From liz at symphonyinfo.com Wed Jul 14 11:59:21 2004 From: liz at symphonyinfo.com (Liz Doering) Date: Wed, 14 Jul 2004 11:59:21 -0500 Subject: [AccessD] Advantage Database In-Reply-To: <035906120.20040713182948@cactus.dk> Message-ID: Gustav, Thanks so much for the hint--I googled for their ODBC driver and found it as a free download. So I'm in! And able to extract what I need. Thanks to all who replied. Liz -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 13, 2004 11:30 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Advantage Database Hi Liz As far as I know that's a proprietary format. You would probably need to do that from within Advantage or use their ODBC driver if you have that at hand. /gustav > Is anyone aware of any tools or tips for extracting .adt files to any other > format? My boss has promised that we can do this magic.... -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jul 14 13:41:09 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jul 2004 11:41:09 -0700 Subject: [AccessD] Time zones (was: internationalization) References: <2F8793082E00D4119A1700B0D0216BF8017A1F98@main2.marlow.com> <32007103843568110723d0567@global.net.pg> <11525103216.20040714155748@cactus.dk> Message-ID: <40F57E45.3020504@shaw.ca> Here is a digital clock that handles the daylight savings time and standard time differences for time zones, also checks automatically when they switch. This info is carried in WinXP registry. Program uses SYSTEMTIME api's, which I believe won't run below Win2000. Pedro Gil's Clock From Around the World http://www.geocities.com/pmpg98_pt/CodeExamples.html Helen Feddema's program doesn't handle this, so areas that remain on standard time, year round are the wrong time. For example Saskatchewan, this time of year should be same time as Edmonton, I always get it mixed up. They are both in GMT +6 zone but Alberta has DST in winter. Gustav Brock wrote: >Hi all > >This topic popped up in all its glory in the recent issue of "Woody's >Access Watch" where Helen Feddema is goofing around trying to parse >date/time strings to figure out time zones. Of course, this dirty >deroute is paved with traps so it doesn't work outside the US where >other regional settings are used. > >Just in case anyone should have a need for dealing with time zones, >here are a couple of functions we use. You'll quickly notice that >essentially it is nothing more than a little clean up and one single >line of code: > > datRemote = DateAdd("n", lngBias, datLocal) > >If you have nothing to do Friday you may wish to browse Helen's demo: > > ftp://ftp.helenfeddema.com/pub/accarch121.zip > > > > >Public Function TimeZoneBiasDiff( _ > ByVal lngLocalTimeBias As Long, _ > ByVal lngRemoteTimeBias As Long) _ > As Long > >' Calculates the difference in minutes between two time zones, >' typically the local time zone and a remote time zone. >' Both time zones must be expressed by their bias relative to >' UTC (Coordinated Universal Time) which is measured in minutes. >' >' 2000-05-30. Cactus Data ApS, CPH. > > ' Minimum amount of minutes for a time zone bias. > Const clngTimeZoneBiasMin As Long = 15 > > Dim lngTimeZoneBiasDiff As Long > > ' Round off time zone bias by minimum time zone difference. > lngLocalTimeBias = lngLocalTimeBias \ clngTimeZoneBiasMin > lngLocalTimeBias = lngLocalTimeBias * clngTimeZoneBiasMin > lngRemoteTimeBias = lngRemoteTimeBias \ clngTimeZoneBiasMin > lngRemoteTimeBias = lngRemoteTimeBias * clngTimeZoneBiasMin > > ' Calculate difference in time zone bias. > lngTimeZoneBiasDiff = lngRemoteTimeBias - lngLocalTimeBias > > TimeZoneBiasDiff = lngTimeZoneBiasDiff > >End Function > >Public Function DateAddTimeZoneDiff( _ > ByVal datLocal As Date, _ > ByVal lngLocalBias, _ > ByVal lngRemoteBias) _ > As Date > >' Calculates the date/time of datLocal in a remote time zone. >' The difference in minutes will be the difference between the >' local time zone bias and the remote time zone bias where the >' bias are relative to UTC. >' >' Examples: >' >' datRemote = DateAddTimeZoneDiff(Now(), 60, -600) >' will return datRemote as eleven hours behind local time. >' >' datRemote = DateAddTimeZoneDiff(Now(), -600, 60) >' will return datRemote as eleven hours ahead of local time. >' >' 2000-05-30. Cactus Data ApS, CPH. > > Dim datRemote As Date > Dim lngBias As Long > > ' Get difference (in minutes) in time zone bias. > lngBias = TimeZoneBiasDiff(lngLocalBias, lngRemoteBias) > ' Calculate remote date/time. > datRemote = DateAdd("n", lngBias, datLocal) > > DateAddTimeZoneDiff = datRemote > >End Function > > > >Also, note "GMT" has been considered obsolete for years and has for >every serious use been replaced with UTC. > >/gustav > > > > >>On 27 Nov 2002 at 15:45, Gustav Brock wrote: >> >> > > > >>>Hi Drew >>> >>> >>> >>>>Thanks. Next version I'll incorporate that. >>>> >>>> >>>OK. >>> >>> >>> >>>>Time zones are pretty easy. In fact, all of this date stuff is too. The >>>>only real monster is Arizona, which decreed to ignore daylight savings time. >>>> >>>> >>>So how DO you deal with the time zones? >>> >>>I have seen no options in Access for this contrary to Oracle which can >>>record date/time including the time zone. >>> >>>My thought was to use a byte field with a shifted value similar to how >>>MySQL can store a year value in a byte field ... >>> >>> >>> > > > >>You could get the Bias member of the Time_Zone_Information structure >>retrieved with the GetTimeZoneInformation API function and either >>apply it to the time in question or store it in another field as a >>long (or integer if space is critical) >> >>Stuart >> >> > > > -- Marty Connelly Victoria, B.C. Canada From dwaters at usinternet.com Wed Jul 14 13:53:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 13:53:28 -0500 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <21312683.1089820438290.JavaMail.root@sniper2.usinternet.com> Message-ID: <000001c469d3$d9cf8b90$de1811d8@danwaters> Greg, I use a downloaded example from Candace Tripp's site. She has versions for A97 and for A2K and up. Works great! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Wednesday, July 14, 2004 10:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Open a File Dialog Box Hello everyone! I know I've seen it discussed here before but I couldn't find it in the archives (probably due to operator error...mine...). I need to have a 'browse' button on a form that will allow the users to open the File Dialog Box (the normal Windows one) so they can browse to the file the program needs if necessary. Normally they will not have to do this, but, things will not always be 'normal' in real life. This gives them the option to go find the file using a familiar interface. Is this done using an API call or can it be done strictly thru VB? I'm using Access 97 currently. TIA! Greg Smith GregSmith at Starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 13:53:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 13:53:28 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <23859127.1089815973824.JavaMail.root@sniper2.usinternet.com> Message-ID: <000101c469d3$da9329b0$de1811d8@danwaters> Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Wed Jul 14 14:12:06 2004 From: JColby at dispec.com (Colby, John) Date: Wed, 14 Jul 2004 15:12:06 -0400 Subject: [AccessD] Outlook Asks Too Many Questions Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD70@DISABILITYINS01> Isn't that an exchange thing though? JWC -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 14, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From clh at christopherhawkins.com Wed Jul 14 14:31:39 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 14 Jul 2004 13:31:39 -0600 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: <271270-22004731419313953@christopherhawkins.com> Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com From DWUTKA at marlow.com Wed Jul 14 14:53:30 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Wed, 14 Jul 2004 14:53:30 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Support at CorporateDataDesign.com Wed Jul 14 14:58:46 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 15:58:46 -0400 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <02ca01c469dc$fc1d3270$0501a8c0@OFFICEXP1> I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits From jmhla at earthlink.net Wed Jul 14 14:59:09 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Wed, 14 Jul 2004 12:59:09 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 ATTN Jim Lawrence In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: <002501c469dd$0a387ea0$6501a8c0@delllaptop> Need your e address Would like same link. JOE HECHT LOS ANGELES CA jmhla at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 15:12:43 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 13:12:43 -0700 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: Define connections. Are you using ADO or DAO recordsets, and are you talking about concurrent users or concurrent connections (not the same thing). You can get info on current users by using the ADO OpenSchema method to get a Jet User Roster. It simply reports on the specific machines connected to the database and will also return logins if Access security is being used. I think Susan did an article on this for some publication, and I've used an elaboration of it in a utility we built for our customers. Charlotte Foust -----Original Message----- From: Christopher Hawkins [mailto:clh at christopherhawkins.com] Sent: Wednesday, July 14, 2004 11:32 AM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Wed Jul 14 15:20:34 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:20:34 +0200 Subject: [AccessD] Binding form/subform to ADO recordset Message-ID: <20040714201859.DFDDC5B294@smtp8.wanadoo.nl> Hi all, I am still working on my ADP and slowly moving on to ADO wisdom:-) However I've run into the following situation and I hope someone knows the solution... Situation: A2K3 - ADP - SQL server 2000 Two forms, Main and sub (datasheet) on main, relation one-to-many The Mainform as well as the subForm get bound on the 'OnOpen' event of the mainform using ADO recordsets which are closed and set to nothing once bound to the form/datasheet. This works great.. editing records no problem BUT adding a new record to the sub datasheet results in an error: "Key value for this row was changed or deleted at the datastore. The local row is now deleted" I have been snooping the internet and I should probably make somehow use of the 'Uniquetable' property and the 'Resync Command' but does anybody know how and where? (form or code or both, what event?) I've seen code from MS (http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com :80/support/kb/articles/Q251/0/21.ASP &NoWebContent=1) which uses a recordset addnew - update though my records are bound to this datasheet and my recordset is long gone... now I wonder if I'll be able to get this to work? Tia, Eric Starkenburg _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:20:34 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:24:43 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:24:43 +0200 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <02ca01c469dc$fc1d3270$0501a8c0@OFFICEXP1> Message-ID: <20040714202308.83FE45B37F@smtp8.wanadoo.nl> Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:27:39 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:27:39 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <20040714202604.412D05AFE1@smtp8.wanadoo.nl> Yes, Microsoft has some code which makes use of ADO and some sort of specific schema and is able to tell you what connections are made to the MDB (BE) you refer to... They also have a tool I believe and there are ways to read LDB's also... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Christopher Hawkins Verzonden: woensdag 14 juli 2004 21:32 Aan: accessd at databaseadvisors.com Onderwerp: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:27:39 avast! auteursrecht (c) 2000-2004 ALWIL Software. From starkey at wanadoo.nl Wed Jul 14 15:32:33 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:32:33 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: <20040714203058.339E55A67C@smtp8.wanadoo.nl> Here's the code I once used... Hope this works for you too: Dim cn As New ADODB.Connection, rs As New ADODB.Recordset Dim i As Integer cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & GetBEpath & ";Jet OLEDB:Database Password=" & YourPassword ' The user roster is exposed as a provider-specific schema rowset ' in the Jet 4 OLE DB provider. You have to use a GUID to ' reference the schema, as provider-specific schemas are not ' listed in ADO's type library for schema rowsets Set rs = cn.OpenSchema(adSchemaProviderSpecific, , "{947bb102-5d43-11d1-bdbf-00c04fb92675}") 'Output the list of all users in the current database. 'Debug.Print rs.Fields(0).Name, "", rs.Fields(1).Name, _ '"", rs.Fields(2).Name, rs.Fields(3).Name While Not rs.EOF ' Debug.Print rs.Fields(0), rs.Fields(1), _ ' rs.Fields(2), rs.Fields(3) i = i + 1 rs.MoveNext Wend cn.Close ShowUserRosterMultipleUsers = i - 1 '1e row is fieldnames G_Exit: Set cn = Nothing Set rs = Nothing Exit Function -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Christopher Hawkins Verzonden: woensdag 14 juli 2004 21:32 Aan: accessd at databaseadvisors.com Onderwerp: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:32:33 avast! auteursrecht (c) 2000-2004 ALWIL Software. From Support at CorporateDataDesign.com Wed Jul 14 15:31:21 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 16:31:21 -0400 Subject: [AccessD] Outlook and Access, Linking In-Reply-To: <20040714202308.83FE45B37F@smtp8.wanadoo.nl> Message-ID: <02d801c469e1$8981a6b0$0501a8c0@OFFICEXP1> Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 15:35:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 15:35:46 -0500 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <16441981.1089834005989.JavaMail.root@sniper5.usinternet.com> Message-ID: <000001c469e2$24d4aea0$de1811d8@danwaters> Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Wed Jul 14 15:35:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 15:35:46 -0500 Subject: [AccessD] Outlook Asks Too Many Questions In-Reply-To: <18654129.1089833246967.JavaMail.root@sniper3.usinternet.com> Message-ID: <000101c469e2$254bda70$de1811d8@danwaters> Right! It doesn't do individual users any good. ;-( Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 2:12 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Isn't that an exchange thing though? JWC -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 14, 2004 2:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Wednesday, July 14, 2004 9:36 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions LOL. MS did NOT fix a security weakness. Email messages are supposed to be allowed to carry messages, and my code is SUPPOSED to be able to send email. MS fixed potential lawsuits by ambulance chasers by firing a huge nuclear weapon directly into the sun, destroying the solar system and (incidentally) stopping all such lawsuits. IOW, yes, you have an object model, and yes you can program outlook, but no you cannot use MICROSOFTS EMAIL PROGRAM TO PROGRAMATICALLY SEND EMAIL. JWC -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 14, 2004 10:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook Asks Too Many Questions Chris and Rocky, Google "Redemption" and you'll find a solution to this problem (which is caused, incidentally, because MS fixed a security weakness in earlier versions that allowed malicious code to be, um, malicious). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Chris Kettenbach Sent: Tuesday, July 13, 2004 11:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Outlook Asks Too Many Questions I have the same issue. If they check the allow for checkbox, you can make it work for like 10 minutes without prompting you. This should be enough time to send the emails. Hope this helps. Chris -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 13, 2004 8:18 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Outlook Asks Too Many Questions Dear List: I have a program which send out batches of emails. I'm now, thanks to the list, using late binding, and the Outlook object model. Recently the client upgraded to Office XP from O2K. Now when she sends a batch of emails she gets a message that says "A program is trying to automatically send e-mail on your behalf. Do you want to allow this?" (yes, no, help). Help says it is because I'm using the VBA command .Send (which is true). So helpful and yet so annoying. Thank you MS for watching over me and my apps. Is there a way to suppress this message? If she sends 100 e-mails, she has to answer this question 100 times. MTIA is -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 14 15:45:56 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 14 Jul 2004 16:45:56 -0400 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> Message-ID: Christopher, <> As Charlotte pointed out, you can used the JET roster to get the list of users, or if DAO, there are the functions built into MSLDBUSR.DLL lib, or you can monitor the number of connections to the MDB through the server <> That is pushing it for a JET based app, mostly for stability reasons, but a well written app running on a solid network would not freeze. <> If that's going on, then the MDB is corrupt. You should create a new backend. <> 1. Make sure everyone is using JET SP 8.0 2. Set the FE to maintain an open connection to the backend for the life of the app (ie. open a hidden form bound to a table at startup and close at exit) 3. Turn off sub datasheets on all tables. 4. Turn off name autocorrect 5. If NT/Win 2K server for the BE, turn off opportunistic locking. 6. Make sure the FE's and BE are not being virus scanned. Those are the biggies. See: HOW TO: Keep a Jet 4.0 Database in Top Working Condition http://support.microsoft.com/default.aspx?scid=kb;EN-US;300216 for additional pointers. Note however that using ADO is *slower* then DAO on a JET MDB. The article implies that your better off, but what it really means is that your better to use the OLEDB provider instead of ODBC if using ADO. Jim Dettman President, Online Computer Services of WNY, Inc. (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 3:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From starkey at wanadoo.nl Wed Jul 14 15:49:27 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Wed, 14 Jul 2004 22:49:27 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <000001c469e2$24d4aea0$de1811d8@danwaters> Message-ID: <20040714204752.185D55B317@smtp8.wanadoo.nl> Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. From clh at christopherhawkins.com Wed Jul 14 15:52:36 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Wed, 14 Jul 2004 14:52:36 -0600 Subject: [AccessD] Monitoring concurrent connactions to the BE? Message-ID: <122190-220047314205236569@christopherhawkins.com> Connections might not have been the best word to use. Everything is being done with bound forms; the hobbyist hwo built it does not know how to use recordsets. I'm trying to figure out how many people are actually doing CRUD operations against the database at a given time. -C- ---- Original Message ---- From: cfoust at infostatsystems.com To: accessd at databaseadvisors.com, Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Date: Wed, 14 Jul 2004 13:12:43 -0700 >Define connections. Are you using ADO or DAO recordsets, and are you >talking about concurrent users or concurrent connections (not the >same >thing). You can get info on current users by using the ADO >OpenSchema >method to get a Jet User Roster. It simply reports on the specific >machines connected to the database and will also return logins if >Access >security is being used. I think Susan did an article on this for >some >publication, and I've used an elaboration of it in a utility we built >for our customers. > >Charlotte Foust > >-----Original Message----- >From: Christopher Hawkins [mailto:clh at christopherhawkins.com] >Sent: Wednesday, July 14, 2004 11:32 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] Monitoring concurrent connactions to the BE? > > >Hello, all. I've got a client who's running a homegrown Access app. >I probably don't even need to continue, you KNOW it's going to end up >badly. ;) > >I'll ask my main question up front: is there a utility that will >allow >me to track the number of concurrent connections that are being made >to >a .mdb back-end? I need to know what the peak number of concurrent >connections is for a given file, and I need to know what time frame >that >peak takes place in. > >Now, those of you who enjoy case studies can read the rest. > >THE PROBLEM: The FE's are locking up, forcing users to exit and >re-enter >the app. Records that were being viewed, added or edited at the >time of >the lock-up sometimes disappear and have to be re-keyed. >Sometimes a record that was keyed in successfully will turn up >missing >later. > >THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in >size. >Yes, even after compressing. The front-end is an Access 2003 .mde >file >with links directly to the back-end. > >THE INSTALL BASE: The FE is installed on 40-ish desktops locally, >with >another 40-ish users accessing the app via Terminal Services. >All in all, there are 80-ish potential connections to the back-end. >And frankly, this is where I think the problem is. > >THE USAGE PATTERN: The proscribed method of use is to add or update >records as one works during the day. > >What is actually happening is that nobody uses the app at all until >about 4pm, when EVERYONE logs in to do all their CRUD operations for >the >day. On Friday, it is 4pm all day long as people hammer the system >to >get things into the db that they blew off during the week. > >MY TAKE: The idea that 80 concurrent connections would slow or >outright >freeze an Access app makes sense. The idea that if you'd lose your >record if Access froze in the middle of keying it makes sense, if >less >so; they're using bound forms, so I'd expect that whatever portion of >the record was keyed pre-freeze would be saved. >The idea that successfully keyed-in records would disappear at some >unknown time between now and (for example) next week makes NO sense >to >me, however. If it's in, it's in, right? Even 255 concurrent >connections won't cause data to be deleted. Someone has to >explicitly >delete it (even if they don't know they're deleting it), correct? > >WHAT I'M CHECKING: For the 'records get keyed in then disappear' >issue >I have made sure that warnings are turned on, and that there isn't >any >code turning them off without turning them back on. That eliminates >the >possibility that people are fat-fingering the Del key and killing >records without knowing it. I have also checked their settings; >Default >Record Locking is set to No Locks. > >WHAT I WANT: I want a utility that will let me track the number of >concurrent connections that are being made to the back-end at any >given >time. In addition to knowing what the peak number of connections >is, I >want a way to know at what time that peak is hit. >I want to see the connection count increasing, up the peak, and >decreasing as people log off. I need to pinpoint the period of >heaviest >load. > >Now, before anyone suggests it, I have already counseled the client >to >move to SQL Server and to their credit, that project is on the >schedule! >My immediate concern is to keep their Access app alive and useful >until >the transition to SQL takes place - the app is absolutely >mission-critical. > >NOTE: a discussion of why my client deployed a hobbyist's first app >in >a mission-critical role is best left for a different day (although I >suspect it's a matter of stepping over dollars to pick up dimes). > >-Christopher Hawkins- >www.christopherhawkins.com > > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > From lists at theopg.com Wed Jul 14 16:06:00 2004 From: lists at theopg.com (MarkH) Date: Wed, 14 Jul 2004 22:06:00 +0100 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <20040714201859.DFDDC5B294@smtp8.wanadoo.nl> Message-ID: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> Hi Folks This is a question I've been meaning to ask for a while and never got round to it... Is there a simple one line way to erase / clear a UDT after its finished with, as opposed to clearing the variables within it individually? Cheers Mark From ssharkins at bellsouth.net Wed Jul 14 16:30:21 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 14 Jul 2004 17:30:21 -0400 Subject: [AccessD] more on early versus late binding In-Reply-To: Message-ID: <20040714213016.EKLW1776.imf21aec.mail.bellsouth.net@SUSANONE> That's exactly the problem -- it just isn't slow enough for me to bother with -- but I can see how several spots like this would annoy a user. Susan H. Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. From Support at CorporateDataDesign.com Wed Jul 14 16:30:54 2004 From: Support at CorporateDataDesign.com (John Skolits) Date: Wed, 14 Jul 2004 17:30:54 -0400 Subject: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" In-Reply-To: <02d801c469e1$8981a6b0$0501a8c0@OFFICEXP1> Message-ID: <000001c469e9$db0a5380$0501a8c0@OFFICEXP1> I really wanted to do a linking but not all the fields are available. But If is Use code and use Dim c As Outlook.ContactItem You can get the user field by using c.UserProperties(i). Where "i" is the enumerated value of the fields you created. I created 2 fields so they are: c.UserProperties(1) and c.UserProperties(2). C .UserProperties(1).NAME will give your field name. So I guess I'll just run an import routine on startup and load everyone into my database that way. John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Skolits Sent: Wednesday, July 14, 2004 4:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Wed Jul 14 17:37:35 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 14 Jul 2004 15:37:35 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: Hi Drew: Sorry about not getting the message to you but I did check to see whether the message was created as a reply to you off-line email, it was, checked to see whether the message was actually sent, it was and checked to see whether an undelivered error message was returned from my ISP, it was not, so I had assumed everything went through. Please send me an off-line message again and I will send you the file coordinates ASAP. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Wed Jul 14 17:58:27 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 14 Jul 2004 17:58:27 -0500 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <30232278.1089838774504.JavaMail.root@sniper6.usinternet.com> Message-ID: <000001c469f6$13b35e50$de1811d8@danwaters> Eric, The article does limit itself to A02. But I have read or heard somewhere that the bloating problem experienced by A02 also occurs in A03. If that's wrong then someone please speak up. I would suggest that Christopher take a copy of the BE he has, change it to A2K format, and then compact it. If it reduces in size a significant amount, then most likely the bloating problem was affecting it. In any case, if it does reduce in size then that's a better BE. I know of no issues/problems with setting a BE format to A2K format rather than A02 or A03. Again, if that not correct then someone please speak up. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 3:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 14 18:10:14 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 14 Jul 2004 16:10:14 -0700 Subject: [AccessD] more on early versus late binding Message-ID: That depends on the class of machine the app runs on. A momentary delay on a fast machine is no big deal, but if your form has a LOT of combos and listboxes populated that way, it can be a noticeable annoyance. I dealt with a situation like this by creating several stored queries and swapping them out as the rowsource of a combobox in code to avoid the delay that otherwise occured when loading an unbound form. Charlotte Foust -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Wednesday, July 14, 2004 1:30 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] more on early versus late binding That's exactly the problem -- it just isn't slow enough for me to bother with -- but I can see how several spots like this would annoy a user. Susan H. Susan, Your listbox sounds like it might be based on a select statement in its rowsource property. You can speed it up by switching to a saved query and swapping out queries or paramters if you need to in order to change the list contents. A select statement gets compiled the first time you run it in a session. That takes a while. After that, it stays compiled for the rest of the session. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Wed Jul 14 21:22:58 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Wed, 14 Jul 2004 19:22:58 -0700 Subject: [AccessD] Monitoring concurrent connactions to the BE? References: <122190-220047314205236569@christopherhawkins.com> Message-ID: <40F5EA82.40301@shaw.ca> You could run a Replica farm on the server. I seem to remember Arthur advocating something like this. So that the first 20 user who logon get directed to one replica mdb, the next 20 to another etc. Just keep one backend mdb that tracks a user table of who is on. Then shovel them to the appropriate replica backend. Then consolidate the replicas once a day to the master. It might be faster to convert to SQL than create the replicas if you are not familar with it.. Christopher Hawkins wrote: >Connections might not have been the best word to use. Everything is >being done with bound forms; the hobbyist hwo built it does not know >how to use recordsets. I'm trying to figure out how many people are >actually doing CRUD operations against the database at a given time. > >-C- > >---- Original Message ---- >From: cfoust at infostatsystems.com >To: accessd at databaseadvisors.com, >Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? >Date: Wed, 14 Jul 2004 13:12:43 -0700 > > > >>Define connections. Are you using ADO or DAO recordsets, and are you >>talking about concurrent users or concurrent connections (not the >>same >>thing). You can get info on current users by using the ADO >>OpenSchema >>method to get a Jet User Roster. It simply reports on the specific >>machines connected to the database and will also return logins if >>Access >>security is being used. I think Susan did an article on this for >>some >>publication, and I've used an elaboration of it in a utility we built >>for our customers. >> >>Charlotte Foust >> >>-----Original Message----- >>From: Christopher Hawkins [mailto:clh at christopherhawkins.com] >>Sent: Wednesday, July 14, 2004 11:32 AM >>To: accessd at databaseadvisors.com >>Subject: [AccessD] Monitoring concurrent connactions to the BE? >> >> >>Hello, all. I've got a client who's running a homegrown Access app. >>I probably don't even need to continue, you KNOW it's going to end up >>badly. ;) >> >>I'll ask my main question up front: is there a utility that will >>allow >>me to track the number of concurrent connections that are being made >>to >>a .mdb back-end? I need to know what the peak number of concurrent >>connections is for a given file, and I need to know what time frame >>that >>peak takes place in. >> >>Now, those of you who enjoy case studies can read the rest. >> >>THE PROBLEM: The FE's are locking up, forcing users to exit and >>re-enter >>the app. Records that were being viewed, added or edited at the >>time of >>the lock-up sometimes disappear and have to be re-keyed. >>Sometimes a record that was keyed in successfully will turn up >>missing >>later. >> >>THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in >>size. >>Yes, even after compressing. The front-end is an Access 2003 .mde >>file >>with links directly to the back-end. >> >>THE INSTALL BASE: The FE is installed on 40-ish desktops locally, >>with >>another 40-ish users accessing the app via Terminal Services. >>All in all, there are 80-ish potential connections to the back-end. >>And frankly, this is where I think the problem is. >> >>THE USAGE PATTERN: The proscribed method of use is to add or update >>records as one works during the day. >> >>What is actually happening is that nobody uses the app at all until >>about 4pm, when EVERYONE logs in to do all their CRUD operations for >>the >>day. On Friday, it is 4pm all day long as people hammer the system >>to >>get things into the db that they blew off during the week. >> >>MY TAKE: The idea that 80 concurrent connections would slow or >>outright >>freeze an Access app makes sense. The idea that if you'd lose your >>record if Access froze in the middle of keying it makes sense, if >>less >>so; they're using bound forms, so I'd expect that whatever portion of >>the record was keyed pre-freeze would be saved. >>The idea that successfully keyed-in records would disappear at some >>unknown time between now and (for example) next week makes NO sense >>to >>me, however. If it's in, it's in, right? Even 255 concurrent >>connections won't cause data to be deleted. Someone has to >>explicitly >>delete it (even if they don't know they're deleting it), correct? >> >>WHAT I'M CHECKING: For the 'records get keyed in then disappear' >>issue >>I have made sure that warnings are turned on, and that there isn't >>any >>code turning them off without turning them back on. That eliminates >>the >>possibility that people are fat-fingering the Del key and killing >>records without knowing it. I have also checked their settings; >>Default >>Record Locking is set to No Locks. >> >>WHAT I WANT: I want a utility that will let me track the number of >>concurrent connections that are being made to the back-end at any >>given >>time. In addition to knowing what the peak number of connections >>is, I >>want a way to know at what time that peak is hit. >>I want to see the connection count increasing, up the peak, and >>decreasing as people log off. I need to pinpoint the period of >>heaviest >>load. >> >>Now, before anyone suggests it, I have already counseled the client >>to >>move to SQL Server and to their credit, that project is on the >>schedule! >>My immediate concern is to keep their Access app alive and useful >>until >>the transition to SQL takes place - the app is absolutely >>mission-critical. >> >>NOTE: a discussion of why my client deployed a hobbyist's first app >>in >>a mission-critical role is best left for a different day (although I >>suspect it's a matter of stepping over dollars to pick up dimes). >> >>-Christopher Hawkins- >>www.christopherhawkins.com >> >> >> >> >> Marty Connelly Victoria, B.C. Canada From connie.kamrowski at agric.nsw.gov.au Wed Jul 14 21:36:00 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 15 Jul 2004 12:36:00 +1000 Subject: [AccessD] Re: Invalid reference to the property Form/Report Message-ID: Thanks for the help. I restored a previous copy, redid all changes and started over. Incedentally, this morning I opened the old database in error on a test machine and it works, the problem has disappeared as mysteriously as it appeared. Microsoft! Where are Mulder and Scully when you need them! Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From mgauk at btconnect.com Thu Jul 15 02:47:30 2004 From: mgauk at btconnect.com (mgauk at btconnect.com) Date: Thu, 15 Jul 2004 08:47:30 +0100 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <007801c469c1$c3f0a870$6601a8c0@HAL9002> Message-ID: <200407150747.i6F7lUQ16159@databaseadvisors.com> You could easily adapt the coding I sent in reply to printing DOC files. See subject ref: Re: [AccessD] Batch printing the .doc files from a folder Posted a couple of days ago Max Sherman -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin - Beach Access Software Sent: 14 July 2004 17:44 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Open a File Dialog Box Greg: I did it but I cribbed it right out of the ADH CD. That's the best place to get it. There's a bunch of constants they use, the Function declarations, and then the code itself. But it works real well. Rocky ----- Original Message ----- From: "Greg Smith" To: Sent: Wednesday, July 14, 2004 8:43 AM Subject: [AccessD] Open a File Dialog Box > Hello everyone! > > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. > > TIA! > Greg Smith > GregSmith at Starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.719 / Virus Database: 475 - Release Date: 12/07/2004 From gustav at cactus.dk Thu Jul 15 02:27:51 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 09:27:51 +0200 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> References: <000f01c469e6$5da1dce0$2f0d6bd5@netboxxp> Message-ID: <1212580550.20040715092751@cactus.dk> Hi Mark > This is a question I've been meaning to ask for a while and never got > round to it... Is there a simple one line way to erase / clear a UDT > after its finished with, as opposed to clearing the variables within it > individually? Not that I know of. But you define a global variable as your UDT. This will, of course, be empty. Then, when you need to "reset" your local variable, set it to the global variable: Dim tLocal As MARK tLocal = tEmpty /gustav From gustav at cactus.dk Thu Jul 15 02:51:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 09:51:03 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <271270-22004731419313953@christopherhawkins.com> References: <271270-22004731419313953@christopherhawkins.com> Message-ID: <173972271.20040715095103@cactus.dk> Hi Christopher > I'll ask my main question up front: is there a utility that will > allow me to track the number of concurrent connections that are being > made to a .mdb back-end? I need to know what the peak number of > concurrent connections is for a given file, and I need to know what > time frame that peak takes place in. You could have a look at Gary's Access Workbench: http://www.vb123.com/workbench/ ".. It will allow you to see the users/computers using your database, lock out new users so that you can make do maintenance .." "If you have a lot of users or trouble getting everyone to log off, you may need the internal logging database. This logs Windows User IDs and even allows you to schedule shutdowns of your database. This database comes with full Access source code and objects." It's a USD 90 purchase. I haven't used it so I cannot tell more. /gustav From starkey at wanadoo.nl Thu Jul 15 07:02:02 2004 From: starkey at wanadoo.nl (StaRKeY) Date: Thu, 15 Jul 2004 14:02:02 +0200 Subject: [AccessD] Monitoring concurrent connactions to the BE? In-Reply-To: <000001c469f6$13b35e50$de1811d8@danwaters> Message-ID: <20040715120016.AE4C352F0D@smtp4.wanadoo.nl> I was just wondering since I hadn't heard of this problem yet, interesting to know though. Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: donderdag 15 juli 2004 00:58 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Eric, The article does limit itself to A02. But I have read or heard somewhere that the bloating problem experienced by A02 also occurs in A03. If that's wrong then someone please speak up. I would suggest that Christopher take a copy of the BE he has, change it to A2K format, and then compact it. If it reduces in size a significant amount, then most likely the bloating problem was affecting it. In any case, if it does reduce in size then that's a better BE. I know of no issues/problems with setting a BE format to A2K format rather than A02 or A03. Again, if that not correct then someone please speak up. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 3:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Monitoring concurrent connactions to the BE? Are you sure Dan? KB 810415 refers to A2K2 not A2K3.... Thnx, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens Dan Waters Verzonden: woensdag 14 juli 2004 22:36 Aan: 'Access Developers discussion and problem solving' Onderwerp: RE: [AccessD] Monitoring concurrent connactions to the BE? Ouch! What fun! A couple of thoughts: 1) You can look at KB 285822 to read how to programmatically determine how many users are logged in. I've used the information to limit the number of users to a set quantity (part of a seat licensing scheme). If you're set for 20 users, user 21 logs in, gets a 'too many people' message, and immediately gets kicked out! Of course, you'll have to set expectations about the 4:00 pm rush. ;-) You could also set up a routine that runs every few minutes and records the number of users into a table along with the current time. You can also record who gets automatically booted out and when - this gives you objective information when people start complaining and management wants to know the real info. 2) Is your 2003 BE in 2003 Format? If so, compacting is probably not reducing the size of the BE very much. Change the BE to 2000 format and it will compact correctly. You can read about this in KB 810415. Best of Luck! -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Christopher Hawkins Sent: Wednesday, July 14, 2004 2:32 PM To: accessd at databaseadvisors.com Subject: [AccessD] Monitoring concurrent connactions to the BE? Hello, all. I've got a client who's running a homegrown Access app. I probably don't even need to continue, you KNOW it's going to end up badly. ;) I'll ask my main question up front: is there a utility that will allow me to track the number of concurrent connections that are being made to a .mdb back-end? I need to know what the peak number of concurrent connections is for a given file, and I need to know what time frame that peak takes place in. Now, those of you who enjoy case studies can read the rest. THE PROBLEM: The FE's are locking up, forcing users to exit and re-enter the app. Records that were being viewed, added or edited at the time of the lock-up sometimes disappear and have to be re-keyed. Sometimes a record that was keyed in successfully will turn up missing later. THE SETUP: The back-end is an Access 2003 .mdb file about 500MB in size. Yes, even after compressing. The front-end is an Access 2003 .mde file with links directly to the back-end. THE INSTALL BASE: The FE is installed on 40-ish desktops locally, with another 40-ish users accessing the app via Terminal Services. All in all, there are 80-ish potential connections to the back-end. And frankly, this is where I think the problem is. THE USAGE PATTERN: The proscribed method of use is to add or update records as one works during the day. What is actually happening is that nobody uses the app at all until about 4pm, when EVERYONE logs in to do all their CRUD operations for the day. On Friday, it is 4pm all day long as people hammer the system to get things into the db that they blew off during the week. MY TAKE: The idea that 80 concurrent connections would slow or outright freeze an Access app makes sense. The idea that if you'd lose your record if Access froze in the middle of keying it makes sense, if less so; they're using bound forms, so I'd expect that whatever portion of the record was keyed pre-freeze would be saved. The idea that successfully keyed-in records would disappear at some unknown time between now and (for example) next week makes NO sense to me, however. If it's in, it's in, right? Even 255 concurrent connections won't cause data to be deleted. Someone has to explicitly delete it (even if they don't know they're deleting it), correct? WHAT I'M CHECKING: For the 'records get keyed in then disappear' issue I have made sure that warnings are turned on, and that there isn't any code turning them off without turning them back on. That eliminates the possibility that people are fat-fingering the Del key and killing records without knowing it. I have also checked their settings; Default Record Locking is set to No Locks. WHAT I WANT: I want a utility that will let me track the number of concurrent connections that are being made to the back-end at any given time. In addition to knowing what the peak number of connections is, I want a way to know at what time that peak is hit. I want to see the connection count increasing, up the peak, and decreasing as people log off. I need to pinpoint the period of heaviest load. Now, before anyone suggests it, I have already counseled the client to move to SQL Server and to their credit, that project is on the schedule! My immediate concern is to keep their Access app alive and useful until the transition to SQL takes place - the app is absolutely mission-critical. NOTE: a discussion of why my client deployed a hobbyist's first app in a mission-critical role is best left for a different day (although I suspect it's a matter of stepping over dollars to pick up dimes). -Christopher Hawkins- www.christopherhawkins.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:49:27 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 15-7-2004 14:02:02 avast! auteursrecht (c) 2000-2004 ALWIL Software. From paul.hartland at fsmail.net Thu Jul 15 07:39:35 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 15 Jul 2004 14:39:35 +0200 (CEST) Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <9557318.1089895175124.JavaMail.www@wwinf3004> To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From HollisVJ at pgdp.usec.com Thu Jul 15 07:58:36 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 15 Jul 2004 07:58:36 -0500 Subject: [AccessD] Set Outlook Properties in Access Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> I am trying to send automated emails through Outlook from Access. I found this link from Microsoft that tells how to do this. http://msdn.microsoft.com/office/understanding/access/codesamples/default.as px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp I run into the problem with the security settings - where it pops up the message about a potential virus and if you want to do this and for how long. I figure this just 'may' scare off users - imagine that. Anyway, is there a way to set the Outlook security settings (Tools, Macros, Security) through Access code, to Low, send the email and then reset their security to High or Medium again? I figure there should be a way to do this for Outlook similar to setting the startup properties, etc in Access when it opens. Virginia From JRojas at tnco-inc.com Thu Jul 15 08:03:50 2004 From: JRojas at tnco-inc.com (Joe Rojas) Date: Thu, 15 Jul 2004 09:03:50 -0400 Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <0CC84C9461AE6445AD5A602001C41C4B059D93@mercury.tnco-inc.com> I believe it is because the OptUpdateAvailability_Click is private. Private Subs are not visible to other forms and may only be called from the form that "owns" the sub. Try making Public sub on the Personnel form that only calls the OptUpdateAvailability_Click sub. Public Sub UpdateAvailability() OptUpdateAvailability_Click() End Sub JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. From JRojas at tnco-inc.com Thu Jul 15 08:05:42 2004 From: JRojas at tnco-inc.com (Joe Rojas) Date: Thu, 15 Jul 2004 09:05:42 -0400 Subject: [AccessD] OT-Call Click Routine From Form Behind - part 2 Message-ID: <0CC84C9461AE6445AD5A602001C41C4B059D94@mercury.tnco-inc.com> Opps, Then call the sub from the form that appears in front of the personnel form with frmOrrPersonnel.UpdateAvailability JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. From paul.hartland at fsmail.net Thu Jul 15 08:11:17 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Thu, 15 Jul 2004 15:11:17 +0200 (CEST) Subject: [AccessD] OT-Call Click Routine From Form Behind Message-ID: <3637326.1089897077152.JavaMail.www@wwinf3004> thanks, I owe you one.....can't believe I never thought of that... Paul Message date : Jul 15 2004, 02:06 PM >From : "Joe Rojas" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] OT-Call Click Routine From Form Behind I believe it is because the OptUpdateAvailability_Click is private. Private Subs are not visible to other forms and may only be called from the form that "owns" the sub. Try making Public sub on the Personnel form that only calls the OptUpdateAvailability_Click sub. Public Sub UpdateAvailability() OptUpdateAvailability_Click() End Sub JR -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Thursday, July 15, 2004 8:40 AM To: accessd Subject: [AccessD] OT-Call Click Routine From Form Behind To all, Visual Basic 6 question, I have a personnel form with the option to block assign their availability for certain days, which is another form which opens in front of the personnel form. I have a menu on the personnel form which includes and update option, which in turn has a click routince Private Sub OptUpdateAvailability_Click(). On the form which appears in front of the personnel form I have a button, when the button is pressed I want to call the OptUpdateAvailability_Click() rountine. I have tried Call frmOrrPersonnel.OptUpdateAvailability_Click but get the following error when I try a compile: Method or Data Member Not Found Anyone any ideas how I can cal the routine ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com This electronic transmission is strictly confidential to TNCO, Inc. and intended solely for the addressee. It may contain information which is covered by legal, professional, or other privileges. If you are not the intended addressee, or someone authorized by the intended addressee to receive transmissions on behalf of the addressee, you must not retain, disclose in any form, copy, or take any action in reliance on this transmission. If you have received this transmission in error, please notify the sender as soon as possible and destroy this message. While TNCO, Inc. uses virus protection, the recipient should check this email and any attachments for the presence of viruses. TNCO, Inc. accepts no liability for any damage caused by any virus transmitted by this email. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From dkalsow at yahoo.com Thu Jul 15 09:03:21 2004 From: dkalsow at yahoo.com (Dale Kalsow) Date: Thu, 15 Jul 2004 07:03:21 -0700 (PDT) Subject: [AccessD] Treeview Controls In-Reply-To: <3637326.1089897077152.JavaMail.www@wwinf3004> Message-ID: <20040715140321.13242.qmail@web50405.mail.yahoo.com> Does anyone know if Acess 2003 has a treeview control? Thanks! Dale --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! From bchacc at san.rr.com Thu Jul 15 09:25:14 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 07:25:14 -0700 Subject: [AccessD] Set Outlook Properties in Access References: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> Message-ID: <00b001c46a77$8b536f50$6601a8c0@HAL9002> Virginia: I was just struggling with this and I didn't find a VBA answer but the list gave me two good leads for solving the problem outside of Access: http://www.dimastr.com/redemption/ and http://www.contextmagic.com/express-clickyes/ Also recommended by Dan Waters was: Microsoft does offer a free Outlook Security Administration Package. It will allow the administrators in a company to allow programmed email to bypass the 'security message' on an application by application basis. It's free, but it is setup work for the administrators. HTH Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Hollis,Virginia" To: Sent: Thursday, July 15, 2004 5:58 AM Subject: [AccessD] Set Outlook Properties in Access > I am trying to send automated emails through Outlook from Access. I found > this link from Microsoft that tells how to do this. > > http://msdn.microsoft.com/office/understanding/access/codesamples/default.as > px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp > spx?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp> > > > > I run into the problem with the security settings - where it pops up the > message about a potential virus and if you want to do this and for how long. > I figure this just 'may' scare off users - imagine that. Anyway, is there a > way to set the Outlook security settings (Tools, Macros, Security) through > Access code, to Low, send the email and then reset their security to High or > Medium again? > > > > I figure there should be a way to do this for Outlook similar to setting the > startup properties, etc in Access when it opens. > > > > Virginia > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Thu Jul 15 09:45:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 15 Jul 2004 16:45:44 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> Message-ID: <16528853238.20040715164544@cactus.dk> Hi Greg This calls for a class module. Karsten Pries, a German fellow, has one for download at: http://www.karstenpries.de/access It contains a ShowFolder too. Comments are mostly in German but you can easily find out. We recently brushed it up a bit. It works very nicely and is very easy to implement. /gustav > I know I've seen it discussed here before but I couldn't find it in the > archives (probably due to operator error...mine...). > I need to have a 'browse' button on a form that will allow the users to > open the File Dialog Box (the normal Windows one) so they can browse to > the file the program needs if necessary. Normally they will not have to > do this, but, things will not always be 'normal' in real life. This gives > them the option to go find the file using a familiar interface. > Is this done using an API call or can it be done strictly thru VB? I'm > using Access 97 currently. From mwhittinghill at symphonyinfo.com Thu Jul 15 10:48:42 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Thu, 15 Jul 2004 10:48:42 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <000e01c46a83$3562bd60$2201a8c0@PASCAL> I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com From my.lists at verizon.net Thu Jul 15 10:52:37 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 15 Jul 2004 08:52:37 -0700 Subject: [AccessD] OT: VB listbox with checkboxes In-Reply-To: <000e01c46a83$3562bd60$2201a8c0@PASCAL> References: <000e01c46a83$3562bd60$2201a8c0@PASCAL> Message-ID: <40F6A845.4000602@verizon.net> That's the ListView Control, and the Checkboxes are gonna be images.. Mark Whittinghill wrote On 7/15/2004 8:48 AM: >I am building a VB app, and I need to include the listbox control that has >checkboxes, like the column selector in Outlook. What control is that, and >what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > > > -- -Francisco From mwhittinghill at symphonyinfo.com Thu Jul 15 11:12:54 2004 From: mwhittinghill at symphonyinfo.com (Mark Whittinghill) Date: Thu, 15 Jul 2004 11:12:54 -0500 Subject: [AccessD] OT: VB listbox with checkboxes References: <000e01c46a83$3562bd60$2201a8c0@PASCAL> <40F6A845.4000602@verizon.net> Message-ID: <000801c46a86$96c596b0$2201a8c0@PASCAL> Thanks, Can you point me to any examples of how to do this? Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com ----- Original Message ----- From: "Francisco H Tapia" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 10:52 AM Subject: Re: [AccessD] OT: VB listbox with checkboxes > That's the ListView Control, and the Checkboxes are gonna be images.. > > Mark Whittinghill wrote On 7/15/2004 8:48 AM: > > >I am building a VB app, and I need to include the listbox control that has > >checkboxes, like the column selector in Outlook. What control is that, and > >what component do I need to include in my project to get it? > > > >Thanks, > > > >Mark Whittinghill > >Symphony Information Services > >763-391-7400 > >mwhittinghill at symphonyinfo.com > > > > > > > > > > > -- > -Francisco > > > -- > _______________________________________________ > 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 Thu Jul 15 10:59:59 2004 From: R.Griffiths at bury.gov.uk (Griffiths, Richard) Date: Thu, 15 Jul 2004 16:59:59 +0100 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: Hi Mark You need a standard vb listbox (on the toolbox) with the style property set to 'checkbox'. Richard -----Original Message----- From: Mark Whittinghill [mailto:mwhittinghill at symphonyinfo.com] Sent: 15 July 2004 16:49 To: accessd at databaseadvisors.com Subject: [AccessD] OT: VB listbox with checkboxes I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Thu Jul 15 11:01:07 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 15 Jul 2004 11:01:07 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> Mark, The built-in VB listbox control has this functionality. In the Properties window, set Style = Checkbox. There are dozens of 3rd party OCX controls that do the same thing as well if you want to spend the money. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark Whittinghill Sent: Thursday, July 15, 2004 10:49 AM To: accessd at databaseadvisors.com Subject: [AccessD] OT: VB listbox with checkboxes I am building a VB app, and I need to include the listbox control that has checkboxes, like the column selector in Outlook. What control is that, and what component do I need to include in my project to get it? Thanks, Mark Whittinghill Symphony Information Services 763-391-7400 mwhittinghill at symphonyinfo.com -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From mkahelin at gorskibulk.com Thu Jul 15 11:01:25 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 12:01:25 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB3B@gbtmain.gorskibulk.local> I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. From cfoust at infostatsystems.com Thu Jul 15 11:15:40 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jul 2004 09:15:40 -0700 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: Not in a query. You can't logically enable an interface-level connection to a database where the user has no permissions on the other database. Why are you using two workgroups, and what is it you're actually trying to accomplish? Charlotte Foust -----Original Message----- From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] Sent: Thursday, July 15, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: [AccessD] Connect to db with different wrkgroup I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 15 11:39:26 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 12:39:26 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB3F@gbtmain.gorskibulk.local> I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 15 12:34:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 15 Jul 2004 10:34:20 -0700 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: You can, but only in code, not in a query. Charlotte Foust -----Original Message----- From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] Sent: Thursday, July 15, 2004 8:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Thu Jul 15 12:37:33 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 10:37:33 -0700 Subject: [AccessD] Connect to db with different wrkgroup In-Reply-To: <0D2D1FEE52F53B46987A44B2EBF284D626AB3F@gbtmain.gorskibulk.local> Message-ID: Hi Martin: Have you tried to link the data. Go into the new database and select link (File/Get External data/Link Tables...) to attach the tables from the older database. You should be able to actually copy the old tables, with data, into new tables, into the new database. Later, when the SQL DB is up and running you can just pull the tables and data, into the DB using the DTS import/export wizard, in the EM. This should be a very easy process...but you will have to have full permissions. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 9:39 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup I'm currently using Access 2003 with a 'new' mdw workgroup file. I need to lookup data from the 'old' Access database (v.2.0 format with mda workgroup file) until I can port the old application and data over to new database with data in SQL tables. -connecting to a SQL database I can specify userid, password - I was hoping I can do the same to connect to another Access db/table. > -----Original Message----- > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > Sent: Thursday, July 15, 2004 12:16 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Not in a query. You can't logically enable an > interface-level connection to a database where the user has > no permissions on the other database. Why are you using two > workgroups, and what is it you're actually trying to accomplish? > > Charlotte Foust > > -----Original Message----- > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > Sent: Thursday, July 15, 2004 8:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Thu Jul 15 13:48:55 2004 From: lists at theopg.com (MarkH) Date: Thu, 15 Jul 2004 19:48:55 +0100 Subject: [AccessD] Erasing / clearing a user defined type In-Reply-To: <1212580550.20040715092751@cactus.dk> Message-ID: <001001c46a9c$61bfd1e0$2f0d6bd5@netboxxp> Cheers Gustav... I was worried I was missing something there :@) Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: 15 July 2004 08:28 To: Access Developers discussion and problem solving Subject: Re: [AccessD] Erasing / clearing a user defined type Hi Mark > This is a question I've been meaning to ask for a while and never got > round to it... Is there a simple one line way to erase / clear a UDT > after its finished with, as opposed to clearing the variables within > it individually? Not that I know of. But you define a global variable as your UDT. This will, of course, be empty. Then, when you need to "reset" your local variable, set it to the global variable: Dim tLocal As MARK tLocal = tEmpty /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 15 13:47:50 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Thu, 15 Jul 2004 14:47:50 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AB51@gbtmain.gorskibulk.local> Thanks Jim - that would be ok except the data is live and is being updated. If I move it to a new table (v.2000) then the data isn't accessible to the 2.0 app. Oh well, nobody ever told me this stuff was supposed to be easy. > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 1:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Martin: > > Have you tried to link the data. Go into the new database and > select link (File/Get External data/Link Tables...) to attach > the tables from the older database. You should be able to > actually copy the old tables, with data, into new tables, > into the new database. Later, when the SQL DB is up and > running you can just pull the tables and data, into the DB > using the DTS import/export wizard, in the EM. > > This should be a very easy process...but you will have to > have full permissions. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 9:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > I'm currently using Access 2003 with a 'new' mdw workgroup > file. I need to lookup data from the 'old' Access database > (v.2.0 format with mda workgroup file) until I can port the > old application and data over to new database with data in > SQL tables. -connecting to a SQL database I can specify > userid, password - I was hoping I can do the same to connect > to another Access db/table. > > > -----Original Message----- > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > Sent: Thursday, July 15, 2004 12:16 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Not in a query. You can't logically enable an interface-level > > connection to a database where the user has no permissions on the > > other database. Why are you using two workgroups, and what is it > > you're actually trying to accomplish? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > Sent: Thursday, July 15, 2004 8:01 AM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > tables and need help to bridge the transition. With two Access > > databases (db) having two workgroup (wg) files; Is there a way to > > establish a query connection from db/wg A to db/wg B? i.e. can I > > establish a sourcedatabase connection from a query and specify mdb, > > mdw, user and password -link doesn't work since the > logged-in user or > > owner does not have access to the other db. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From GregSmith at starband.net Thu Jul 15 13:54:05 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 15 Jul 2004 13:54:05 -0500 (CDT) Subject: [AccessD] Delete an external file from within Access vb In-Reply-To: <200407150747.i6F7lUQ16159@databaseadvisors.com> References: <007801c469c1$c3f0a870$6601a8c0@HAL9002> <200407150747.i6F7lUQ16159@databaseadvisors.com> Message-ID: <2323.216.43.21.235.1089917645.squirrel@cetus.email.starband.net> Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net From lists at theopg.com Thu Jul 15 14:01:37 2004 From: lists at theopg.com (MarkH) Date: Thu, 15 Jul 2004 20:01:37 +0100 Subject: [AccessD] Treeview Controls In-Reply-To: <20040715140321.13242.qmail@web50405.mail.yahoo.com> Message-ID: <001101c46a9e$27c73440$2f0d6bd5@netboxxp> The treeview is part of mscomctl.ocx so all you need to do to use it is create a reference to it and it'll show up on the activex menu... Hth mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dale Kalsow Sent: 15 July 2004 15:03 To: Access Developers discussion and problem solving Subject: [AccessD] Treeview Controls Does anyone know if Acess 2003 has a treeview control? Thanks! Dale --------------------------------- Do you Yahoo!? Yahoo! Mail is new and improved - Check it out! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Thu Jul 15 14:13:22 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Thu, 15 Jul 2004 15:13:22 -0400 Subject: [AccessD] Delete an external file from within Access vb Message-ID: Greg, You can use the Kill statement. or You can use the DeleteFile Method of the FileSystemObject. Mark -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 15, 2004 2:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Delete an external file from within Access vb Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Thu Jul 15 14:20:03 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Thu, 15 Jul 2004 14:20:03 -0500 Subject: [AccessD] Delete an external file from within Access vb Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> is this what you are looking for? Kill strFileName Jim hale -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 15, 2004 1:54 PM To: accessd at databaseadvisors.com Subject: [AccessD] Delete an external file from within Access vb Hello again. Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help on the "open file dialog" box issue. It works! Now, I want to delete the file that 'we' used after selecting it from the file dialog box. I don't want to delete it right after selecting it, but later, after I've imported the data that was in it. But I can't remember how to do it. I know I've done this before but I can't find the code nor the brain cell that contains that information...it might be on vacation at the moment. Or it's fighting with the only other one I've got. Or they're both out playing HALO and I'm toast. Any help would & is greatly appreciated. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Thu Jul 15 15:01:05 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 15 Jul 2004 15:01:05 -0500 (CDT) Subject: [AccessD] Delete an external file from within Access vb (SOLVED) In-Reply-To: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> References: <6A6AA9DF57E4F046BDA1E273BDDB677217FDB9@corp-es01.fleetpride.com> Message-ID: <2600.216.43.21.235.1089921665.squirrel@cetus.email.starband.net> Thank you Jim and Mark....it's exactly what I needed. Now...does anyone know someone looking for two brain cells? I'm gonna fire mine...I knew they weren't paying attention...;) Thanks again! Greg > is this what you are looking for? > Kill strFileName > > Jim hale > > -----Original Message----- > From: Greg Smith [mailto:GregSmith at starband.net] > Sent: Thursday, July 15, 2004 1:54 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] Delete an external file from within Access vb > > > Hello again. > > Many thanks to Charlotte, Mark, Rocky, Dan, Max and Gustav for your help > on the "open file dialog" box issue. It works! > > Now, I want to delete the file that 'we' used after selecting it from > the file dialog box. I don't want to delete it right after selecting > it, but later, after I've imported the data that was in it. > > But I can't remember how to do it. I know I've done this before but I > can't find the code nor the brain cell that contains that > information...it might be on vacation at the moment. Or it's fighting > with the only other one I've got. Or they're both out playing HALO and > I'm toast. > > Any help would & is greatly appreciated. > > Thanks! > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From my.lists at verizon.net Thu Jul 15 15:36:47 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Thu, 15 Jul 2004 13:36:47 -0700 Subject: [AccessD] OT: VB listbox with checkboxes In-Reply-To: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB086506581C@tccexch01.tappeconstruction.net> Message-ID: <40F6EADF.8060205@verizon.net> I didn't realize this, is the checkbox column customizable? Brett Barabash wrote On 7/15/2004 9:01 AM: >Mark, > >The built-in VB listbox control has this functionality. In the >Properties window, set Style = Checkbox. There are dozens of 3rd party >OCX controls that do the same thing as well if you want to spend the >money. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark >Whittinghill >Sent: Thursday, July 15, 2004 10:49 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: VB listbox with checkboxes > >I am building a VB app, and I need to include the listbox control that >has checkboxes, like the column selector in Outlook. What control is >that, and what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > >-------------------------------------------------------------------------------------------------------------------- >The information in this email may contain confidential information that >is legally privileged. The information is only for the use of the intended >recipient(s) named above. If you are not the intended recipient(s), you >are hereby notified that any disclosure, copying, distribution, or the taking >of any action in regard to the content of this email is strictly prohibited. If >transmission is incorrect, unclear, or incomplete, please notify the sender >immediately. The authorized recipient(s) of this information is/are prohibited >from disclosing this information to any other party and is/are required to >destroy the information after its stated need has been fulfilled. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >This footer also confirms that this email message has been scanned >for the presence of computer viruses.Scanning of this message and >addition of this footer is performed by SurfControl E-mail Filter software >in conjunction with virus detection software. > > > -- -Francisco From BBarabash at TappeConstruction.com Thu Jul 15 16:07:37 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 15 Jul 2004 16:07:37 -0500 Subject: [AccessD] OT: VB listbox with checkboxes Message-ID: <100F91B31300334B89EC531C9DCB0865065821@tccexch01.tappeconstruction.net> Not really. It just adds a simple 3D box to the left of the list item, with a checkmark if selected. Not quite like Outlook's list view that provides its own column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Francisco H Tapia Sent: Thursday, July 15, 2004 3:37 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: VB listbox with checkboxes I didn't realize this, is the checkbox column customizable? Brett Barabash wrote On 7/15/2004 9:01 AM: >Mark, > >The built-in VB listbox control has this functionality. In the >Properties window, set Style = Checkbox. There are dozens of 3rd party >OCX controls that do the same thing as well if you want to spend the >money. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark >Whittinghill >Sent: Thursday, July 15, 2004 10:49 AM >To: accessd at databaseadvisors.com >Subject: [AccessD] OT: VB listbox with checkboxes > >I am building a VB app, and I need to include the listbox control that >has checkboxes, like the column selector in Outlook. What control is >that, and what component do I need to include in my project to get it? > >Thanks, > >Mark Whittinghill >Symphony Information Services >763-391-7400 >mwhittinghill at symphonyinfo.com > > -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From accessd at shaw.ca Thu Jul 15 16:08:59 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 14:08:59 -0700 Subject: [AccessD] Connect to db with different wrkgroup In-Reply-To: <0D2D1FEE52F53B46987A44B2EBF284D626AB51@gbtmain.gorskibulk.local> Message-ID: Hi Marty: Well, I have one suggestion and I will be having to do a similar task, next week. Can you make the switch before or after hours? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 11:48 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup Thanks Jim - that would be ok except the data is live and is being updated. If I move it to a new table (v.2000) then the data isn't accessible to the 2.0 app. Oh well, nobody ever told me this stuff was supposed to be easy. > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 1:38 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Martin: > > Have you tried to link the data. Go into the new database and > select link (File/Get External data/Link Tables...) to attach > the tables from the older database. You should be able to > actually copy the old tables, with data, into new tables, > into the new database. Later, when the SQL DB is up and > running you can just pull the tables and data, into the DB > using the DTS import/export wizard, in the EM. > > This should be a very easy process...but you will have to > have full permissions. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 9:39 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > I'm currently using Access 2003 with a 'new' mdw workgroup > file. I need to lookup data from the 'old' Access database > (v.2.0 format with mda workgroup file) until I can port the > old application and data over to new database with data in > SQL tables. -connecting to a SQL database I can specify > userid, password - I was hoping I can do the same to connect > to another Access db/table. > > > -----Original Message----- > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > Sent: Thursday, July 15, 2004 12:16 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Not in a query. You can't logically enable an interface-level > > connection to a database where the user has no permissions on the > > other database. Why are you using two workgroups, and what is it > > you're actually trying to accomplish? > > > > Charlotte Foust > > > > -----Original Message----- > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > Sent: Thursday, July 15, 2004 8:01 AM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > tables and need help to bridge the transition. With two Access > > databases (db) having two workgroup (wg) files; Is there a way to > > establish a query connection from db/wg A to db/wg B? i.e. can I > > establish a sourcedatabase connection from a query and specify mdb, > > mdw, user and password -link doesn't work since the > logged-in user or > > owner does not have access to the other db. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Thu Jul 15 19:40:10 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jul 2004 10:40:10 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server Message-ID: <00ab01c46acd$738f2f20$48619a89@DDICK> Hello all I have a FE/BE app setup. When I install the FE on my local DEV machine and put the BE in another directory on the same DEV machine - all is OK the app works fine BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the usual screens that work finer when it's all local I get the error msg Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. Any suggestions? Many thanks Darren From stuart at lexacorp.com.pg Thu Jul 15 19:59:30 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jul 2004 10:59:30 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server In-Reply-To: <00ab01c46acd$738f2f20$48619a89@DDICK> Message-ID: <40F7B512.19412.585F95B@lexacorp.com.pg> On 16 Jul 2004 at 10:40, Darren DICK wrote: > Hello all > I have a FE/BE app setup. > When I install the FE on my local DEV machine and put the BE in another > directory on the same DEV machine - all is OK the app works fine > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > usual screens that work finer when it's all local I get the error msg > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > Any suggestions? > I'd guess you have done a Compact on the BE database. Took me a while to work it out when I first came across this one :-( I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 "SYMPTOMS After you compact a Microsoft Access database or an Access project that exists in a folder in an NTFS file system partition, you may notice that the custom NTFS permissions for the Access database file (.mdb) or for the Access project file (.adp) are reset unexpectedly." ...... "CAUSE The compact process always compacts the source Access database file or the Access project file to a new file. The newly created file inherits NTFS permissions that are different from the source file. The inheritance of the NTFS permissions is based on the version of Access that is used to compact the file." -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From martyconnelly at shaw.ca Thu Jul 15 20:32:03 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 18:32:03 -0700 Subject: [AccessD] Time zones (was: internationalization) References: Message-ID: <40F73013.3010508@shaw.ca> I can see it from my house, well almost, if I climb a little hill. Jim Lawrence (AccessD) wrote: >Just for information, the new center of the universe is now just outside of >Victoria. > >http://www.hia-iha.nrc-cnrc.gc.ca/cu/main_e.html > >Jim > > > >>Are you seriously suggesting that the British Empire is not the center of >>the Universe anymore? ;-) >> >> > > > >>JWC >> >> > > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jul 15 20:40:01 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 18:40:01 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> Message-ID: <40F731F1.60209@shaw.ca> I came across this today under the Access ORK.You might be able to hide the design this way. http://www.microsoft.com/office/ork/2000/three/65t3_9.htm Using the RunPermissions Property with User-Level Security In order for Microsoft Access to display a table or query, it must read the design of that table or query. As a result, in order for a user to read and display the data in a table or query, that user must also have permission to read the design of the table or query. If you dont want your users to see the design of your table or query, you can create a query and set its RunPermissions property to restrict their access to this information. Set it up and test against one of the access reengineering case tools like Sparxs or EZDesign. Rocky Smolin - Beach Access Software wrote: >One of the great advantages of Access is that the user can work with the >data apart from the front end app. It's transparency is a real marketing >plus. So I'd like to leave the back end open. I think it will be >beneficial. > >Rocky > >----- Original Message ----- >From: "Andy Lacey" >To: "'Access Developers discussion and problem solving'" > >Sent: Wednesday, June 23, 2004 11:36 AM >Subject: RE: [AccessD] Hiding Back End Design > > > > >>I'm going to sound a dissenting voice here. I don't understand why Rocky, >>who's no doubt sweat blood to develop his vertical app, should in effect >>give his system away? Because surely that's what he'd be doing? The only >> >> >way > > >>doing a development like this makes sense is to get economies of scale by >>selling lots of copies. Without that incentive vertical apps would never >> >> >get > > >>developed at all because, in the main, a single customer can't stand all >> >> >the > > >>development costs. And if you're going to put in the graft why shouldn't >> >> >you > > >>dream of making money on it, and why should you open yourself to being >>ripped-off by people who can't be arsed to do the hard work themselves? >>Sorry, don't understand. >> >>-- Andy Lacey >>http://www.minstersystems.co.uk >> >> >> >>>-----Original Message----- >>>From: accessd-bounces at databaseadvisors.com >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>DWUTKA at marlow.com >>>Sent: 23 June 2004 18:30 >>>To: accessd at databaseadvisors.com >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>>'Open source' should pervade into all areas of the >>>information age. Music, programming, videos, etc. >>>Unfortunately it will take a complete change in humanity's >>>driving force....the accumulation of wealth. As long as >>>people are trying to make a buck, it will be virtually >>>impossible to get them to do stuff simply for the betterment >>>of society. >>> >>>Drew >>> >>> >>> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From DWUTKA at marlow.com Thu Jul 15 21:41:32 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 21:41:32 -0500 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12C@main2.marlow.com> WG files? In 97 and 2000, workgroup files are mdw's, did that change in 2003? One approach you might take is to 'merge' the security systems. Workgroup files only store 'login' information, the permissions are stored in the .mdb itself. If you use the same UserName and/or Group name, in both workgroup files, they should be interchangeable. Of course, you also have to use the same 'ID' when you create them. I honestly don't know how well it works across versions. I would assume that going from a newer version to an older version wouldn't be an issue. If you have the security matched, I don't think you would have a problem putting a 'outside' database as a source in a query. I'm guessing here, but it's a well educated guess. Access User Level security is very similar to NT security, and when a process in NT has a specific security account, the 'credentials' carry over to whatever that process is using. I wouldn't be at all surprised if Jet does the same thing. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Thursday, July 15, 2004 11:01 AM To: Access Developers discussion and problem solving Subject: [AccessD] Connect to db with different wrkgroup I'm in the (slow) process of migrating data to Access 2000 format tables and need help to bridge the transition. With two Access databases (db) having two workgroup (wg) files; Is there a way to establish a query connection from db/wg A to db/wg B? i.e. can I establish a sourcedatabase connection from a query and specify mdb, mdw, user and password -link doesn't work since the logged-in user or owner does not have access to the other db. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Thu Jul 15 21:46:24 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 16 Jul 2004 12:46:24 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server References: <40F7B512.19412.585F95B@lexacorp.com.pg> Message-ID: <00c301c46adf$15bc26c0$48619a89@DDICK> HI Stuart Thanks for this I have read and re-read the blurb from M$ I still don't get it. I have set the permissions on the TEMP folder on my DEV machine to anyone can do anything they like from anywhere withany logon :-)) Compiled - decompiled and compacted and repaired the DEV version of the back end whilst it was on my DEV machine Then I copy this local DEV version of the BE to the server - drop it into the expected place then try and perform some tasks and now I get Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at that file at all. The KB section of MS was useless. Any suggestions?? I'm starting to get desperate this will halt the deployment of the app due this Monday Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 10:59 AM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 10:40, Darren DICK wrote: > > > Hello all > > I have a FE/BE app setup. > > When I install the FE on my local DEV machine and put the BE in another > > directory on the same DEV machine - all is OK the app works fine > > > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > > usual screens that work finer when it's all local I get the error msg > > > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > > > Any suggestions? > > > > I'd guess you have done a Compact on the BE database. Took me a while to work > it out when I first came across this one :-( > > I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 > > "SYMPTOMS > After you compact a Microsoft Access database or an Access project that exists > in a folder in an NTFS file system partition, you may notice that the custom > NTFS permissions for the Access database file (.mdb) or for the Access project > file (.adp) are reset unexpectedly." > ...... > "CAUSE > The compact process always compacts the source Access database file or the > Access project file to a new file. The newly created file inherits NTFS > permissions that are different from the source file. The inheritance of the > NTFS permissions is based on the version of Access that is used to compact the > file." > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 15 22:02:10 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 22:02:10 -0500 Subject: [AccessD] A2K: Error 3343 When I install Backend on server Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12D@main2.marlow.com> What are the file permissions of the .mdb when you copy it? Then, what are the file permissions when you compact it? With NT security, when a new file is created, it gets it's permissions from one of two places. It either inherits it's permissions from an original copy, or it inherits the permissions of the folder it is in. Actually, there are a few variations on that, it all depends on how you have the NTFS security setup. So, if you copy an .mdb that you have permissions for, to the server, then compact it on the server, when it compacts, it creates a brand new file, not a copy, so it is going to inherit the security settings of the folder containing the .mdb. If those folder settings aren't correct, you are going to mess up your permissions. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Thursday, July 15, 2004 9:46 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server HI Stuart Thanks for this I have read and re-read the blurb from M$ I still don't get it. I have set the permissions on the TEMP folder on my DEV machine to anyone can do anything they like from anywhere withany logon :-)) Compiled - decompiled and compacted and repaired the DEV version of the back end whilst it was on my DEV machine Then I copy this local DEV version of the BE to the server - drop it into the expected place then try and perform some tasks and now I get Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at that file at all. The KB section of MS was useless. Any suggestions?? I'm starting to get desperate this will halt the deployment of the app due this Monday Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 10:59 AM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 10:40, Darren DICK wrote: > > > Hello all > > I have a FE/BE app setup. > > When I install the FE on my local DEV machine and put the BE in another > > directory on the same DEV machine - all is OK the app works fine > > > > BUT...When I put the BE on a server and put the FE on my local DEV machine and try to open the > > usual screens that work finer when it's all local I get the error msg > > > > Error 3343 - Unrecognised database format S:\Truman\Truman_Data\Truman_data.mdb > > > > The S: drive is a valid server drive only I have access to. I have Admin permission level i.e. full read and write permissions > > > > The data base MDB file is valid and is a recognised format - when I copy the MDB file in question from the server and place > > it on my local machine then connect my FE to - all is well. So it's most likely not the BE MDB file. > > > > Any suggestions? > > > > I'd guess you have done a Compact on the BE database. Took me a while to work > it out when I first came across this one :-( > > I finally found http://support.microsoft.com/default.aspx?scid=kb;EN-US;295234 > > "SYMPTOMS > After you compact a Microsoft Access database or an Access project that exists > in a folder in an NTFS file system partition, you may notice that the custom > NTFS permissions for the Access database file (.mdb) or for the Access project > file (.adp) are reset unexpectedly." > ...... > "CAUSE > The compact process always compacts the source Access database file or the > Access project file to a new file. The newly created file inherits NTFS > permissions that are different from the source file. The inheritance of the > NTFS permissions is based on the version of Access that is used to compact the > file." > > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Thu Jul 15 22:17:12 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Thu, 15 Jul 2004 23:17:12 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <000201c46ae3$6395f930$0501a8c0@colbyws> Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com From accessd at shaw.ca Thu Jul 15 22:37:47 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Thu, 15 Jul 2004 20:37:47 -0700 Subject: [AccessD] VB.Net MSDN Disk 3 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB121@main2.marlow.com> Message-ID: Hi Drew: The information has been sent to you replying to your off-line request. Did you receive it, earlier today? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 15 22:43:00 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 20:43:00 -0700 Subject: [AccessD] Jumpdrive encrypted volume References: <000201c46ae3$6395f930$0501a8c0@colbyws> Message-ID: <020201c46ae6$fdcc1810$6601a8c0@HAL9002> Trip to Fry's? (Sounds like it might be fried.) This is going back on the same box it came off of? If so, probably failed and the encryption doesn't have anything to do with it. Why do you encrypt? Rocky ----- Original Message ----- From: "jwcolby" To: "AccessD" Sent: Thursday, July 15, 2004 8:17 PM Subject: [AccessD] Jumpdrive encrypted volume > Anyone here using one of these? I have a 256mb model that I have been using > for weeks. It was working this morning. Turned off my laptop, removed the > drive. This evening, I cannot mount the encrypted volume. Win2K says > simply cannot mount drive (after entering password). XP does a page fault > and offers to send a report to MS. > > Any words of wisdom? > > John W. Colby > www.ColbyConsulting.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From bchacc at san.rr.com Thu Jul 15 22:44:21 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 15 Jul 2004 20:44:21 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> Message-ID: <020a01c46ae7$2e245860$6601a8c0@HAL9002> Marty: Why couldn't they just go directly into the back end and open the table in design view? Rocky ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 6:40 PM Subject: Re: [AccessD] Hiding Back End Design > I came across this today under the Access ORK.You might be able to hide > the design this way. > http://www.microsoft.com/office/ork/2000/three/65t3_9.htm > > Using the RunPermissions Property with User-Level Security > In order for Microsoft Access to display a table or query, it must read > the design of that table or query. As a result, in order for a user to > read and display the data in a table or query, that user must also have > permission to read the design of the table or query. > If you dont want your users to see the design of your table or query, > you can create a query and set its RunPermissions property to restrict > their access to this information. > Set it up and test against one of the access reengineering case tools > like Sparxs or EZDesign. > > Rocky Smolin - Beach Access Software wrote: > > >One of the great advantages of Access is that the user can work with the > >data apart from the front end app. It's transparency is a real marketing > >plus. So I'd like to leave the back end open. I think it will be > >beneficial. > > > >Rocky > > > >----- Original Message ----- > >From: "Andy Lacey" > >To: "'Access Developers discussion and problem solving'" > > > >Sent: Wednesday, June 23, 2004 11:36 AM > >Subject: RE: [AccessD] Hiding Back End Design > > > > > > > > > >>I'm going to sound a dissenting voice here. I don't understand why Rocky, > >>who's no doubt sweat blood to develop his vertical app, should in effect > >>give his system away? Because surely that's what he'd be doing? The only > >> > >> > >way > > > > > >>doing a development like this makes sense is to get economies of scale by > >>selling lots of copies. Without that incentive vertical apps would never > >> > >> > >get > > > > > >>developed at all because, in the main, a single customer can't stand all > >> > >> > >the > > > > > >>development costs. And if you're going to put in the graft why shouldn't > >> > >> > >you > > > > > >>dream of making money on it, and why should you open yourself to being > >>ripped-off by people who can't be arsed to do the hard work themselves? > >>Sorry, don't understand. > >> > >>-- Andy Lacey > >>http://www.minstersystems.co.uk > >> > >> > >> > >>>-----Original Message----- > >>>From: accessd-bounces at databaseadvisors.com > >>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>DWUTKA at marlow.com > >>>Sent: 23 June 2004 18:30 > >>>To: accessd at databaseadvisors.com > >>>Subject: RE: [AccessD] Hiding Back End Design > >>> > >>> > >>>'Open source' should pervade into all areas of the > >>>information age. Music, programming, videos, etc. > >>>Unfortunately it will take a complete change in humanity's > >>>driving force....the accumulation of wealth. As long as > >>>people are trying to make a buck, it will be virtually > >>>impossible to get them to do stuff simply for the betterment > >>>of society. > >>> > >>>Drew > >>> > >>> > >>> > >>-- > >>_______________________________________________ > >>AccessD mailing list > >>AccessD at databaseadvisors.com > >>http://databaseadvisors.com/mailman/listinfo/accessd > >>Website: http://www.databaseadvisors.com > >> > >> > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 15 22:49:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 15 Jul 2004 22:49:21 -0500 Subject: [AccessD] VB.Net MSDN Disk 3 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB12E@main2.marlow.com> Yep, sorry, didn't reply to it yet....we actually removed our black list completely, because it literally refused the email connection, essentially dropping the email into a void. So I've been a little busy dealing with that issue...LOL. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 15, 2004 10:38 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: The information has been sent to you replying to your off-line request. Did you receive it, earlier today? Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 14, 2004 12:54 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] VB.Net MSDN Disk 3 I sent you an email offline, but haven't heard back from you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jim Lawrence (AccessD) Sent: Thursday, July 08, 2004 9:35 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] VB.Net MSDN Disk 3 Hi Drew: Yes I do... Just send me that request off-line and I will send you an address to the CD image. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Wednesday, July 07, 2004 2:40 PM To: AccessD at databaseadvisors.com Subject: [AccessD] VB.Net MSDN Disk 3 A few weeks ago, someone posted a link that you could 'review' a few training videos, and Microsoft would send you a free copy of VB.Net Standard edition. (Sorry, don't remember who posted it....) I did that, and last week I got my installation CD's in the mail. Unfortunately, I received Disc 1, 2, and 1 (again) for the MSDN, so I can't install the help files. Anyone have a copy of Disc 3? Drew -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 15 23:50:06 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 15 Jul 2004 21:50:06 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> Message-ID: <40F75E7E.2090505@shaw.ca> Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table in >design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to hide >>the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must read >>the design of that table or query. As a result, in order for a user to >>read and display the data in a table or query, that user must also have >>permission to read the design of the table or query. >>If you dont want your users to see the design of your table or query, >>you can create a query and set its RunPermissions property to restrict >>their access to this information. >>Set it up and test against one of the access reengineering case tools >>like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with the >>>data apart from the front end app. It's transparency is a real marketing >>>plus. So I'd like to leave the back end open. I think it will be >>>beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect >>>>give his system away? Because surely that's what he'd be doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to being >>>>ripped-off by people who can't be arsed to do the hard work themselves? >>>>Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the >>>>>information age. Music, programming, videos, etc. >>>>>Unfortunately it will take a complete change in humanity's >>>>>driving force....the accumulation of wealth. As long as >>>>>people are trying to make a buck, it will be virtually >>>>>impossible to get them to do stuff simply for the betterment >>>>>of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From stuart at lexacorp.com.pg Fri Jul 16 02:05:28 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 16 Jul 2004 17:05:28 +1000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server In-Reply-To: <00c301c46adf$15bc26c0$48619a89@DDICK> Message-ID: <40F80AD8.18919.6D50350@lexacorp.com.pg> On 16 Jul 2004 at 12:46, Darren DICK wrote: > HI Stuart > Thanks for this > I have read and re-read the blurb from M$ > I still don't get it. > I have set the permissions on the TEMP folder on my DEV machine to > anyone can do anything they like from anywhere withany logon :-)) > Compiled - decompiled and compacted and repaired the DEV version of the > back end whilst it was on my DEV machine > > Then I copy this local DEV version of the BE to the server - drop it into > the expected place then try and perform some tasks and now I get > Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " > It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at > that file at all. > The KB section of MS was useless. > Any suggestions?? > I'm starting to get desperate this will halt the deployment of the app due this Monday > I'd say it's definitely a rights thing. You need to look at the Share permissions as well as direct access rights to find out who can really do what on a file. Do you have Admin rights through the Share you are using? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From gustav at cactus.dk Fri Jul 16 04:37:16 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 11:37:16 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <16528853238.20040715164544@cactus.dk> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> <16528853238.20040715164544@cactus.dk> Message-ID: <539185107.20040716113716@cactus.dk> Hi Greg et all Also noted this code for the Browse Folder dialog which can display files as well: http://vbnet.mvps.org/index.html?code/browse/browsenetwork.htm /gustav >> I need to have a 'browse' button on a form that will allow the users to >> open the File Dialog Box (the normal Windows one) so they can browse to >> the file the program needs if necessary. Normally they will not have to >> do this, but, things will not always be 'normal' in real life. This gives >> them the option to go find the file using a familiar interface. From gustav at cactus.dk Fri Jul 16 05:04:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 12:04:41 +0200 Subject: [AccessD] Open a File Dialog Box In-Reply-To: <539185107.20040716113716@cactus.dk> References: <200407131526.i6DFQLQ23813@databaseadvisors.com> <00b401c46969$32d1a860$0100a8c0@razvoj> <1482.216.43.21.235.1089819783.squirrel@cetus.email.starband.net> <16528853238.20040715164544@cactus.dk> <539185107.20040716113716@cactus.dk> Message-ID: <4810830162.20040716120441@cactus.dk> > Also noted this code for the Browse Folder dialog which can display > files as well: > http://vbnet.mvps.org/index.html?code/browse/browsenetwork.htm Note, however, that should you ever get the idea to open Browse Folder with a preselected folder, this is very convoluted: http://vbnet.mvps.org/code/callback/browsecallback.htm /gustav >>> I need to have a 'browse' button on a form that will allow the users to >>> open the File Dialog Box (the normal Windows one) so they can browse to >>> the file the program needs if necessary. Normally they will not have to >>> do this, but, things will not always be 'normal' in real life. This gives >>> them the option to go find the file using a familiar interface. From Jdemarco at hudsonhealthplan.org Fri Jul 16 07:39:48 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Fri, 16 Jul 2004 08:39:48 -0400 Subject: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99037409E6@TTNEXCHSRV1.hshhp.com> Thanks for this timely post John. We've been getting a lot of requests for custom Outlook forms lately which means it's only a matter of time before the form data will need to be analyzed or summarized. Have you tried c.UserProperties("FieldName") to access your custom field data? Does anyone know offhand if custom form fields act the same as adding a field to an existing form (in terms of data access)? Thanks, Jim DeMarco Director Application Development Hudson Health Plan -----Original Message----- From: John Skolits [mailto:Support at CorporateDataDesign.com] Sent: Wednesday, July 14, 2004 5:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking "SOLVED - Sort-Of" I really wanted to do a linking but not all the fields are available. But If is Use code and use Dim c As Outlook.ContactItem You can get the user field by using c.UserProperties(i). Where "i" is the enumerated value of the fields you created. I created 2 fields so they are: c.UserProperties(1) and c.UserProperties(2). C .UserProperties(1).NAME will give your field name. So I guess I'll just run an import routine on startup and load everyone into my database that way. John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Skolits Sent: Wednesday, July 14, 2004 4:31 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Maybe someone has some code out there. I'd prefer a link so I don't have to manually import or export new contact info between the two. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of StaRKeY Sent: Wednesday, July 14, 2004 4:25 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Outlook and Access, Linking Mmmzz as I recall you can get to those fields by using Outlook's objectmodel, since the linking using Exchange() is some sort of default link. Custom fields are kept in a seperate 'table' I believe which is why you don't see these... Regards, Eric Starkenburg -----Oorspronkelijk bericht----- Van: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] Namens John Skolits Verzonden: woensdag 14 juli 2004 21:59 Aan: 'Access Developers discussion and problem solving' Onderwerp: [AccessD] Outlook and Access, Linking I added a custom field to my contacts form. When I link to my Outlook Contacts folder with Access 2002 using Exchange() during the linking, it doesn't show this new field. Any one know why? John Skolits -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com _____ avast! Antivirus : Uitgaande bericht is niet besmet. Virus Gegevensbestand (VPS): 0429-0, 12-07-2004 Getest op: 14-7-2004 22:24:43 avast! auteursrecht (c) 2000-2004 ALWIL Software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From Mark.Mitsules at ngc.com Fri Jul 16 08:31:37 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 09:31:37 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 08:41:32 2004 From: michael.broesdorf at web.de (=?Windows-1252?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 15:41:32 +0200 Subject: AW: [AccessD] Hiding Back End Design In-Reply-To: <40F75E7E.2090505@shaw.ca> Message-ID: Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table in >design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to hide >>the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must read >>the design of that table or query. As a result, in order for a user to >>read and display the data in a table or query, that user must also have >>permission to read the design of the table or query. >>If you dont want your users to see the design of your table or query, >>you can create a query and set its RunPermissions property to restrict >>their access to this information. >>Set it up and test against one of the access reengineering case tools >>like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with the >>>data apart from the front end app. It's transparency is a real marketing >>>plus. So I'd like to leave the back end open. I think it will be >>>beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect >>>>give his system away? Because surely that's what he'd be doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to being >>>>ripped-off by people who can't be arsed to do the hard work themselves? >>>>Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the >>>>>information age. Music, programming, videos, etc. >>>>>Unfortunately it will take a complete change in humanity's >>>>>driving force....the accumulation of wealth. As long as >>>>>people are trying to make a buck, it will be virtually >>>>>impossible to get them to do stuff simply for the betterment >>>>>of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Fri Jul 16 08:47:54 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 09:47:54 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD73@DISABILITYINS01> I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 16 09:23:45 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 10:23:45 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 09:45:19 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 07:45:19 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" number Message-ID: <20040716144519.72926.qmail@web53910.mail.yahoo.com> I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy From JColby at dispec.com Fri Jul 16 09:51:13 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 10:51:13 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD74@DISABILITYINS01> Mark, I have not read any documentation that says anything about any of this stuff. Further in doing a google looking for people having problems I didn't really find anything. Lexar has a 24 hour chat tech support. He was useless, basically telling me to rma it and they would attempt data recovery. I have had a problem getting the encrypted volume to mount once before. I ended up just manually shutting down the volume then the media, rebooting and it came back up. I think I will NOT power down the machine without manually unmounting both the encrypted volume and the media. It is reasonably easy to do that, and I haven't ever had any problems where I did dismount everything. I have only used this thing for about a month, but I have been using it pretty much daily since I have my billing on it. I also put customer databases in the encrypted volume so that if it is lost, sensitive stuff doesn't get out. I am going to move my billing into a secure volume on my notebook. I purchased a license for DriveCrypt which is a very good program for building encrypted volumes out of files, or encrypting entire partitions. The license is reasonably cheap at $60 / machine, but the license only works on a single machine and I was using the license on my desktop. I am making my laptop my "desktop replacement" so when I get the time I will just move the license to the laptop and be done with it. I will end up just backing up the container file off the laptop to make sure I don't end up with lost data. Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. JWC -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 10:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 09:56:58 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 16:56:58 +0200 Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD73@DISABILITYINS01> Message-ID: Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael From JColby at dispec.com Fri Jul 16 09:57:52 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 10:57:52 -0400 Subject: [AccessD] Take a formatted number and turn it into a "real" n umber Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD75@DISABILITYINS01> Once merged what happens? Will each coast continuing using their copy or is something in the works to have them all use one database? JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 10:45 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 16 10:01:38 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Fri, 16 Jul 2004 17:01:38 +0200 Subject: AW: [AccessD] Take a formatted number and turn it into a "real" number In-Reply-To: <20040716144519.72926.qmail@web53910.mail.yahoo.com> Message-ID: Hi Nancy, 1. Create a new database with the same tables as your production db's 2. Do not use autonumbering for the pk columns - make them long integers instead 3. Import all data from database A, multiplying the pk and fk values by 10, adding 1 4. Import all data from database A, multiplying the pk an fk values by 10, adding 2 5. Convert the pk-columns to autonumber fields This way, all pk-values from db A will have a 1 at the end, all pk-values from db B will have a 2, keeping all related data together. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Nancy Lytle Gesendet: Freitag, 16. Juli 2004 16:45 An: AccessD at databaseadvisors.com Betreff: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 10:12:00 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 08:12:00 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" n umber In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD75@DISABILITYINS01> Message-ID: <20040716151200.97704.qmail@web53907.mail.yahoo.com> Yes, they will be using either the same backend or we will set up replica with an eye towards upsizing to Oracle later. Nancy --- "Colby, John" wrote: > Once merged what happens? Will each coast > continuing using their copy or is > something in the works to have them all use one > database? > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 10:45 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Take a formatted number and turn > it into a "real" > number > > > I just got handed a database of about 30 tables > (about > half are lookups), there are about 10 tables with > varying relationships that are fairly well defined. > There is an identical - but unconnected - version of > the database at our West Coast location. > I have now been tasked with merging the two. At > first > I thought it would be easy because it appeared they > were using two different numbers schemes for the > PK's > turns out they just formatted them to "look > different" > but the matching tables use the same Autonumber - > start from 1 - field type. So now I have to figure > out a way to merge them without messing up all the > relationships. > Does anyone have any ideas? Both databases are > still > being used so I have to come up with a way I can do > it > with the least down time possible. > TIA, > Nancy > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Fri Jul 16 10:13:52 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 11:13:52 -0400 Subject: [AccessD] Take a formatted number and turn it into a "real" n umber Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD76@DISABILITYINS01> Nancy, You are lucky it is just 10 tables. It is possible to do this by: 1) Create a NEW database for the migration 2) Link all of the tables from DB1 3) link all of the tables from DB2 4) Create queries that append one table in DB1 to it's matching table in DB2 5) Start by creating SELECT queries (so you can see the data). In these queries, take the PK of the table in DB1 and alias it, adding a large number to it (at least the quantity of records in DB2). IOW if DB2 has 2000 records in the matching table then the aliased PK in db1 should look like: PK: [RealPKFldName]+2000 6) Once you are comfortable you have this right, turn the SELECT into an append query and append the data into the table What you have done is simply "bumped" the PK up enough that they will append in to DB2 without colliding with any existing PKs. NOW... any tables that use the PK of that table as a FK... You have to "Bump" the FK by that same number (2000 in my example). You get the idea? Build a system of queries that do this in order from parent to child table. Build macros that sequence the queries in the correct order. Using TEST database copies of DB1 and DB2 run the macros. Test that the migration worked. Fix problems. Do it again until it works Once you know that everything is working... BACKUP the real DB1 and DB2 Run the macro. You are done. Doing it this way allows you to do the migration in just the time required for the update / append queries to work. JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 10:45 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Take a formatted number and turn it into a "real" number I just got handed a database of about 30 tables (about half are lookups), there are about 10 tables with varying relationships that are fairly well defined. There is an identical - but unconnected - version of the database at our West Coast location. I have now been tasked with merging the two. At first I thought it would be easy because it appeared they were using two different numbers schemes for the PK's turns out they just formatted them to "look different" but the matching tables use the same Autonumber - start from 1 - field type. So now I have to figure out a way to merge them without messing up all the relationships. Does anyone have any ideas? Both databases are still being used so I have to come up with a way I can do it with the least down time possible. TIA, Nancy -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 10:38:16 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 08:38:16 -0700 (PDT) Subject: [AccessD] Take a formatted number and turn it into a "real" n umber In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD76@DISABILITYINS01> Message-ID: <20040716153816.83898.qmail@web53910.mail.yahoo.com> Thank you, I was afraid this was what I was going to have to so since the tables do have parent child relationships down the line. Because they are taking material that we have ordered and that is received and they have to be able to track it all the way as it is assembled with other parts, until it is finished and placed in as part of a larger project, say a piece to go on an airplane. So I guess really they want to be able to also "backtrack" if necessary from the finished part to the Lot it came in. Again, thanks for the assistance. Now I need to map all this out. Nancy --- "Colby, John" wrote: > Nancy, > > You are lucky it is just 10 tables. It is possible > to do this by: > > 1) Create a NEW database for the migration > 2) Link all of the tables from DB1 > 3) link all of the tables from DB2 > 4) Create queries that append one table in DB1 to > it's matching table in DB2 > 5) Start by creating SELECT queries (so you can see > the data). In these > queries, take the PK of the table in DB1 and alias > it, adding a large number > to it (at least the quantity of records in DB2). > IOW if DB2 has 2000 > records in the matching table then the aliased PK in > db1 should look like: > PK: [RealPKFldName]+2000 > 6) Once you are comfortable you have this right, > turn the SELECT into an > append query and append the data into the table > > What you have done is simply "bumped" the PK up > enough that they will append > in to DB2 without colliding with any existing PKs. > > > NOW... any tables that use the PK of that table as a > FK... > > You have to "Bump" the FK by that same number (2000 > in my example). > > You get the idea? > > Build a system of queries that do this in order from > parent to child table. > Build macros that sequence the queries in the > correct order. > Using TEST database copies of DB1 and DB2 run the > macros. > Test that the migration worked. > Fix problems. > Do it again until it works > > Once you know that everything is working... > > BACKUP the real DB1 and DB2 > Run the macro. > > You are done. > > Doing it this way allows you to do the migration in > just the time required > for the update / append queries to work. > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 10:45 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Take a formatted number and turn > it into a "real" > number > > > I just got handed a database of about 30 tables > (about > half are lookups), there are about 10 tables with > varying relationships that are fairly well defined. > There is an identical - but unconnected - version of > the database at our West Coast location. > I have now been tasked with merging the two. At > first > I thought it would be easy because it appeared they > were using two different numbers schemes for the > PK's > turns out they just formatted them to "look > different" > but the matching tables use the same Autonumber - > start from 1 - field type. So now I have to figure > out a way to merge them without messing up all the > relationships. > Does anyone have any ideas? Both databases are > still > being used so I have to come up with a way I can do > it > with the least down time possible. > TIA, > Nancy > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Mark.Mitsules at ngc.com Fri Jul 16 10:56:44 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 16 Jul 2004 11:56:44 -0400 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: >> Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. << Now you're making me nervous;) Perhaps I should consider encrypting the data on my USB drives. Thanks again for sharing your experiences. Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 10:51 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume Mark, I have not read any documentation that says anything about any of this stuff. Further in doing a google looking for people having problems I didn't really find anything. Lexar has a 24 hour chat tech support. He was useless, basically telling me to rma it and they would attempt data recovery. I have had a problem getting the encrypted volume to mount once before. I ended up just manually shutting down the volume then the media, rebooting and it came back up. I think I will NOT power down the machine without manually unmounting both the encrypted volume and the media. It is reasonably easy to do that, and I haven't ever had any problems where I did dismount everything. I have only used this thing for about a month, but I have been using it pretty much daily since I have my billing on it. I also put customer databases in the encrypted volume so that if it is lost, sensitive stuff doesn't get out. I am going to move my billing into a secure volume on my notebook. I purchased a license for DriveCrypt which is a very good program for building encrypted volumes out of files, or encrypting entire partitions. The license is reasonably cheap at $60 / machine, but the license only works on a single machine and I was using the license on my desktop. I am making my laptop my "desktop replacement" so when I get the time I will just move the license to the laptop and be done with it. I will end up just backing up the container file off the laptop to make sure I don't end up with lost data. Having an encrypted volume on the jump drive is comforting though for the customer's data. This is sensitive (personal) data and would be really bad to lose it and have it unencrypted. JWC -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 10:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rusty.hammond at cpiqpc.com Fri Jul 16 10:58:31 2004 From: rusty.hammond at cpiqpc.com (rusty.hammond at cpiqpc.com) Date: Fri, 16 Jul 2004 10:58:31 -0500 Subject: [AccessD] Corrupt A97 database Message-ID: <8301C8A868251E4C8ECD3D4FFEA40F8A0811ABAD@cpixchng-1.cpiqpc.net> I've tried to search the archives on this but I can't get to the site. We have an Access 97 database that has become corrupt. I think our file server went down during a compact. Anyway, we have tried jetcomp and have tried AccessFix database recovery software from cimaware software. The best we've gotten so far is it recovers the file but the table we really need comes up with zero records. We have a backup from the night before but have lost a whole days worth of work. To spend four or five hundred dollars wouldn't bother us if we could get our data recovered several hours of people's time to get the data reentered. Can anyone recommend data recovery software that they have used? TIA Rusty Hammond From accessd at shaw.ca Fri Jul 16 11:17:58 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Fri, 16 Jul 2004 09:17:58 -0700 Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: Message-ID: Hi Michael: Assuming that the time-stamp value is recorded in SQL and you have a key in the record in question and you are using ADO then: ... Set objCmd = New ADODB.Command With objCmd .ActiveConnection = gstrConnection .CommandText = "CheckRecord" .CommandType = adCmdStoredProc .Parameters.Append .CreateParameter("@intEmployeeNumber", adInteger, adParamInput, , Employeenumber) End With Set rs1 = New ADODB.Recordset With rs1 .Open objCmd, , adOpenStatic, adLockReadOnly If .BOF = False And .EOF = False Then .MoveLast If ![TimestampNumber] = glTimestampNumber Then SaveRecord = True Else SaveRecord = False End If Else SaveRecord = True End If End With ... ...but you should not have to be using the timestamp method to track whether a record on the SQL server was updated on client station. There are three considerations: 1. The initial recordset that retrieved the data from the server should have locked the record. ... rsEmployee.Open objCmd, , adOpenDynamic, adLockOptimistic ... 2. Setting transaction lock, when updating the record and responding to any error, by rolling the transaction back and notify the station user can catch record conflicts. On Error GoTo Err_UpDateRecord ... objConn.BeginTrans ... objConn.Execute strSQL Exit_UpdateRecord: Exit Function Err_UpdateRecord: objConn.RollbackTrans ShowConflictMsg ("SaveEmployee") Resume Exit_UpdateRecord ... 3. The SQL server has methods for handling/buffering record conflicts built into it. Even though the previous code samples are not complete I hope there is sufficient information to make the snippets useful and informative. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 7:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 12:17:42 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:17:42 -0700 (PDT) Subject: [AccessD] Looping through control names Message-ID: <20040716171742.82330.qmail@web53909.mail.yahoo.com> I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control From JColby at dispec.com Fri Jul 16 12:26:43 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 13:26:43 -0400 Subject: [AccessD] Looping through control names Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> if isnull(somevalue) then do something JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:18 PM To: Access Developers discussion and problem Solving Subject: [AccessD] Looping through control names I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Fri Jul 16 12:41:47 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 16 Jul 2004 13:41:47 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> Message-ID: Nancy Two schools of thought: 1) Let the user complete the form, and then validate it. PROS: User allowed to input all data at one time, then validate entire form at end (during [Save] action or when leaving record?). CONS: During validation, user receives error for EACH empty field, corrects it, then validation routine must cycle through all controls again. 2) Validate each field as completed using BeforeUpdate(). PROS: User stopped immediately and required to input data in empty field before advancing. CONS: More coding required. Must account for user clicking around form, so may also need validation during OnBlur event. Regards, Bob Gajewski -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:18 PM To: Access Developers discussion and problem Solving Subject: [AccessD] Looping through control names I am trying to make the users fill in a whole set of fields when they do data entry - almost all fields in the form must be filled in - this is a new requirement. I thought the easiest way would be to loop through the controls that are mandatory (prefixed with mnd) and if there is one that is null or an empty string to require them to go back and fill it in. Where I am stuck is on checking the value of the data in the control. It doesn't like my code below. I know I must be missing something simple but I can't quite get it. Any help appreciated. Nancy CODE: Dim ctl As Control For Each ctl In Forms!LCN1 'Find the mandatory fields If left(ctl.Name, 3) = "mnd" Then 'Check to see if the mandatory field is null PROBLEM:"object required> If ctl.Name.Value Is Null Then END PROBLEM (I hope:)) 'Tell them to go back and fill it in MsgBox "You must enter a value for the field: " & ctl.Name ' ctl.Name.SetFocus Exit Sub Else 'If it is not null then end End If Else 'if it is not mandatory End If Next 'Check next control -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Fri Jul 16 12:43:17 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:43:17 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD77@DISABILITYINS01> Message-ID: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From cfoust at infostatsystems.com Fri Jul 16 12:47:37 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 16 Jul 2004 10:47:37 -0700 Subject: [AccessD] ALERT: AXP-SpeedFerret-PestPatrol problem Message-ID: The latest update of PestPatrol on my machine identified some files inappropriately, including two Infragistics ocx files used by SpeedFerret and some registry keys installed by it. Needless to say, it broke SpeedFerret when those files and keys were removed. When I reinstalled SpeedFerret, the files and keys were recreated and PestPatrol again identified them as pests. This time, I excluded them figuring that would take care of the problem. It didn't. PestPatrol ignores those items for now, and SpeedFerret runs but Access XP no longer recognizes the SpeedFerret Add-in key, so there isn't any connection and SF searches fail. I had a long conversation about this with support at Black Mosannon and we discovered that even uninstalling and then reinstalling SpeedFerret didn't correct the problem. I was told that another customer had had a similar experience with a spyware remover and could NOT get SpeedFerret to run properly again on that machine, even after reinstalling Office, all the updates, etc. I'm bloody-minded enough to keep trying to fix it, but I'd be happy for any help. Charlotte Foust From ssharkins at bellsouth.net Fri Jul 16 12:47:44 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 16 Jul 2004 13:47:44 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Message-ID: <20040716174739.SDZA1775.imf19aec.mail.bellsouth.net@SUSANONE> Nancy, you did declare ctl as some type of control object, didn't you? Susan H. If IsNull(ctl.Name.Value) Then it still errors on "Object Required". From lytlenj at yahoo.com Fri Jul 16 12:47:40 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 10:47:40 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: Message-ID: <20040716174740.43589.qmail@web53904.mail.yahoo.com> Thanks for the tips, actually I would like to combine the two and have the validation at the end of the form, listing all the fields that must be entered into and those fields would have the background color changed, ie Unfilled required fields would be yellow, corrected field would again become transparent. That way one warning, and they can see all of their "mistakes" at once. Thanks for the ideas, Nancy --- Bob Gajewski wrote: > Nancy > > > Two schools of thought: > > 1) Let the user complete the form, and then validate > it. > > PROS: User allowed to input all data at one time, > then > validate entire form at end (during [Save] action > or when leaving record?). > > CONS: During validation, user receives error for > EACH > empty field, corrects it, then validation routine > must cycle through all controls again. > > 2) Validate each field as completed using > BeforeUpdate(). > > PROS: User stopped immediately and required to input > data in empty field before advancing. > > CONS: More coding required. Must account for user > clicking > around form, so may also need validation during > OnBlur event. > > > Regards, > > Bob Gajewski > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From JColby at dispec.com Fri Jul 16 12:53:48 2004 From: JColby at dispec.com (Colby, John) Date: Fri, 16 Jul 2004 13:53:48 -0400 Subject: [AccessD] Looping through control names Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD78@DISABILITYINS01> >It should be "thinking" Is the value held in the control mndCmdCutomer null? if you meant to say CMDCustomer then you are in trouble anyway since a command button has no value property. JWC -----Original Message----- From: Nancy Lytle [mailto:lytlenj at yahoo.com] Sent: Friday, July 16, 2004 1:43 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rbgajewski at adelphia.net Fri Jul 16 12:55:07 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Fri, 16 Jul 2004 13:55:07 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174740.43589.qmail@web53904.mail.yahoo.com> Message-ID: Nancy Then you need a few steps: 1) Create a variable to hold whether ANY mandatory fields are empty. 2) Loop through all controls. If any are empty, set the BackColor for that field to your desired color, and set the variable to TRUE. 3) After looping through all fields (outside the For...Next), repaint the form so the user can see all of the fields missing data. Understand that they will now have to either TAB through all fields to get to each 'bad' field click on each one at a time. Unless you want to dynamically change the tab controls or tags to allow direct jumping from bad field to next bad field. Alternatively, you could execute the loop twice. Once to set the BackColor on all 'bad' fields, and then again to SetFocus. Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Nancy Lytle Sent: Friday, July 16, 2004 13:48 To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the tips, actually I would like to combine the two and have the validation at the end of the form, listing all the fields that must be entered into and those fields would have the background color changed, ie Unfilled required fields would be yellow, corrected field would again become transparent. That way one warning, and they can see all of their "mistakes" at once. Thanks for the ideas, Nancy --- Bob Gajewski wrote: > Nancy > > > Two schools of thought: > > 1) Let the user complete the form, and then validate > it. > > PROS: User allowed to input all data at one time, > then > validate entire form at end (during [Save] action > or when leaving record?). > > CONS: During validation, user receives error for > EACH > empty field, corrects it, then validation routine > must cycle through all controls again. > > 2) Validate each field as completed using > BeforeUpdate(). > > PROS: User stopped immediately and required to input > data in empty field before advancing. > > CONS: More coding required. Must account for user > clicking > around form, so may also need validation during > OnBlur event. > > > Regards, > > Bob Gajewski > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Fri Jul 16 12:58:27 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 16 Jul 2004 13:58:27 -0400 Subject: [AccessD] Looping through control names In-Reply-To: <20040716174317.17049.qmail@web53903.mail.yahoo.com> Message-ID: <000001c46b5e$7f774fc0$cc0aa845@hargrove.internal> If IsNull(ctl.Value) Then Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Nancy Lytle Sent: Friday, July 16, 2004 1:43 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Looping through control names Thanks for the idea but even if I change that line to If IsNull(ctl.Name.Value) Then it still errors on "Object Required". It should be "thinking" Is the value held in the control mndCmdCutomer null? Instead it is thinking Is "null" (ctl.name.value) null TIA Nancy --- "Colby, John" wrote: > if isnull(somevalue) then > do something > > JWC > > -----Original Message----- > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > Sent: Friday, July 16, 2004 1:18 PM > To: Access Developers discussion and problem Solving > Subject: [AccessD] Looping through control names > > > I am trying to make the users fill in a whole set of > fields when they do data entry - almost all fields > in > the form must be filled in - this is a new > requirement. > I thought the easiest way would be to loop through > the > controls that are mandatory (prefixed with mnd) and > if > there is one that is null or an empty string to > require them to go back and fill it in. > Where I am stuck is on checking the value of the > data > in the control. It doesn't like my code below. > > I know I must be missing something simple but I > can't > quite get it. > Any help appreciated. > Nancy > > CODE: > > Dim ctl As Control > For Each ctl In Forms!LCN1 > 'Find the mandatory fields > If left(ctl.Name, 3) = "mnd" Then > 'Check to see if the mandatory field is null > > PROBLEM:"object required> > If ctl.Name.Value Is Null Then > END PROBLEM (I hope:)) > > 'Tell them to go back and fill it in > MsgBox "You must enter a value for the > field: " & ctl.Name > ' ctl.Name.SetFocus > Exit Sub > Else > 'If it is not null then end > End If > Else > 'if it is not mandatory > End If > Next > 'Check next control > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Fri Jul 16 13:04:32 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 16 Jul 2004 14:04:32 -0400 Subject: [AccessD] ALERT: AXP-SpeedFerret-PestPatrol problem In-Reply-To: Message-ID: <20040716180429.FNPN1779.imf23aec.mail.bellsouth.net@SUSANONE> Charlotte, spyware busted my Ebay toolbar -- jumped through all the loops but have never gotten it to work again. :( My loss is irrelevant -- doesn't really hurt me, so I'm not comparing the two in any way -- other than to just mention that it happened to me too. I've uninstalled, reinstalled -- everything I can think of -- simply can't get it back. Susan H. The latest update of PestPatrol on my machine identified some files inappropriately, including two Infragistics ocx files used by SpeedFerret and some registry keys installed by it. Needless to say, it broke SpeedFerret when those files and keys were removed. When I reinstalled SpeedFerret, the files and keys were recreated and PestPatrol again identified them as pests. This time, I excluded them figuring that would take care of the problem. It didn't. PestPatrol ignores those items for now, and SpeedFerret runs but Access XP no longer recognizes the SpeedFerret Add-in key, so there isn't any connection and SF searches fail. I had a long conversation about this with support at Black Mosannon and we discovered that even uninstalling and then reinstalling SpeedFerret didn't correct the problem. I was told that another customer had had a similar experience with a spyware remover and could NOT get SpeedFerret to run properly again on that machine, even after reinstalling Office, all the updates, etc. I'm bloody-minded enough to keep trying to fix it, but I'd be happy for any help. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 16 12:57:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 16 Jul 2004 10:57:51 -0700 Subject: [AccessD] Corrupt A97 database References: <8301C8A868251E4C8ECD3D4FFEA40F8A0811ABAD@cpixchng-1.cpiqpc.net> Message-ID: <40F8171F.1050707@shaw.ca> You could try Peter Miller's PK solutions. You only pay if they can recover. They also need a table structure only mdb to help recovery If over 500 MB they need physical media for data transfer. http://www.pksolutions.com/services.htm rusty.hammond at cpiqpc.com wrote: >I've tried to search the archives on this but I can't get to the site. > >We have an Access 97 database that has become corrupt. I think our file >server went down during a compact. Anyway, we have tried jetcomp and have >tried AccessFix database recovery software from cimaware software. The best >we've gotten so far is it recovers the file but the table we really need >comes up with zero records. We have a backup from the night before but have >lost a whole days worth of work. To spend four or five hundred dollars >wouldn't bother us if we could get our data recovered several hours of >people's time to get the data reentered. > >Can anyone recommend data recovery software that they have used? > >TIA > >Rusty Hammond > > > -- Marty Connelly Victoria, B.C. Canada From lytlenj at yahoo.com Fri Jul 16 13:23:14 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Fri, 16 Jul 2004 11:23:14 -0700 (PDT) Subject: [AccessD] Looping through control names In-Reply-To: <000001c46b5e$7f774fc0$cc0aa845@hargrove.internal> Message-ID: <20040716182314.51586.qmail@web53904.mail.yahoo.com> Thank you to all who replied, I am not there 100% but with that last bit from Doris (how's it going?), I am on my way to a very nice solution that will highlight the fields that need to be addressed all at once. I might even see about rearranged the tab order or something to make it a little easier on the data entry people. Again many thanks, I dreaded the idea of having to go into a ton of forms and write code for each field in that form. I think this will work fine. When I get it working the way I want I will post it back. Again, Many Thanks, Nancy --- Mike & Doris Manning wrote: > If IsNull(ctl.Value) Then > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On > Behalf Of Nancy Lytle > Sent: Friday, July 16, 2004 1:43 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Looping through control names > > > Thanks for the idea but even if I change that line > to > > If IsNull(ctl.Name.Value) Then > > it still errors on "Object Required". > > It should be "thinking" > Is the value held in the control mndCmdCutomer null? > > Instead it is thinking > Is "null" (ctl.name.value) null > > TIA > Nancy > > > --- "Colby, John" wrote: > > if isnull(somevalue) then > > do something > > > > JWC > > > > -----Original Message----- > > From: Nancy Lytle [mailto:lytlenj at yahoo.com] > > Sent: Friday, July 16, 2004 1:18 PM > > To: Access Developers discussion and problem > Solving > > Subject: [AccessD] Looping through control names > > > > > > I am trying to make the users fill in a whole set > of > > fields when they do data entry - almost all fields > > in > > the form must be filled in - this is a new > > requirement. > > I thought the easiest way would be to loop through > > the > > controls that are mandatory (prefixed with mnd) > and > > if > > there is one that is null or an empty string to > > require them to go back and fill it in. > > Where I am stuck is on checking the value of the > > data > > in the control. It doesn't like my code below. > > > > I know I must be missing something simple but I > > can't > > quite get it. > > Any help appreciated. > > Nancy > > > > CODE: > > > > Dim ctl As Control > > For Each ctl In Forms!LCN1 > > 'Find the mandatory fields > > If left(ctl.Name, 3) = "mnd" Then > > 'Check to see if the mandatory field is null > > > > PROBLEM:"object required> > > If ctl.Name.Value Is Null Then > > END PROBLEM (I hope:)) > > > > 'Tell them to go back and fill it in > > MsgBox "You must enter a value for the > > field: " & ctl.Name > > ' ctl.Name.SetFocus > > Exit Sub > > Else > > 'If it is not null then end > > End If > > Else > > 'if it is not mandatory > > End If > > Next > > 'Check next control > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From garykjos at hotmail.com Fri Jul 16 13:41:13 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 16 Jul 2004 13:41:13 -0500 Subject: [AccessD] Jumpdrive encrypted volume Message-ID: This message from Brenda got "autorejected " Not sure WHY. But here it is...... Gary Kjos garykjos at hotmail.com From: Reische, Brenda L. To: "'Access Developers discussion and problem solving'" Subject: RE: [AccessD] Jumpdrive encrypted volume Sent: Friday, July 16, 2004 1:16 PM Actually, I have a similar problem. What I discovered is that I have full access to the public portion on my desktop. I have no access to it at all on my laptop, and I have access to the public and encrypted areas both on a different laptop at work. I was able to get the info off the encrypted portion with that second laptop. I bought a new one, and it is recognized in all of the devices. I wonder how well tested these are and if we'll start seeing more of this as they become more heavily used. I used mine almost daily for around a month and a half. The instructions for removing the jumpdrive say, "Close all files stored on the jumpdrive. To avaoid loss of data, do not remove the jumpdrive while the light is blinking." It doesn't require you to stop and start the hardware, per se. Perhaps I will with the new one to see if that makes a difference, but I WILL keep it backed up on my home pc. Brenda Reische Application Support Analyst McDonough District Hospital www.mdh.org (309) 833-4101 -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com From mkahelin at gorskibulk.com Fri Jul 16 13:46:34 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Fri, 16 Jul 2004 14:46:34 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AC13@gbtmain.gorskibulk.local> Some neat-freak cleaned out the safe and threw out the notes on the .mda keys so I should not be able to re-create the file - conspiracy to have me committed. > -----Original Message----- > From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] > Sent: Thursday, July 15, 2004 10:42 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > WG files? In 97 and 2000, workgroup files are mdw's, did > that change in 2003? > > One approach you might take is to 'merge' the security > systems. Workgroup files only store 'login' information, the > permissions are stored in the .mdb itself. If you use the > same UserName and/or Group name, in both workgroup files, > they should be interchangeable. Of course, you also have to > use the same 'ID' when you create them. > > I honestly don't know how well it works across versions. I > would assume that going from a newer version to an older > version wouldn't be an issue. > > If you have the security matched, I don't think you would > have a problem putting a 'outside' database as a source in a > query. I'm guessing here, but it's a well educated guess. > Access User Level security is very similar to NT security, > and when a process in NT has a specific security account, the > 'credentials' carry over to whatever that process is using. > I wouldn't be at all surprised if Jet does the same thing. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mkahelin at gorskibulk.com Fri Jul 16 13:48:38 2004 From: mkahelin at gorskibulk.com (Martin Kahelin) Date: Fri, 16 Jul 2004 14:48:38 -0400 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <0D2D1FEE52F53B46987A44B2EBF284D626AC14@gbtmain.gorskibulk.local> We all live for the priviledge to work after-hours - don't we? Jim, what do you have in mind? > -----Original Message----- > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > Sent: Thursday, July 15, 2004 5:09 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Hi Marty: > > Well, I have one suggestion and I will be having to do a > similar task, next week. Can you make the switch before or > after hours? > > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:48 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > Thanks Jim - that would be ok except the data is live and is > being updated. If I move it to a new table (v.2000) then the > data isn't accessible to the 2.0 app. Oh well, nobody ever > told me this stuff was supposed to be easy. > > > -----Original Message----- > > From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] > > Sent: Thursday, July 15, 2004 1:38 PM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > Hi Martin: > > > > Have you tried to link the data. Go into the new database > and select > > link (File/Get External data/Link Tables...) to attach the > tables from > > the older database. You should be able to actually copy the old > > tables, with data, into new tables, into the new database. > Later, when > > the SQL DB is up and running you can just pull the tables and data, > > into the DB using the DTS import/export wizard, in the EM. > > > > This should be a very easy process...but you will have to have full > > permissions. > > > > HTH > > Jim > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin > > Kahelin > > Sent: Thursday, July 15, 2004 9:39 AM > > To: Access Developers discussion and problem solving > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > I'm currently using Access 2003 with a 'new' mdw workgroup file. I > > need to lookup data from the 'old' Access database (v.2.0 > format with > > mda workgroup file) until I can port the old application > and data over > > to new database with data in SQL tables. -connecting to a > SQL database > > I can specify userid, password - I was hoping I can do the same to > > connect to another Access db/table. > > > > > -----Original Message----- > > > From: Charlotte Foust [mailto:cfoust at infostatsystems.com] > > > Sent: Thursday, July 15, 2004 12:16 PM > > > To: Access Developers discussion and problem solving > > > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > > > > > > > Not in a query. You can't logically enable an interface-level > > > connection to a database where the user has no permissions on the > > > other database. Why are you using two workgroups, and what is it > > > you're actually trying to accomplish? > > > > > > Charlotte Foust > > > > > > -----Original Message----- > > > From: Martin Kahelin [mailto:mkahelin at gorskibulk.com] > > > Sent: Thursday, July 15, 2004 8:01 AM > > > To: Access Developers discussion and problem solving > > > Subject: [AccessD] Connect to db with different wrkgroup > > > > > > > > > I'm in the (slow) process of migrating data to Access 2000 format > > > tables and need help to bridge the transition. With two Access > > > databases (db) having two workgroup (wg) files; Is there a way to > > > establish a query connection from db/wg A to db/wg B? i.e. can I > > > establish a sourcedatabase connection from a query and > specify mdb, > > > mdw, user and password -link doesn't work since the > > logged-in user or > > > owner does not have access to the other db. > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > -- > > > _______________________________________________ > > > AccessD mailing list > > > AccessD at databaseadvisors.com > > > http://databaseadvisors.com/mailman/listinfo/accessd > > > Website: http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Fri Jul 16 13:28:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 16 Jul 2004 20:28:39 +0200 Subject: [AccessD] Custom MsgBox Message-ID: <897858690.20040716202839@cactus.dk> Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav From michael.broesdorf at web.de Fri Jul 16 14:13:35 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 16 Jul 2004 21:13:35 +0200 Subject: AW: [AccessD] Working with TSQL Timestamp values in Access VBA? In-Reply-To: Message-ID: Hi Jim, thank you for the code sample! But the question still is: how do I declare/set glTimestampNumber? If I assign the timestamp value to a variant, comparing does not work as expected. Vartype(rst!timestampnumber) tells me that it is an array of byte values, but assigning it to a byte array gives me a type conflict. (The app uses a grid control that works unbound, so all of the methods of locking/transactions etc. you mentioned will not work here) Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Jim Lawrence (AccessD) Gesendet: Freitag, 16. Juli 2004 18:18 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Working with TSQL Timestamp values in Access VBA? Hi Michael: Assuming that the time-stamp value is recorded in SQL and you have a key in the record in question and you are using ADO then: ... Set objCmd = New ADODB.Command With objCmd .ActiveConnection = gstrConnection .CommandText = "CheckRecord" .CommandType = adCmdStoredProc .Parameters.Append .CreateParameter("@intEmployeeNumber", adInteger, adParamInput, , Employeenumber) End With Set rs1 = New ADODB.Recordset With rs1 .Open objCmd, , adOpenStatic, adLockReadOnly If .BOF = False And .EOF = False Then .MoveLast If ![TimestampNumber] = glTimestampNumber Then SaveRecord = True Else SaveRecord = False End If Else SaveRecord = True End If End With ... ...but you should not have to be using the timestamp method to track whether a record on the SQL server was updated on client station. There are three considerations: 1. The initial recordset that retrieved the data from the server should have locked the record. ... rsEmployee.Open objCmd, , adOpenDynamic, adLockOptimistic ... 2. Setting transaction lock, when updating the record and responding to any error, by rolling the transaction back and notify the station user can catch record conflicts. On Error GoTo Err_UpDateRecord ... objConn.BeginTrans ... objConn.Execute strSQL Exit_UpdateRecord: Exit Function Err_UpdateRecord: objConn.RollbackTrans ShowConflictMsg ("SaveEmployee") Resume Exit_UpdateRecord ... 3. The SQL server has methods for handling/buffering record conflicts built into it. Even though the previous code samples are not complete I hope there is sufficient information to make the snippets useful and informative. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 7:57 AM To: Access Developers discussion and problem solving Subject: [AccessD] Working with TSQL Timestamp values in Access VBA? Dear group, for an unbound form in my Access 2K application I want to compare the value of a timestamp column to that of the same record on the server to find out if modifications have been made by other users. Unfortunately I can't find a way to store such timestamp values in a variable. Is it possible to convert timestamp values to a number or a string in a deterministic way? (In TSQL, the CONVERT-function does not allow for explicit type conversion of timestamp values.) Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jul 16 14:36:56 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Fri, 16 Jul 2004 15:36:56 -0400 Subject: [AccessD] Jumpdrive encrypted volume In-Reply-To: Message-ID: <000601c46b6c$4198cef0$0501a8c0@colbyws> Thanks, John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gary Kjos Sent: Friday, July 16, 2004 2:41 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Jumpdrive encrypted volume This message from Brenda got "autorejected " Not sure WHY. But here it is...... Gary Kjos garykjos at hotmail.com From: Reische, Brenda L. To: "'Access Developers discussion and problem solving'" Subject: RE: [AccessD] Jumpdrive encrypted volume Sent: Friday, July 16, 2004 1:16 PM Actually, I have a similar problem. What I discovered is that I have full access to the public portion on my desktop. I have no access to it at all on my laptop, and I have access to the public and encrypted areas both on a different laptop at work. I was able to get the info off the encrypted portion with that second laptop. I bought a new one, and it is recognized in all of the devices. I wonder how well tested these are and if we'll start seeing more of this as they become more heavily used. I used mine almost daily for around a month and a half. The instructions for removing the jumpdrive say, "Close all files stored on the jumpdrive. To avaoid loss of data, do not remove the jumpdrive while the light is blinking." It doesn't require you to stop and start the hardware, per se. Perhaps I will with the new one to see if that makes a difference, but I WILL keep it backed up on my home pc. Brenda Reische Application Support Analyst McDonough District Hospital www.mdh.org (309) 833-4101 -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:24 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Thanks for the update...I'll pass along that experience. Just curious...had you read any documentation that made that assertion, and now...what are your thoughts, do you see your experience as a fluke? In other words, will you still power down with the drive inserted? Mark -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Friday, July 16, 2004 9:48 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume I specifically shut it down IF I am not shutting down my computer. I expect Windows to correctly shut it down if I am shutting down Windows. In fact I got it back by TURNING OFF the machine and turning it back on with the Jump Drive already in the socket. Before I was rebooting which wasn't working. Strange. Anyway, I am back and have copied all my critical data off. 8-) JWC. -----Original Message----- From: Mitsules, Mark S. (Newport News) [mailto:Mark.Mitsules at ngc.com] Sent: Friday, July 16, 2004 9:32 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Jumpdrive encrypted volume John, Did you actually perform those steps in that order? I've always clicked that cute little icon in the systray that tells me when it is safe to remove the hardware...then I can power down if needed. A co-worker recently described your exact circumstances. He'd always said that he never bothered to click that icon...just yanked it out...now, his USB drive "unexpectedly" doesn't work. Mark -----Original Message----- From: jwcolby [mailto:jwcolby at colbyconsulting.com] Sent: Thursday, July 15, 2004 11:17 PM To: AccessD Subject: [AccessD] Jumpdrive encrypted volume Anyone here using one of these? I have a 256mb model that I have been using for weeks. It was working this morning. Turned off my laptop, removed the drive. This evening, I cannot mount the encrypted volume. Win2K says simply cannot mount drive (after entering password). XP does a page fault and offers to send a report to MS. Any words of wisdom? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 16 16:24:44 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 16 Jul 2004 16:24:44 -0500 Subject: [AccessD] Connect to db with different wrkgroup Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB13B@main2.marlow.com> Any possibility of just creating new accounts for people to use? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Martin Kahelin Sent: Friday, July 16, 2004 1:47 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Connect to db with different wrkgroup Some neat-freak cleaned out the safe and threw out the notes on the .mda keys so I should not be able to re-create the file - conspiracy to have me committed. > -----Original Message----- > From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] > Sent: Thursday, July 15, 2004 10:42 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Connect to db with different wrkgroup > > > WG files? In 97 and 2000, workgroup files are mdw's, did > that change in 2003? > > One approach you might take is to 'merge' the security > systems. Workgroup files only store 'login' information, the > permissions are stored in the .mdb itself. If you use the > same UserName and/or Group name, in both workgroup files, > they should be interchangeable. Of course, you also have to > use the same 'ID' when you create them. > > I honestly don't know how well it works across versions. I > would assume that going from a newer version to an older > version wouldn't be an issue. > > If you have the security matched, I don't think you would > have a problem putting a 'outside' database as a source in a > query. I'm guessing here, but it's a well educated guess. > Access User Level security is very similar to NT security, > and when a process in NT has a specific security account, the > 'credentials' carry over to whatever that process is using. > I wouldn't be at all surprised if Jet does the same thing. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Martin Kahelin > Sent: Thursday, July 15, 2004 11:01 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Connect to db with different wrkgroup > > > I'm in the (slow) process of migrating data to Access 2000 > format tables and need help to bridge the transition. With > two Access databases (db) having two workgroup (wg) files; Is > there a way to establish a query connection from db/wg A to > db/wg B? i.e. can I establish a sourcedatabase connection > from a query and specify mdb, mdw, user and password -link > doesn't work since the logged-in user or owner does not have > access to the other db. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jmhla at earthlink.net Fri Jul 16 16:48:25 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Fri, 16 Jul 2004 14:48:25 -0700 (GMT-07:00) Subject: [AccessD] Corrupt A97 database Message-ID: <8814798.1090014505865.JavaMail.root@kermit.psp.pas.earthlink.net> Try importing all objects into a new DB. That works a lot of the time. If not and from what you have said in your note the easiest fastest and less expensive high quality effort would be to restore from the night before and just reenter one days worth of data. That you only lost one day shows you are taking good care of your data. -----Original Message----- From: rusty.hammond at cpiqpc.com Sent: Jul 16, 2004 8:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] Corrupt A97 database I've tried to search the archives on this but I can't get to the site. We have an Access 97 database that has become corrupt. I think our file server went down during a compact. Anyway, we have tried jetcomp and have tried AccessFix database recovery software from cimaware software. The best we've gotten so far is it recovers the file but the table we really need comes up with zero records. We have a backup from the night before but have lost a whole days worth of work. To spend four or five hundred dollars wouldn't bother us if we could get our data recovered several hours of people's time to get the data reentered. Can anyone recommend data recovery software that they have used? TIA Rusty Hammond -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Fri Jul 16 21:56:34 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Sat, 17 Jul 2004 02:56:34 -0000 Subject: [AccessD] A2K: Error 3343 When I install Backend on server References: <40F80AD8.18919.6D50350@lexacorp.com.pg> Message-ID: <005401cb255b$d1b7dad0$48619a89@DDICK> Thanks Stuart I'll have to look deeper into this. It is without question a server side issue and perhaps a permissions issue Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Friday, July 16, 2004 5:05 PM Subject: Re: [AccessD] A2K: Error 3343 When I install Backend on server > On 16 Jul 2004 at 12:46, Darren DICK wrote: > > > HI Stuart > > Thanks for this > > I have read and re-read the blurb from M$ > > I still don't get it. > > I have set the permissions on the TEMP folder on my DEV machine to > > anyone can do anything they like from anywhere withany logon :-)) > > Compiled - decompiled and compacted and repaired the DEV version of the > > back end whilst it was on my DEV machine > > > > Then I copy this local DEV version of the BE to the server - drop it into > > the expected place then try and perform some tasks and now I get > > Error 3260 "Could Not Update; currently locked by user '(unknown)' on machine " > > It isn't locked at all - like I said I have admin permission on the server. No-one else is looking at > > that file at all. > > The KB section of MS was useless. > > Any suggestions?? > > I'm starting to get desperate this will halt the deployment of the app due this Monday > > > I'd say it's definitely a rights thing. You need to look at the Share > permissions as well as direct access rights to find out who can really do what > on a file. Do you have Admin rights through the Share you are using? > > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Fri Jul 16 22:43:43 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Fri, 16 Jul 2004 23:43:43 -0400 Subject: [AccessD] OT: New Browser In-Reply-To: <005401cb255b$d1b7dad0$48619a89@DDICK> Message-ID: <000901c46bb0$423fcc70$0501a8c0@colbyws> I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com From ebarro at afsweb.com Fri Jul 16 23:41:50 2004 From: ebarro at afsweb.com (Eric Barro) Date: Fri, 16 Jul 2004 21:41:50 -0700 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: I downloaded FireFox a few days ago and I'm using it as my primary browser now. I like the tabbed windows. --- Eric Barro Senior Systems Analyst Advanced Field Services (208) 772-7060 http://www.afsweb.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 8:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com From chizotz at mchsi.com Sat Jul 17 00:17:52 2004 From: chizotz at mchsi.com (Ron Allen) Date: Sat, 17 Jul 2004 00:17:52 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <005401cb255b$d1b7dad0$48619a89@DDICK> <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: <822539500.20040717001752@mchsi.com> Hi John, I'm using FireFox, and so far am happy with it overall but it does have a few annoying bugs... or maybe features :) Ron Friday, July 16, 2004, 10:43:43 PM, you wrote: j> Anyone care to answer a poll: j> Of those who use an alternative browser (not IEX) what browser do you use? From stuart at lexacorp.com.pg Sat Jul 17 01:12:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sat, 17 Jul 2004 16:12:50 +1000 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <005401cb255b$d1b7dad0$48619a89@DDICK> Message-ID: <40F95002.29485.BCB30D7@lexacorp.com.pg> On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. I'll be > downloading mozilla next. Firefox appears from what I am seeing to be still > in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From jmoss111 at bellsouth.net Sat Jul 17 08:32:52 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 17 Jul 2004 08:32:52 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: I've been using FireFox since 0.6, it's at 0.9.2 now and I've found it to be rock solid and not buggy. It's initial load is just a bit slower than IE6.1. My favorite feature is the download manager. It's been quite awhile since I used Opera, somewhere around rel 3.?. I liked it OK but didin't see anything compelling enough to pay $35 for it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 10:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 17 09:33:20 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 17 Jul 2004 10:33:20 -0400 Subject: [AccessD] Custom MsgBox In-Reply-To: <897858690.20040716202839@cactus.dk> Message-ID: Try this. You will need a reference to the Windows Script Host Object Model. Regards, Steve Goodhall Function SJGMsgBox(sPrompt, Optional iButtons As Integer = vbOK, Optional sTitle As Variant = Empty, _ Optional iSeconds As Integer = 30) Dim iResult As Integer, oWSH As WshShell Set oWSH = CreateObject("wscript.shell") iResult = oWSH.PopUp(sPrompt, iSeconds, sTitle, iButtons) SJGMsgBox = iResult Set oWSH = Nothing End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, July 16, 2004 2:29 PM To: Access Developers discussion and problem solving Subject: [AccessD] Custom MsgBox Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgoodhall at comcast.net Sat Jul 17 09:33:22 2004 From: sgoodhall at comcast.net (Steve Goodhall) Date: Sat, 17 Jul 2004 10:33:22 -0400 Subject: [AccessD] Set Outlook Properties in Access In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE88C3@cntexchange.pgdp.usec.com> Message-ID: That's a new security feature that was introduced with one of the SP's for Microsoft Office. I believe it is in the base product for Office 2003. Look here (http://www.slipstick.com/outlook/esecup.htm) for lots of information, including some aftermarket products. I have not validated any of them. Regards, Steve Goodhall -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hollis,Virginia Sent: Thursday, July 15, 2004 8:59 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Set Outlook Properties in Access I am trying to send automated emails through Outlook from Access. I found this link from Microsoft that tells how to do this. http://msdn.microsoft.com/office/understanding/access/codesamples/default.as px?pull=/library/en-us/dno2k3ta/html/odc_ac_olauto.asp I run into the problem with the security settings - where it pops up the message about a potential virus and if you want to do this and for how long. I figure this just 'may' scare off users - imagine that. Anyway, is there a way to set the Outlook security settings (Tools, Macros, Security) through Access code, to Low, send the email and then reset their security to High or Medium again? I figure there should be a way to do this for Outlook similar to setting the startup properties, etc in Access when it opens. Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Sat Jul 17 11:20:17 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Sat, 17 Jul 2004 18:20:17 +0200 Subject: [AccessD] Create custom shortcut menu In-Reply-To: Message-ID: Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael From accessd at shaw.ca Sat Jul 17 11:41:39 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 17 Jul 2004 09:41:39 -0700 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: Hi John: I test all my web apps on the standards IE, Opera, Netscape and FireFox. Bryan Carbonnel gave me the heads up on FireFox (It runs equally well on WinXX and Unix boxes) and I especially like it's fast responses. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Friday, July 16, 2004 8:44 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] OT: New Browser I downloaded Opera today, to start evaluating alternative browsers. I'll be downloading mozilla next. Firefox appears from what I am seeing to be still in beta. Anyone care to answer a poll: Of those who use an alternative browser (not IEX) what browser do you use? John W. Colby www.ColbyConsulting.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sat Jul 17 11:41:38 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sat, 17 Jul 2004 09:41:38 -0700 Subject: [AccessD] Custom MsgBox In-Reply-To: <897858690.20040716202839@cactus.dk> Message-ID: Hi Gustav: Where do you find this stuff...brilliant. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Friday, July 16, 2004 11:29 AM To: Access Developers discussion and problem solving Subject: [AccessD] Custom MsgBox Hi all Someone asked for a way to have a MsgBox go away by itself after a delay. Here's a site having some code for a custom messagebox also featuring a "Don't show this again" checkbox: http://www.gipsysoft.com/messagebox/ /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From demulling at centurytel.net Sat Jul 17 11:55:30 2004 From: demulling at centurytel.net (Demulling Family) Date: Sat, 17 Jul 2004 11:55:30 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000901c46bb0$423fcc70$0501a8c0@colbyws> References: <000901c46bb0$423fcc70$0501a8c0@colbyws> Message-ID: <40F95A02.2050606@centurytel.net> jwcolby wrote: >I downloaded Opera today, to start evaluating alternative browsers. I'll be >downloading mozilla next. Firefox appears from what I am seeing to be still >in beta. > >Anyone care to answer a poll: > >Of those who use an alternative browser (not IEX) what browser do you use? > >John W. Colby >www.ColbyConsulting.com > > > > I am using Mozzilla 1.7. Really like the tabbed browsing and it is my main browser. From gustav at cactus.dk Sat Jul 17 12:13:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 17 Jul 2004 19:13:01 +0200 Subject: [AccessD] Custom MsgBox In-Reply-To: References: Message-ID: <987643620.20040717191301@cactus.dk> Hi Jim That was at Coderanger who use a library from Gipsysoft who ... The link to Coderanger came from Mike Gunderloy who mentioned in his newsletter BuiltIt which on its own is very interesting: http://www.coderanger.com This tool is intended for managing the whole proces by scheduled linking of program code - not very relevant for an Access programmer, but yes it could be, as you often do some finishing work like decompiling, compressing and archiving. It's an advanced batch tool capable of - all by itself - to do e-mail, ftp transfer and zipping and many other things including a complete script language - very handy and very clever. /gustav > Hi Gustav: > Where do you find this stuff...brilliant. > Jim > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Friday, July 16, 2004 11:29 AM > To: Access Developers discussion and problem solving > Subject: [AccessD] Custom MsgBox > Hi all > Someone asked for a way to have a MsgBox go away by itself after a > delay. > Here's a site having some code for a custom messagebox also featuring > a "Don't show this again" checkbox: > http://www.gipsysoft.com/messagebox/ From tapli005 at umn.edu Sat Jul 17 13:01:54 2004 From: tapli005 at umn.edu (Brad Taplin) Date: Sat, 17 Jul 2004 13:01:54 -0500 Subject: [AccessD] Re: AccessD Digest, Vol 17, Issue 31 In-Reply-To: <200407171700.i6HH0OQ16555@databaseadvisors.com> References: <200407171700.i6HH0OQ16555@databaseadvisors.com> Message-ID: <6346EDE0-D81B-11D8-854A-00306570C55C@umn.edu> Mozilla 1.7 is fantastic, though you may want to re-download and install the www.macromedia.com and www.adobe.com free extras - Flash, Shockwave, and Acrobat Reader (6.0.1) - after installing Mozilla and tweaking the preferences. I maintain about fifty desktops and this is my choice, though FireFox is perfectly good as well. It just lacks some extras. I've always had a few small but annoying probs with Opera. Microsoft makes some great products, but IE is the swiss cheese of security and should be avoided when possible. If you run Linux, Konqueror is pretty nice too, but who on this list will run Linux? Stick to Mozilla, which works well and similarly on Windows, Linux, and Apple OS X. -Brad On Jul 17, 2004, at 12:00 PM, accessd-request at databaseadvisors.com wrote: > Date: Fri, 16 Jul 2004 23:43:43 -0400 > From: "jwcolby" > Subject: [AccessD] OT: New Browser > To: "'Access Developers discussion and problem solving'" > > > I downloaded Opera today, to start evaluating alternative browsers. > I'll be > downloading mozilla next. Firefox appears from what I am seeing to be > still > in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > > John W. Colby > www.ColbyConsulting.com > **************************** -- take the red pill -- From forefront at ig.com.br Sat Jul 17 14:26:57 2004 From: forefront at ig.com.br (=?iso-8859-15?Q?=22Forefront_em_Inform=E1tica_e_Consulto?= =?iso-8859-15?Q?ria_Ltda.=22?=) Date: Sat, 17 Jul 2004 16:26:57 -0300 Subject: [AccessD] OT: New Browser In-Reply-To: <40F95A02.2050606@centurytel.net> References: <000901c46bb0$423fcc70$0501a8c0@colbyws> <40F95A02.2050606@centurytel.net> Message-ID: >> >> Anyone care to answer a poll: >> >> Of those who use an alternative browser (not IEX) what browser do you >> use? >> >> John W. Colby www.ColbyConsulting.com >> I have been using Opera since v5.0 and Mozilla as alternate package. :) -- ************************************************ * Forefront em Inform?tica e Consultoria Ltda. * * Carlos Alberto Alves * * Systems Analyst/Programmer * * Rio de Janeiro, Brazil * * Phone Direct: 55-21-9169-1596 * * mailto:forefront at ig.com.br * ************************************************ From carbonnb at sympatico.ca Sat Jul 17 14:44:01 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Sat, 17 Jul 2004 15:44:01 -0400 Subject: [AccessD] OT: New Browser Message-ID: <20040717194401.CYCD5106.tomts14-srv.bellnexxia.net@mxmta.bellnexxia.net> > >> Anyone care to answer a poll: > >> > >> Of those who use an alternative browser (not IEX) what browser do you > >> use? > >> > >> John W. Colby www.ColbyConsulting.com Firefox, without a doubt for me. You'd be supprised how may people use Firefox. Here are some stats since the start of July) from the webserver's logs of the mailing list server, which hosts the archives (not Drew's but DBA's) IE 79.6 % FireFox 14 % Mozilla 2.8 % Netscape 1 % Everything else is less than 1 % As you can see Firefox is quite popular. What I particularly like about Firefox is that it is a web browser first and foremost. That's all it does out of the box. It's standards compliant. It renders fast. If there is something that you feel is missing, there is usually an extension you can add to get the functionallity you want. It is HIGHLY configurable. Those are just some of the highlights. Don't be scared by the beta tag. It's not an MS beta :) As Stuart (I think) said, it just means that they are not finished implementing all the features that they want to inculde. Its stable and hasn't crashed on me since I started using it back around v0.6. My $0.02 worth. -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From ssharkins at bellsouth.net Sat Jul 17 16:17:02 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 17 Jul 2004 17:17:02 -0400 Subject: [AccessD] importing from Excel Message-ID: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. From jwcolby at colbyconsulting.com Sat Jul 17 17:07:31 2004 From: jwcolby at colbyconsulting.com (jwcolby) Date: Sat, 17 Jul 2004 18:07:31 -0400 Subject: [AccessD] OT: New Browser In-Reply-To: <40F95002.29485.BCB30D7@lexacorp.com.pg> Message-ID: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Saturday, July 17, 2004 2:13 AM To: Access Developers discussion and problemsolving Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sat Jul 17 17:22:17 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sat, 17 Jul 2004 18:22:17 -0400 Subject: [AccessD] importing from Excel In-Reply-To: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> Message-ID: <20040717222211.DTKQ1776.imf21aec.mail.bellsouth.net@SUSANONE> Should have mentioned -- the only data type conflict we encountered was accommodating text fields with more than 255 characters -- had to export to a text file and then import so we could define those fields as Memo fields -- was an easy fix considering the wizard lets you specify data types for all the fields, so we didn't lose anything by importing strictly text. Susan H. I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pieter.janssens.lists at chello.be Sat Jul 17 17:53:36 2004 From: pieter.janssens.lists at chello.be (Pieter Janssens) Date: Sun, 18 Jul 2004 00:53:36 +0200 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> Message-ID: <20040717225253.CLZ29681.amsfep13-int.chello.nl@darwin> hi John, as a browser, firefox is as good as feature complete and will allow a full web experience without any of the addons. i use only one add-in for improved security concerning cookies, the cookie culler. if you start comparing with other browsers such as opera, yes then you would need an addon to be able to use mouse gestures for example. the bug you're referring to was a very old shell exploit that has recently been rediscovered and patched within a few hours(!) of rediscovery with the newest version 0.9.2 but every version can also be manually patched by creating/setting the boolean network.protocol-handler.external.shell configuration to false in the about:config page of firefox or donwloading an xpi addon. in short, for the moment firefox is pretty much exploit free, and providing an excellent and stable browsing experience. also, afaict the mozilla people have learned from the somewhat problematic upgrade from 0.8 to 0.9 and this will be improved accordingly in the next release, no doubt. my advice, get it and don't look back. greetings, pieter. -----Original Message----- From: jwcolby Subject: RE: [AccessD] OT: New Browser To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: Stuart McLachlan Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. From jmoss111 at bellsouth.net Sat Jul 17 18:04:40 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Sat, 17 Jul 2004 18:04:40 -0500 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> Message-ID: I don't know what version the reviewers were talking about but everything that I had at v0.8 is still functional after an update to v0.9.2 without any intervention on my part. There is a page at the firefox download site that had links to plugins. I don't use firefox heavily, but have encountered no errors to date. Another favorite feature that I neglected to mention earlier is the configurable popup stopper which is how I found it in the first place. v0.9.2 was released recently, and maybe that is what the reviewers were talking about. And to be honest, most of my web browsing in the last month or so has been done at client sites on IE6. I think that the problem with some addons is that firefox checks the addons and if not known to be "certified" for the new release will be disabled by firefox upgrade. v1.o releases in the middle of September. JM -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of jwcolby Sent: Saturday, July 17, 2004 5:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: New Browser To all the firefox users... The two reasons I decided against that browser were that reviewers said you had to find and install add-0ns to make it fully functional and that upgrades hosed those add-ons and made you re-install them. Also some kind of bugs just recently (in the last month) making it flaky. Any comments on that? John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan Sent: Saturday, July 17, 2004 2:13 AM To: Access Developers discussion and problemsolving Subject: Re: [AccessD] OT: New Browser On 16 Jul 2004 at 23:43, jwcolby wrote: > I downloaded Opera today, to start evaluating alternative browsers. > I'll be downloading mozilla next. Firefox appears from what I am > seeing to be still in beta. > > Anyone care to answer a poll: > > Of those who use an alternative browser (not IEX) what browser do you > use? > Firefox. I love it, especially the multiple tabs and the download manager. WRT it's beta status, there seems to be a developing trend, especially in Open Source, for software to remain "in beta" for years. In the case of Firefox, it's because they have a very clear roadmap with milestones. In their case, beta doesn't mean "buggy", it means "not all the planned features of ver 1.0 are in place yet". I've certainly found it to be very stable. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Sat Jul 17 19:15:09 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 10:15:09 +1000 Subject: [AccessD] importing from Excel In-Reply-To: <20040717211656.SSTA1742.imf17aec.mail.bellsouth.net@SUSANONE> Message-ID: <40FA4DAD.7445.30913E2@lexacorp.com.pg> On 17 Jul 2004 at 17:17, Susan Harkins wrote: > I'm wondering if any of you routinely see data type conflicts when importing > Excel data into Access? I spent an afternoon with a client a few weeks back > cleaning up Excel data for a clean import into Access -- we were totally > successful. We went from losing hundreds of records to capturing every > single one -- with just a few simple changes in their routine. > > The one potential problem I thought of that we didn't encounter was a > conflict in data types -- have any of you experienced this? My guess is > you'd simply convert using the Import Wizard, but I'd like to hear your > horror stories and solutions. >I know imports are often automated and that complicates things. > > The client's experience was strictly a one-time effort. Once they got it in > Access and we normalized the data, they were done with that part for good. > They were trying to create a searchable/reportable archive of some very old > data and used Excel as the go-between -- but then couldn't get the Excel > data clean enough to import. The truth is, it was very easy to solve -- they > just didn't know the right tricks. So, now they want it all documented, but > I personally, haven't run into any data type conflicts while importing from > Excel, but I'd like to note any potential problems if they're out there. > Mostly I see problems when clients open delimited text files in Excel and then save them again. That can really screw up formatting of the files for a subsequent import into Access. ie doing what you were doing - "used Excel as a go-between" In fact there's an interesting article in The Register about this problem http://www.theregister.co.uk/2004/07/16/excel_vanishing_dna/ The other problem is indeed Datatype conversions. The Excel Import Wizard does NOT allow you to define datatypes. You are forced to accept what the Wizard thinks is the appropriate type. Friday I spent hours working on data for a client who is a printshop. They had received a load of delimited text files of data to produce Annual statements for contributors to a super fund. They had tried to merge theses files using Excel. They initially called me in to look at the data and help them with some addressing and formatting problems and grouping sorting problems with the merged data. Initially I tried to import there resulting Excel file into Access. One column contained numbers (percentage of a superannuation death benefit which went to each beneficiary.) The first x records had numbers like 100, 50, 25 in them so the Excel import wizard decided it was an integer field and truncated the 33.3s when they finally occurred further down. Another field was text which could have a date or some other comment in it. Because the first few had dates, the wizard decided that that was it and subsequently threw out all the text comments. I eventually did what I've done on several occasions in the past. Saved the spreadsheet as a delimited text file and import that. The text import wizard DOES let you define the datatype of each column and even better, you can bypass the wizard and write your own routine to modify the data as it is imported if you really need to. I then found one other problem. When I looked at the number of records imported from Excel there were 65535 of them. That number immediately aroused my suspicions (Hope no-one here has to ask why ) and on checking, sure enough there were actually well over 70,000 contributors in the original data files. I ended up importing the raw data files and merging them in Access. It took me about ten minutes to do the raw text files import then merge, clean and export as required for their print formatting software (a program called Paris), but it cost them several hours of my time to identify and sort out the problems caused by them using Excel on the data in the first place. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From stuart at lexacorp.com.pg Sat Jul 17 18:32:17 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 09:32:17 +1000 Subject: [AccessD] OT: New Browser In-Reply-To: <000a01c46c4a$7568aaf0$0501a8c0@colbyws> References: <40F95002.29485.BCB30D7@lexacorp.com.pg> Message-ID: <40FA43A1.22560.2E1D502@lexacorp.com.pg> On 17 Jul 2004 at 18:07, jwcolby wrote: > To all the firefox users... > > The two reasons I decided against that browser were that reviewers said you > had to find and install add-0ns to make it fully functional and that > upgrades hosed those add-ons and made you re-install them. I'm running it without any Add-Ons and it does everything I want to. Add-ons can be anything from skins to games, enhancements to the built in download manager, Favourites Toolbar, Search engine interface etc, etc >Also some kind > of bugs just recently (in the last month) making it flaky. > I've been running it since V0.8 and have upgraded with each new release. It's less flaky for me than the release versions of IE. :-) -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Sat Jul 17 17:48:20 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Sun, 18 Jul 2004 08:48:20 +1000 Subject: [AccessD] Criteria and Variables Message-ID: <005401c46c50$290148b0$0100000a@mitmaster> Hi Folks I'm chasing the correct syntax to use declared variables in the Criteria window when building queries. I can place the value in the criteria window by first using the variable to load a text box in the calling form and referencing the text box from the query but I'm presuming it's possible to do directly but...... what am I missing? Thanks Martin From stuart at lexacorp.com.pg Sun Jul 18 00:02:41 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Sun, 18 Jul 2004 15:02:41 +1000 Subject: [AccessD] Criteria and Variables In-Reply-To: <005401c46c50$290148b0$0100000a@mitmaster> Message-ID: <40FA9111.24440.4105476@lexacorp.com.pg> On 18 Jul 2004 at 8:48, Martin Caro wrote: > Hi Folks > > I'm chasing the correct syntax to use declared variables in the > Criteria window when building queries. I can place the value in the > criteria window by first using the variable to load a text box in the > calling form and referencing the text box from the query but I'm > presuming it's possible to do directly but...... what am I missing? > AFAIK, it's not possible to use declared variables,even if they are global in scope. My standard solution is to use a static function StoredVariable() for this purpose Put the function below in a module then you can set the criteria of the query to =StoredVariable() You can intialise StoredVariable in code from anywhere so you are not dependent on having a specific form open when the query is called. Just set the variable with "result = StoredVariable(myValue)" or just "StoredVariable myValue" at any convenient point before you open the query. Static Function StoredVariable(Optional varInput As Variant) As Variant Dim varStore As Variant 'Initialise the variant if the function is called 'the first time with no Input If varStore = Empty Then varStore = Null 'Update the store if the Input is present If Not IsMissing(varInput) Then varStore = varInput 'return the stored value StoredVariable = varStore End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mcaro at bigpond.net.au Sun Jul 18 01:17:19 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Sun, 18 Jul 2004 16:17:19 +1000 Subject: [AccessD] Criteria and Variables References: <40FA9111.24440.4105476@lexacorp.com.pg> Message-ID: <001b01c46c8e$e171bd60$0100000a@mitmaster> Thanks Stuart - I was being too presumptious thinking I could use variables directly... I will stop trying to make it work and use your technique. Martin ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problem solving" Sent: Sunday, July 18, 2004 3:02 PM Subject: Re: [AccessD] Criteria and Variables > On 18 Jul 2004 at 8:48, Martin Caro wrote: > > > Hi Folks > > > > I'm chasing the correct syntax to use declared variables in the > > Criteria window when building queries. I can place the value in the > > criteria window by first using the variable to load a text box in the > > calling form and referencing the text box from the query but I'm > > presuming it's possible to do directly but...... what am I missing? > > > > AFAIK, it's not possible to use declared variables,even if they are global in > scope. My standard solution is to use a static function StoredVariable() for > this purpose > > Put the function below in a module then you can set the criteria of the query > to =StoredVariable() > > You can intialise StoredVariable in code from anywhere so you are not > dependent on having a specific form open when the query is called. > Just set the variable with "result = StoredVariable(myValue)" or just > "StoredVariable myValue" at any convenient point before you open the query. > > > Static Function StoredVariable(Optional varInput As Variant) As Variant > Dim varStore As Variant > > 'Initialise the variant if the function is called > 'the first time with no Input > If varStore = Empty Then varStore = Null > > 'Update the store if the Input is present > If Not IsMissing(varInput) Then varStore = varInput > > 'return the stored value > StoredVariable = varStore > End Function > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Sun Jul 18 09:11:49 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Sun, 18 Jul 2004 10:11:49 -0400 Subject: [AccessD] importing from Excel In-Reply-To: <40FA4DAD.7445.30913E2@lexacorp.com.pg> Message-ID: <20040718141150.QHWN1701.imf20aec.mail.bellsouth.net@SUSANONE> I eventually did what I've done on several occasions in the past. Saved the spreadsheet as a delimited text file and import that. The text import wizard DOES let you define the datatype of each column and even better, you can bypass the wizard and write your own routine to modify the data as it is imported if you really need to. ===============This is probably my preference, regardless. It seems easier to just force what I want during the import. Susan H. From artful at rogers.com Sun Jul 18 13:07:19 2004 From: artful at rogers.com (Arthur Fuller) Date: Sun, 18 Jul 2004 14:07:19 -0400 Subject: [AccessD] Hiding Back End Design In-Reply-To: Message-ID: <00fe01c46cf2$1173be60$6601a8c0@rock> If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Sun Jul 18 16:29:36 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Sun, 18 Jul 2004 14:29:36 -0700 Subject: [AccessD] Hiding Back End Design In-Reply-To: <00fe01c46cf2$1173be60$6601a8c0@rock> Message-ID: This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Sun Jul 18 18:23:07 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Sun, 18 Jul 2004 16:23:07 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> Message-ID: <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Marty: Every place I've done work where there were mdw's involved the problems ranged from nuisance to nightmare. Since this is my proprietary product and I'm hoping to have lots of them installed around the world over the next few years (hope springs eternal) I'm really reluctant to start down that road. I think I've convinced my Chinese distributor, who started all this, that having the back end open while the front end is totally protected, is the best of both worlds. Rocky ----- Original Message ----- From: "MartyConnelly" To: "Access Developers discussion and problem solving" Sent: Thursday, July 15, 2004 9:50 PM Subject: Re: [AccessD] Hiding Back End Design > Well if you were the owner through mdw you could, everyone else would > have to go through a query. > This assumes the mdw is crackable. > > Rocky Smolin - Beach Access Software wrote: > > >Marty: > > > >Why couldn't they just go directly into the back end and open the table in > >design view? > > > >Rocky > > > > > >----- Original Message ----- > >From: "MartyConnelly" > >To: "Access Developers discussion and problem solving" > > > >Sent: Thursday, July 15, 2004 6:40 PM > >Subject: Re: [AccessD] Hiding Back End Design > > > > > > > > > >>I came across this today under the Access ORK.You might be able to hide > >>the design this way. > >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm > >> > >>Using the RunPermissions Property with User-Level Security > >>In order for Microsoft Access to display a table or query, it must read > >>the design of that table or query. As a result, in order for a user to > >>read and display the data in a table or query, that user must also have > >>permission to read the design of the table or query. > >>If you dont want your users to see the design of your table or query, > >>you can create a query and set its RunPermissions property to restrict > >>their access to this information. > >>Set it up and test against one of the access reengineering case tools > >>like Sparxs or EZDesign. > >> > >>Rocky Smolin - Beach Access Software wrote: > >> > >> > >> > >>>One of the great advantages of Access is that the user can work with the > >>>data apart from the front end app. It's transparency is a real marketing > >>>plus. So I'd like to leave the back end open. I think it will be > >>>beneficial. > >>> > >>>Rocky > >>> > >>>----- Original Message ----- > >>>From: "Andy Lacey" > >>>To: "'Access Developers discussion and problem solving'" > >>> > >>>Sent: Wednesday, June 23, 2004 11:36 AM > >>>Subject: RE: [AccessD] Hiding Back End Design > >>> > >>> > >>> > >>> > >>> > >>> > >>>>I'm going to sound a dissenting voice here. I don't understand why > >>>> > >>>> > >Rocky, > > > > > >>>>who's no doubt sweat blood to develop his vertical app, should in effect > >>>>give his system away? Because surely that's what he'd be doing? The only > >>>> > >>>> > >>>> > >>>> > >>>way > >>> > >>> > >>> > >>> > >>>>doing a development like this makes sense is to get economies of scale > >>>> > >>>> > >by > > > > > >>>>selling lots of copies. Without that incentive vertical apps would never > >>>> > >>>> > >>>> > >>>> > >>>get > >>> > >>> > >>> > >>> > >>>>developed at all because, in the main, a single customer can't stand all > >>>> > >>>> > >>>> > >>>> > >>>the > >>> > >>> > >>> > >>> > >>>>development costs. And if you're going to put in the graft why shouldn't > >>>> > >>>> > >>>> > >>>> > >>>you > >>> > >>> > >>> > >>> > >>>>dream of making money on it, and why should you open yourself to being > >>>>ripped-off by people who can't be arsed to do the hard work themselves? > >>>>Sorry, don't understand. > >>>> > >>>>-- Andy Lacey > >>>>http://www.minstersystems.co.uk > >>>> > >>>> > >>>> > >>>> > >>>> > >>>>>-----Original Message----- > >>>>>From: accessd-bounces at databaseadvisors.com > >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > >>>>>DWUTKA at marlow.com > >>>>>Sent: 23 June 2004 18:30 > >>>>>To: accessd at databaseadvisors.com > >>>>>Subject: RE: [AccessD] Hiding Back End Design > >>>>> > >>>>> > >>>>>'Open source' should pervade into all areas of the > >>>>>information age. Music, programming, videos, etc. > >>>>>Unfortunately it will take a complete change in humanity's > >>>>>driving force....the accumulation of wealth. As long as > >>>>>people are trying to make a buck, it will be virtually > >>>>>impossible to get them to do stuff simply for the betterment > >>>>>of society. > >>>>> > >>>>>Drew > >>>>> > >>>>> > >>>>> > >>>>> > >>>>> > >>>>-- > >>>>_______________________________________________ > >>>>AccessD mailing list > >>>>AccessD at databaseadvisors.com > >>>>http://databaseadvisors.com/mailman/listinfo/accessd > >>>>Website: http://www.databaseadvisors.com > >>>> > >>>> > >>>> > >>>> > >>> > >>> > >>> > >>-- > >>Marty Connelly > >>Victoria, B.C. > >>Canada > >> > >> > >> > >>-- > >>_______________________________________________ > >>AccessD mailing list > >>AccessD at databaseadvisors.com > >>http://databaseadvisors.com/mailman/listinfo/accessd > >>Website: http://www.databaseadvisors.com > >> > >> > > > > > > > > -- > Marty Connelly > Victoria, B.C. > Canada > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 01:52:50 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 08:52:50 +0200 Subject: OT: [AccessD] Hiding Back End Design In-Reply-To: Message-ID: Jim, back in the C64-times, a friend of mine had a cartridge that could - upon the press of a button - save the whole content of the C64's memory onto a floppy disk. So, if the program (game ;-)) did not check for the original floppy disk (which a lot of programs did not) at run time it took about 2-5 minutes to write a de-copy-protected program to a floppy disk. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Jim Lawrence (AccessD) Gesendet: Sonntag, 18. Juli 2004 23:30 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Hiding Back End Design This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 06:29:52 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 21:29:52 +1000 Subject: [AccessD] Seconds Missing Message-ID: <006e01c46d83$b572cec0$0100000a@mitmaster> Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin From michael.broesdorf at web.de Mon Jul 19 07:21:58 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 14:21:58 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <006e01c46d83$b572cec0$0100000a@mitmaster> Message-ID: How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 07:45:23 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 22:45:23 +1000 Subject: [AccessD] Seconds Missing References: Message-ID: <007901c46d8e$420f7770$0100000a@mitmaster> Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 19 08:05:22 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 15:05:22 +0200 Subject: [AccessD] Seconds Missing In-Reply-To: <007901c46d8e$420f7770$0100000a@mitmaster> References: <007901c46d8e$420f7770$0100000a@mitmaster> Message-ID: <4811190380.20040719150522@cactus.dk> Hi Martin How have you Dim'ed the global variable and how do you store the value of it in the table? /gustav > Using an append query on an ODBC/Linked table. > I need to retrieve the record when the user exits using a composite UserID > and LoginInTime key and insert a logoff time however, the value I have > stored in a global variable has seconds and the value stored in the table > has been rounded to full minutes so I'm never going to retrieve the correct > record unless the login was actually on the full minute. From michael.broesdorf at web.de Mon Jul 19 08:17:50 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 15:17:50 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <007901c46d8e$420f7770$0100000a@mitmaster> Message-ID: Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mcaro at bigpond.net.au Mon Jul 19 08:30:29 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 23:30:29 +1000 Subject: [AccessD] Seconds Missing References: <007901c46d8e$420f7770$0100000a@mitmaster> <4811190380.20040719150522@cactus.dk> Message-ID: <008a01c46d94$8f6b0740$0100000a@mitmaster> Gustav Global UserLoginTime As Date In my append query I have a virtual field.... When:getUserLoginTime that appends to the linked SQL table field.... fdDateTimeLoggedOn Function getUserLoginTime() As Variant UserLoginTime = Now() getUserLoginTime = UserLoginTime End Function I have tried As Variant and As Date with the same result. Martin ----- Original Message ----- From: "Gustav Brock" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:05 PM Subject: Re: [AccessD] Seconds Missing > Hi Martin > > How have you Dim'ed the global variable and how do you store the value > of it in the table? > > /gustav > > > > Using an append query on an ODBC/Linked table. > > > I need to retrieve the record when the user exits using a composite UserID > > and LoginInTime key and insert a logoff time however, the value I have > > stored in a global variable has seconds and the value stored in the table > > has been rounded to full minutes so I'm never going to retrieve the correct > > record unless the login was actually on the full minute. > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From kaupca at chevrontexaco.com Mon Jul 19 08:45:05 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Mon, 19 Jul 2004 08:45:05 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From mcaro at bigpond.net.au Mon Jul 19 08:52:23 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Mon, 19 Jul 2004 23:52:23 +1000 Subject: [AccessD] Seconds Missing References: Message-ID: <008f01c46d97$9e664bd0$0100000a@mitmaster> Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Mon Jul 19 09:24:32 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Mon, 19 Jul 2004 10:24:32 -0400 Subject: [AccessD] Seconds Missing In-Reply-To: <008f01c46d97$9e664bd0$0100000a@mitmaster> Message-ID: <002001c46d9c$1f0ba880$6401a8c0@COA3> You may need to delete the linked table from Access and then re-link it. I recently had an Access linked table refuse to see a decimal field on SQL Server as anything but an integer until I delete/relinked. (I refreshed the links endless times to no avail). I think our friend Access sometimes just won't pick up all the schema info unless you force it on him! Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Monday, July 19, 2004 9:52 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 09:30:27 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 10:30:27 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby From michael.broesdorf at web.de Mon Jul 19 09:34:39 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 16:34:39 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <008f01c46d97$9e664bd0$0100000a@mitmaster> Message-ID: Now that sounds strange! I just tested it with a linked ODBC-table myself - the seconds are there! Maybe there is a trigger on the time-field on the server? I would definitely try SQL Profile to see what is _really_ going on (saved my life a couple of times!) BTW: What versions of Access, SQL-Server etc. are you using? Did you link the tables using the _Microsoft SQL Server ODBC-Driver_? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 15:52 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 09:36:59 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 16:36:59 +0200 Subject: AW: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> Message-ID: What exactly does the field 'selected_year' contain? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, Chester A Gesendet: Montag, 19. Juli 2004 15:45 An: accessd at databaseadvisors.com Betreff: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 michael.broesdorf at web.de Mon Jul 19 09:40:26 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Mon, 19 Jul 2004 16:40:26 +0200 Subject: AW: [AccessD] Seconds Missing In-Reply-To: <002001c46d9c$1f0ba880$6401a8c0@COA3> Message-ID: Yep, that is true! But SQL Server has a problem like this, too: If you have a view selecting all rows from a table (SELECT * FROM tbl...) and you change the column layout of the table, the view does not 'see' those changes until you open it in design view , execute it from there and save it. There is a command or option that tell's SQL Server to update the views in such cases (WITH SCHEMABINDING I believe, but am not sure..) If the view is linked into an Access database, one can have lots of fun tracking down this problem... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Steve Conklin (Developer at UltraDNT) Gesendet: Montag, 19. Juli 2004 16:25 An: 'Access Developers discussion and problem solving' Betreff: RE: [AccessD] Seconds Missing You may need to delete the linked table from Access and then re-link it. I recently had an Access linked table refuse to see a decimal field on SQL Server as anything but an integer until I delete/relinked. (I refreshed the links endless times to no avail). I think our friend Access sometimes just won't pick up all the schema info unless you force it on him! Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Caro Sent: Monday, July 19, 2004 9:52 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Seconds Missing Michael No, if I enter a date/time directly into the linked table any seconds eg :25 are changed to :00 when the record is saved. Yes, if I enter a date/time directly into the table using SQL Enterprise Manager.... seconds are accepted. I can hold seconds OK in the Global variable and a local table field. Your suggestion re converting date/time to a string looks like a promising solution for me so I will that a try. Thanks Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 11:17 PM Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 14:45 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Seconds Missing Michael Using an append query on an ODBC/Linked table. I need to retrieve the record when the user exits using a composite UserID and LoginInTime key and insert a logoff time however, the value I have stored in a global variable has seconds and the value stored in the table has been rounded to full minutes so I'm never going to retrieve the correct record unless the login was actually on the full minute. Martin ----- Original Message ----- From: "Michael Br?sdorf" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 10:21 PM Subject: AW: [AccessD] Seconds Missing How exactly are you trying to write the time to sql server (ODBC/Linked table, ADO, etc.)? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Martin Caro Gesendet: Montag, 19. Juli 2004 13:30 An: Access Developers discussion and problem solving Betreff: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 09:41:34 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 10:41:34 -0400 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <000001c46d9e$7d8735d0$cc0aa845@hargrove.internal> Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Mon Jul 19 09:43:53 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 16:43:53 +0200 Subject: [AccessD] Seconds Missing In-Reply-To: <002001c46d9c$1f0ba880$6401a8c0@COA3> References: <002001c46d9c$1f0ba880$6401a8c0@COA3> Message-ID: <5817101330.20040719164353@cactus.dk> Hi Steve and Martin That could be it. SmallDateTime doesn't store seconds - maybe the connection "remembers" the field as such even though you have changed it later to DateTime. /gustav > You may need to delete the linked table from Access and then re-link it. > I recently had an Access linked table refuse to see a decimal field on > SQL Server as anything but an integer until I delete/relinked. (I > refreshed the links endless times to no avail). I think our friend > Access sometimes just won't pick up all the schema info unless you force > it on him! From bchacc at san.rr.com Mon Jul 19 09:48:57 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Mon, 19 Jul 2004 07:48:57 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <009a01c46d9f$853ece90$6601a8c0@HAL9002> John: The only thing I can think of would be to use the Mouse Move event of the tab page. But it's kludgey and depends on the user moving the mouse on that page. Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 19, 2004 7:30 AM Subject: [AccessD] moving focus off the tab page > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From mcaro at bigpond.net.au Mon Jul 19 09:56:33 2004 From: mcaro at bigpond.net.au (Martin Caro) Date: Tue, 20 Jul 2004 00:56:33 +1000 Subject: [AccessD] Seconds Missing References: <006e01c46d83$b572cec0$0100000a@mitmaster> Message-ID: <00bc01c46da0$95078730$0100000a@mitmaster> Hi Folks Success, or so it seems at the moment......I changed the data type in the SQL table and the variable/functions in the FE to String and set the Gobal variable UserLoginTime = Format(Now,"yyyymmdd,hhmmss") ./... (also orders nicely) This stores OK in my SQL table (eg 20040720,003047) and I have been able to subsequently retrieve the correct record using my composite key using Global variables for UserID and UserLoginTime of the current user. Thanks all for your help (enough for today - as you can see from the eg above it's 12:30:47 AM) Martin ----- Original Message ----- From: "Martin Caro" To: "Access Developers discussion and problem solving" Sent: Monday, July 19, 2004 9:29 PM Subject: [AccessD] Seconds Missing Hi Folks I have spent some time in the archives and reviewing past date/time issues looking for a fix for this problem: I grab the user login time using NOW() and save it to an SQL table however any seconds apparent in Access always end up as :00 being save in my SQL table. I was using smalldatetime data type which I changed to datetime but without success. I have played with Format() a bit but maybe someone knows where my seconds have gone? Martin -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 10:01:59 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 11:01:59 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7D@DISABILITYINS01> What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Mon Jul 19 10:07:04 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Mon, 19 Jul 2004 10:07:04 -0500 Subject: [AccessD] importing from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDCB@corp-es01.fleetpride.com> I have run into cases where applications that create Excel files that in turn are imported into Access treat numbers as text fields for some reason. Since Excel shows it as text, Access also imports it as text. One solution is to highlight an empty Excel cell and onto the text column. This has the effect of adding a zero (Excel treats an empty cell as zero) and forcing Excel to change the text to a number. This also cures the problem where some entries are numbers and some text (a user puts an apostrophe in front of a "number" for ex). Since Excel "data tables" are free form, i.e. the user can (and often does insert rows, stick text comments in a number field, etc., etc., I never link directly to a user provided table- I write code to read the "records" and validate them as necessary. I write the raw data to an Access table then do all my processing from there. I have found that links to Excel sheets are relatively fragile. Excel sheets are easily corrupted, so I prefer to transfer everything into Access ASAP. Jim Hale -----Original Message----- From: Susan Harkins [mailto:ssharkins at bellsouth.net] Sent: Saturday, July 17, 2004 4:17 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] importing from Excel I'm wondering if any of you routinely see data type conflicts when importing Excel data into Access? I spent an afternoon with a client a few weeks back cleaning up Excel data for a clean import into Access -- we were totally successful. We went from losing hundreds of records to capturing every single one -- with just a few simple changes in their routine. The one potential problem I thought of that we didn't encounter was a conflict in data types -- have any of you experienced this? My guess is you'd simply convert using the Import Wizard, but I'd like to hear your horror stories and solutions. I know imports are often automated and that complicates things. The client's experience was strictly a one-time effort. Once they got it in Access and we normalized the data, they were done with that part for good. They were trying to create a searchable/reportable archive of some very old data and used Excel as the go-between -- but then couldn't get the Excel data clean enough to import. The truth is, it was very easy to solve -- they just didn't know the right tricks. So, now they want it all documented, but I personally, haven't run into any data type conflicts while importing from Excel, but I'd like to note any potential problems if they're out there. Susan H. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Mon Jul 19 10:11:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jul 2004 11:11:50 -0400 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD74@DISABILITYINS01> Message-ID: <021e01c46da2$bb38ae00$6601a8c0@rock> Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. TIA, Arthur From kaupca at chevrontexaco.com Mon Jul 19 10:22:48 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Mon, 19 Jul 2004 10:22:48 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739605@bocnte2k4.boc.chevrontexaco.net> Selected year contains the value 2004. It can contain any year value from 2001 to 2010 depending on what the user selects from the list box. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 9:37 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Date format problem What exactly does the field 'selected_year' contain? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, Chester A Gesendet: Montag, 19. Juli 2004 15:45 An: accessd at databaseadvisors.com Betreff: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 gustav at cactus.dk Mon Jul 19 10:36:26 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 17:36:26 +0200 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <021e01c46da2$bb38ae00$6601a8c0@rock> References: <021e01c46da2$bb38ae00$6601a8c0@rock> Message-ID: <18120254324.20040719173626@cactus.dk> Hi Arthur > Has anyone code some code in hand that would allow me to calculate the > third Wednesday of every month? Or for that matter just the first > Wednesday of a given month (to which I'll just add 14)? I don't think > it's that tough, but thought I'd check to see if someone has it in hand > before I write it. I guess these functions could easily be wrapped or modified to your purpose: Public Function DateNextWeekday( _ ByVal datDate As Date, _ Optional ByVal bytWeekday As Byte = vbMonday) _ As Date ' Returns the date of the next weekday, as spelled in vbXxxxday, following datDate. ' 2000-09-06. Cactus Data ApS. ' No special error handling. On Error Resume Next DateNextWeekday = DateAdd("d", 7 - (WeekDay(datDate, bytWeekday) - 1), datDate) End Function Public Function DateThisMonthLast( _ Optional ByVal datDateThisMonth As Date) As Date If datDateThisMonth = 0 Then datDateThisMonth = Date End If DatePreviousMonthLast = DateSerial(Year(datDateThisMonth), _ Month(datDateThisMonth) + 1, 0) End Function /gustav From gustav at cactus.dk Mon Jul 19 10:41:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Mon, 19 Jul 2004 17:41:17 +0200 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <18120254324.20040719173626@cactus.dk> References: <021e01c46da2$bb38ae00$6601a8c0@rock> <18120254324.20040719173626@cactus.dk> Message-ID: <7420545102.20040719174117@cactus.dk> Hi Arthur Oops, got mixed up some copy and paste. Should read: DateThisMonthLast = DateSerial(Year(datDateThisMonth), _ Month(datDateThisMonth) + 1, 0) Gustav > DatePreviousMonthLast = DateSerial(Year(datDateThisMonth), _ > Month(datDateThisMonth) + 1, 0) From DWUTKA at marlow.com Mon Jul 19 10:43:12 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 19 Jul 2004 10:43:12 -0500 Subject: [AccessD] Third Wednesday of every month Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB144@main2.marlow.com> I wrote this a LONG time ago. When I was just learning VBA. It's actually part of the 'current' MiniCalendar example database: It dumps to 'tblWeekOfDates'. You give it a starting date, and ending date, the name of the day, the # of the week (ie, 3rd Wednesday would be 3), and the indexnumber is something I used to differentiate the results. (So if you want to run this for different days/weeks, you could 'cluster' the results under an indexnumber. Drew Function fWeekOfDates(StartDate As Date, EndDate As Date, DayName As String, WeekOf As Long, IndexNumber As Long) 'set up a variable to change from the startdate to the enddate Dim TestingDate As Date TestingDate = StartDate 'set up necessary variables to help with determining if a date matches the criteria Dim DayNumber As Long Dim FirstDayCriteria Dim LastDayCriteria Dim DayNameCriteria 'This variable will be used as the variable SQL code to insert the date into the tblWeekOfDates Dim DateSQL 'This variable will be set to true if the Date Falls within the required dates Dim DayNumberCriteria As Boolean DayNumberCriteria = False 'Set up a boolean variable to stop the loop once the EndDate is checked Dim StopLoop As Boolean StopLoop = False 'Start the Date Checking loop Do Until StopLoop = True 'Get Date information and set criteria DayNumber = Format(TestingDate, "d") FirstDayCriteria = 7 * (WeekOf - 1) + 1 LastDayCriteria = 7 * WeekOf DayNameCriteria = Format(TestingDate, "dddd") 'Set boolean variable to true if the day falls within the specified week If DayNumber >= FirstDayCriteria And DayNumber <= LastDayCriteria Then DayNumberCriteria = True End If 'if the date is a match for that month (allow the Insert Into SQL to run) If DayName = DayNameCriteria And DayNumberCriteria = True Then DateSQL = "INSERT INTO tblWeekOfDates (IndexNumber, DatesSelected) Values ('" & IndexNumber & "', '" & TestingDate & "');" DoCmd.SetWarnings (False) DoCmd.RunSQL DateSQL DoCmd.SetWarnings (True) End If DayNumberCriteria = False If TestingDate = EndDate Then StopLoop = True Else TestingDate = TestingDate + 1 End If Loop End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Monday, July 19, 2004 10:12 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Third Wednesday of every month Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 10:51:44 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 17:51:44 +0200 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: <18120254324.20040719173626@cactus.dk> Message-ID: Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael From BBarabash at TappeConstruction.com Mon Jul 19 11:07:40 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 11:07:40 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From michael.broesdorf at web.de Mon Jul 19 11:12:18 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 18:12:18 +0200 Subject: Solved: [AccessD] Convert a byte value to a hex-string In-Reply-To: Message-ID: Now I am feeling stupid: Hex() does the trick... Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Michael Brosdorf Gesendet: Montag, 19. Juli 2004 17:52 An: Access Developers discussion and problem solving Betreff: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 11:12:18 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 12:12:18 -0400 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7D@DISABILITYINS01> Message-ID: <000001c46dab$2a0a2680$cc0aa845@hargrove.internal> FirstControl is the control you want to get the focus... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 11:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 11:24:36 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 18:24:36 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Message-ID: Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string --------------Please open with care!------------ This message has bypassed some of our spam filtering rules. This message was scanned for viruses and executable code has been stripped. --------------------------------------------------------------- Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Mon Jul 19 11:39:49 2004 From: JColby at dispec.com (Colby, John) Date: Mon, 19 Jul 2004 12:39:49 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD7E@DISABILITYINS01> LOL. I think you misunderstood the question. When a tabbed form opens, the tab control tends to have the focus, usually with the tab0 page of the tab control. I want to place the control into the first control on the selected tab that can validly recieve the focus. This means: The control with the Lowest Tabindex that has TabStop = true that is Enabled that is Visible. IF I used Sendkeys I could just send a tab key which would cause Access to tab the cursor into the first valid control. Since I don't use Sendkeys, I need another way to do this. Somewhere in the guts of Access (page control) there is a collection of items that may (or are) be in the tab order. Unfortunately it doesn't appear to be exposed for us to use. I have built a pair of functions to find the first control that can receive the focus. It involves iterating the collection of all controls, testing each control to see if it has a TabStop property, then if it is enabled, then if it is visible. If all these things are true, then this control MAY be the first in the tab order. Now each such control is tested against every other such control to find the one with the lowest TabIndex property. It works, and on my machine takes about 16ms to run on a fairly complex form. It just seems that somewhere built in to Access I should be able to ask the object with a controls collection which control in the collection is the "first valid control in the tab order", i.e. which control can ACTUALLY RECEIVE the focus using the tab key. JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 12:12 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page FirstControl is the control you want to get the focus... Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 11:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page What is FirstControl a property or method of? JWC -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 10:42 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Firstcontrol.SetFocus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 10:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 11:45:47 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 12:45:47 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From papparuff at comcast.net Mon Jul 19 12:03:56 2004 From: papparuff at comcast.net (papparuff at comcast.net) Date: Mon, 19 Jul 2004 17:03:56 +0000 Subject: [AccessD] moving focus off the tab page Message-ID: <071920041703.19302.40FBFEFB000C7C2400004B66220075033000009A9D0E9F9F0E9F@comcast.net> John, You want to use the TabControl's Change event. Also, the cursor automatically moves to the first control on the tab selected. If you want it to go to a specific control on the tab then the following code will do it. Private Sub TabCtl0_Change() Select Case TabCtl0 Case 0 txtTab1LastControl.SetFocus MsgBox "This is page " & TabCtl0 Case 1 txtTab2SecondControl.SetFocus MsgBox "This is page " & TabCtl0 Case 2 txtTab3FourthControl.SetFocus MsgBox "This is page " & TabCtl0 End Select End Sub -- John V. Ruff ? The Eternal Optimist :-) ?Commit to the Lord whatever you do, and your plans will succeed.? Proverbs 16:3 -------------- Original message -------------- > LOL. I think you misunderstood the question. > > When a tabbed form opens, the tab control tends to have the focus, usually > with the tab0 page of the tab control. > > I want to place the control into the first control on the selected tab that > can validly recieve the focus. This means: > > The control with the Lowest Tabindex that has TabStop = true that is Enabled > that is Visible. > > IF I used Sendkeys I could just send a tab key which would cause Access to > tab the cursor into the first valid control. > > Since I don't use Sendkeys, I need another way to do this. > > Somewhere in the guts of Access (page control) there is a collection of > items that may (or are) be in the tab order. Unfortunately it doesn't > appear to be exposed for us to use. > > I have built a pair of functions to find the first control that can receive > the focus. It involves iterating the collection of all controls, testing > each control to see if it has a TabStop property, then if it is enabled, > then if it is visible. If all these things are true, then this control MAY > be the first in the tab order. Now each such control is tested against > every other such control to find the one with the lowest TabIndex property. > > It works, and on my machine takes about 16ms to run on a fairly complex > form. > > It just seems that somewhere built in to Access I should be able to ask the > object with a controls collection which control in the collection is the > "first valid control in the tab order", i.e. which control can ACTUALLY > RECEIVE the focus using the tab key. > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 12:12 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > FirstControl is the control you want to get the focus... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 11:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > What is FirstControl a property or method of? > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 10:42 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > Firstcontrol.SetFocus > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 10:30 AM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] moving focus off the tab page > > > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Mon Jul 19 12:08:03 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Mon, 19 Jul 2004 13:08:03 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <000001c46db2$f3db5360$cc0aa845@hargrove.internal> Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 12:09:34 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 13:09:34 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC69@TTNEXCHSRV1.hshhp.com> Yes, no luck. It let him import it but it generated an error that the object already existed (but then the form was there sans code). Jim D. -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 1:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From jmhla at earthlink.net Mon Jul 19 12:23:45 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Mon, 19 Jul 2004 10:23:45 -0700 Subject: [AccessD] moving focus off the tab page In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD7C@DISABILITYINS01> Message-ID: <200407191723.i6JHNbQ31047@databaseadvisors.com> Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 12:37:08 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 13:37:08 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC6C@TTNEXCHSRV1.hshhp.com> According to MSKB #265434 (http://support.microsoft.com/default.aspx?scid=kb;en-us;265434&Product=acc2000) we may be lost here. Can anyone tell me different? Jim DeMarco -----Original Message----- From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] Sent: Monday, July 19, 2004 1:08 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Have you tried pulling that form into a blank database? Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim DeMarco Sent: Monday, July 19, 2004 12:46 PM To: AccessD (E-mail) Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hello all, I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. TIA, Jim DeMarco Director Application Development Hudson Health Plan **************************************************************************** ******* "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". **************************************************************************** ******* -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From BBarabash at TappeConstruction.com Mon Jul 19 12:33:48 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 12:33:48 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065834@tccexch01.tappeconstruction.net> Not that I'm aware of. I did find this MSKB article that may be helpful to you: INFO: Converting Binary Data to Hexadecimal String http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 11:25 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From artful at rogers.com Mon Jul 19 12:37:47 2004 From: artful at rogers.com (Arthur Fuller) Date: Mon, 19 Jul 2004 13:37:47 -0400 Subject: [AccessD] Third Wednesday of every month In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB144@main2.marlow.com> Message-ID: <024401c46db7$1b7c24e0$6601a8c0@rock> Thanks, Drew and Gustav. I ended up whipping it together while waiting for a reply. Mine isn't as flexible but is simple to use and does what I need at the moment. I'll revisit it during refactoring: '----------------------------------------------------------------------- ---------------- ' Procedure : Bom ' DateTime : 12/22/2003 07:58 ' Author : Arthur Fuller ' Purpose : return the first of the month specified by the date passed in ' Notes : ' : ' Revisions : ' : '----------------------------------------------------------------------- ---------------- ' Public Function Bom(datThis As Date) As Date Dim d As Integer d = Day(datThis) - 1 Bom = datThis - d End Function '----------------------------------------------------------------------- ---------------- ' Procedure : ThirdWednesday ' DateTime : 07/19/2004 ' Author : Arthur Fuller ' Purpose : return the third Wednesday of the month specified by the date passed in ' Notes : assumes you will in the first of the month ' : WeekDay() begins on Sunday unless you pass an argument ' Revisions : ' : '----------------------------------------------------------------------- ---------------- ' Public Function ThirdWednesday(datThis As Date) As Date Dim retValue As Date Dim d As Integer Dim temp As Integer d = Weekday(datThis) Select Case d Case 1 temp = 3 Case 2 temp = 2 Case 3 temp = 1 Case 4 temp = 0 Case 5 temp = 6 Case 6 temp = 5 Case 7 temp = 4 End Select 'Now we know the first Wednesday of the month ThirdWednesday = datThis + temp + 14 End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Monday, July 19, 2004 11:43 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Third Wednesday of every month I wrote this a LONG time ago. When I was just learning VBA. It's actually part of the 'current' MiniCalendar example database: It dumps to 'tblWeekOfDates'. You give it a starting date, and ending date, the name of the day, the # of the week (ie, 3rd Wednesday would be 3), and the indexnumber is something I used to differentiate the results. (So if you want to run this for different days/weeks, you could 'cluster' the results under an indexnumber. Drew Function fWeekOfDates(StartDate As Date, EndDate As Date, DayName As String, WeekOf As Long, IndexNumber As Long) 'set up a variable to change from the startdate to the enddate Dim TestingDate As Date TestingDate = StartDate 'set up necessary variables to help with determining if a date matches the criteria Dim DayNumber As Long Dim FirstDayCriteria Dim LastDayCriteria Dim DayNameCriteria 'This variable will be used as the variable SQL code to insert the date into the tblWeekOfDates Dim DateSQL 'This variable will be set to true if the Date Falls within the required dates Dim DayNumberCriteria As Boolean DayNumberCriteria = False 'Set up a boolean variable to stop the loop once the EndDate is checked Dim StopLoop As Boolean StopLoop = False 'Start the Date Checking loop Do Until StopLoop = True 'Get Date information and set criteria DayNumber = Format(TestingDate, "d") FirstDayCriteria = 7 * (WeekOf - 1) + 1 LastDayCriteria = 7 * WeekOf DayNameCriteria = Format(TestingDate, "dddd") 'Set boolean variable to true if the day falls within the specified week If DayNumber >= FirstDayCriteria And DayNumber <= LastDayCriteria Then DayNumberCriteria = True End If 'if the date is a match for that month (allow the Insert Into SQL to run) If DayName = DayNameCriteria And DayNumberCriteria = True Then DateSQL = "INSERT INTO tblWeekOfDates (IndexNumber, DatesSelected) Values ('" & IndexNumber & "', '" & TestingDate & "');" DoCmd.SetWarnings (False) DoCmd.RunSQL DateSQL DoCmd.SetWarnings (True) End If DayNumberCriteria = False If TestingDate = EndDate Then StopLoop = True Else TestingDate = TestingDate + 1 End If Loop End Function -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Monday, July 19, 2004 10:12 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Third Wednesday of every month Has anyone code some code in hand that would allow me to calculate the third Wednesday of every month? Or for that matter just the first Wednesday of a given month (to which I'll just add 14)? I don't think it's that tough, but thought I'd check to see if someone has it in hand before I write it. 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 Mark.Mitsules at ngc.com Mon Jul 19 13:12:37 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 19 Jul 2004 14:12:37 -0400 Subject: [AccessD] Hiding Back End Design Message-ID: >> 'Apache' << I had that game:) First of its kind that used nearly every key on the keyboard. Never 'cracked' it though;) Mark -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Sunday, July 18, 2004 5:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hiding Back End Design This whole discussion around security and protection, of code and data access hinges on one thing. A trainer, when I was taking my CNE, about fifteen years ago, stated "There is no security if people have access to the server computer." This was true then, is true now and will be for the fore-seeable future. The only security for any application, is limited to the knowledge, desire and honesty of the client. Microsoft has spent massive amounts on securing their products and always after a short time, the security is again cracked and the cycle continues. There is only a limited amount of security, that can be created for an application. An individual bent on 'cracking' any product will eventually succeed. You as a developer, must realize that and not waste time and money securing a product more than it is worth. There is no point in spending thousands of dollars, of your time, securing a product that you sell for a thousand. A number of years ago, when Commadore64 was king, a company created a awesome game called 'Apache'. (the helicopter). The designers had stated that they had spend two years creating the 'State-of-the-Art' security and copy protection on their product. A short while later, a hacker, demonstrated on TV, that he could, in fifteen minutes, after pulling off the cellophane, of the new release, removed all forms of protection. That is still the reality. ...and that as Arthur has already said is my two cents worth. Jim PS I was so impressed with the game that I purchased my copy of the 'Apache' and have continued to do that, with all worthy application, to this day. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Sunday, July 18, 2004 11:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hiding Back End Design If you really want to hide a back end design, then I suggest the following (which may be incomplete, I grant in advance).... A) Upsize to MSDE at least, if not SQL 2000. B) Rewrite your app so that NO ONE (save you) gets direct access to tables. C) Replace all the accessing code with sprocs/views/udfs. D) Encrypt those objects. There are decryption tools to crack sprocs/views/udfs, and if you suspect their use, then you may have to take extra steps, but IME, very few people have these decryption tools. Any fool with a few bucks and a PayPal account can get the Access-decryption tools, but it will cost him/her substantially to get the equivalent tools for MSDE/SQL Server. If your assaulting audience is prepared to spend that kind of money to get in, then you have to take extra steps. It all comes down to cost-of-defence v. cost-of-successful-intrusion. No way to call that argument in advance. If you're storing Al-Kaeda attack plans or defence plans against Al-Kaeda attacks, you're prepared to spend a LOT more money than the Mom'n'Pop grocery down the street. MSDE (which is essentially free) plus "no one but me gets direct access to tables, and must instead fire sprocs with appropriate args", plus a role-based security system, plus encrypted sprocs... This gets you 80% of the way to a secure system whose innards are unavailable to the unauthorized penetrator. The more skilled your anticipated attacker, the more money you need to invest in protection. At the end of the day, if you want to hide the database design, my first recommendation is to move to MSDE at least and hide all the tables and allow access only using sprocs and views, whose usability you can control precisely using roles, and whose code you can hide reasonably effectively using encryption. My $.02. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 16, 2004 9:42 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Hiding Back End Design Well, the MDW _is_crackable! There's a couple of tools out there that reveal user names and their passwords at an instant. So if user accounts within the mdw aren't secure, maybe it is an option to make user x owner of all backend tables. This user should also be the only one with permission to administer the db. Then remove user x from the mdw that is used on the production system. Didn't try it though... Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Freitag, 16. Juli 2004 06:50 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Hiding Back End Design Well if you were the owner through mdw you could, everyone else would have to go through a query. This assumes the mdw is crackable. Rocky Smolin - Beach Access Software wrote: >Marty: > >Why couldn't they just go directly into the back end and open the table >in design view? > >Rocky > > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 6:40 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>I came across this today under the Access ORK.You might be able to >>hide the design this way. >>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >> >>Using the RunPermissions Property with User-Level Security >>In order for Microsoft Access to display a table or query, it must >>read the design of that table or query. As a result, in order for a >>user to read and display the data in a table or query, that user must >>also have permission to read the design of the table or query. If you >>dont want your users to see the design of your table or query, you >>can create a query and set its RunPermissions property to restrict >>their access to this information. Set it up and test against one of >>the access reengineering case tools like Sparxs or EZDesign. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>One of the great advantages of Access is that the user can work with >>>the data apart from the front end app. It's transparency is a real >>>marketing plus. So I'd like to leave the back end open. I think it >>>will be beneficial. >>> >>>Rocky >>> >>>----- Original Message ----- >>>From: "Andy Lacey" >>>To: "'Access Developers discussion and problem solving'" >>> >>>Sent: Wednesday, June 23, 2004 11:36 AM >>>Subject: RE: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I'm going to sound a dissenting voice here. I don't understand why >>>> >>>> >Rocky, > > >>>>who's no doubt sweat blood to develop his vertical app, should in >>>>effect give his system away? Because surely that's what he'd be >>>>doing? The only >>>> >>>> >>>> >>>> >>>way >>> >>> >>> >>> >>>>doing a development like this makes sense is to get economies of >>>>scale >>>> >>>> >by > > >>>>selling lots of copies. Without that incentive vertical apps would >>>>never >>>> >>>> >>>> >>>> >>>get >>> >>> >>> >>> >>>>developed at all because, in the main, a single customer can't stand >>>>all >>>> >>>> >>>> >>>> >>>the >>> >>> >>> >>> >>>>development costs. And if you're going to put in the graft why >>>>shouldn't >>>> >>>> >>>> >>>> >>>you >>> >>> >>> >>> >>>>dream of making money on it, and why should you open yourself to >>>>being ripped-off by people who can't be arsed to do the hard work >>>>themselves? Sorry, don't understand. >>>> >>>>-- Andy Lacey >>>>http://www.minstersystems.co.uk >>>> >>>> >>>> >>>> >>>> >>>>>-----Original Message----- >>>>>From: accessd-bounces at databaseadvisors.com >>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>DWUTKA at marlow.com >>>>>Sent: 23 June 2004 18:30 >>>>>To: accessd at databaseadvisors.com >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>>'Open source' should pervade into all areas of the information age. >>>>>Music, programming, videos, etc. Unfortunately it will take a >>>>>complete change in humanity's driving force....the accumulation of >>>>>wealth. As long as people are trying to make a buck, it will be >>>>>virtually impossible to get them to do stuff simply for the >>>>>betterment of society. >>>>> >>>>>Drew >>>>> >>>>> >>>>> >>>>> >>>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 19 12:56:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 19 Jul 2004 10:56:51 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Message-ID: <40FC0B63.4040406@shaw.ca> Well I guess if they are still worried, you could obfuscate some or all of the field names with something like speed ferret as they did with MYOB. This just slows down the person doing the reengineering. I have only had to reverse engineer one accounting package DacEasy, that had a backend database Btrieve. I had partial table layouts. Table and field names and sizes. It took me six months to write a POS in C code that integrated with it. The hard part was figuring out what fields had what calculations associated with it. In some places the numeric part after the decimal point indicted the partial inventory count. For example 2.54 meant 2 cases with 54 items out of 144. You had to refer back to another table that held this info on partial units . So if you have any field descriptions in your tables you might want to strip these out. Then again, maybe you get an Angel investor, that buys you out. Rocky Smolin - Beach Access Software wrote: >Marty: > >Every place I've done work where there were mdw's involved the problems >ranged from nuisance to nightmare. Since this is my proprietary product and >I'm hoping to have lots of them installed around the world over the next few >years (hope springs eternal) I'm really reluctant to start down that road. > >I think I've convinced my Chinese distributor, who started all this, that >having the back end open while the front end is totally protected, is the >best of both worlds. > >Rocky > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 9:50 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>Well if you were the owner through mdw you could, everyone else would >>have to go through a query. >>This assumes the mdw is crackable. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>Marty: >>> >>>Why couldn't they just go directly into the back end and open the table >>> >>> >in > > >>>design view? >>> >>>Rocky >>> >>> >>>----- Original Message ----- >>>From: "MartyConnelly" >>>To: "Access Developers discussion and problem solving" >>> >>>Sent: Thursday, July 15, 2004 6:40 PM >>>Subject: Re: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I came across this today under the Access ORK.You might be able to hide >>>>the design this way. >>>>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >>>> >>>>Using the RunPermissions Property with User-Level Security >>>>In order for Microsoft Access to display a table or query, it must read >>>>the design of that table or query. As a result, in order for a user to >>>>read and display the data in a table or query, that user must also have >>>>permission to read the design of the table or query. >>>>If you dont want your users to see the design of your table or query, >>>>you can create a query and set its RunPermissions property to restrict >>>>their access to this information. >>>>Set it up and test against one of the access reengineering case tools >>>>like Sparxs or EZDesign. >>>> >>>>Rocky Smolin - Beach Access Software wrote: >>>> >>>> >>>> >>>> >>>> >>>>>One of the great advantages of Access is that the user can work with >>>>> >>>>> >the > > >>>>>data apart from the front end app. It's transparency is a real >>>>> >>>>> >marketing > > >>>>>plus. So I'd like to leave the back end open. I think it will be >>>>>beneficial. >>>>> >>>>>Rocky >>>>> >>>>>----- Original Message ----- >>>>>From: "Andy Lacey" >>>>>To: "'Access Developers discussion and problem solving'" >>>>> >>>>>Sent: Wednesday, June 23, 2004 11:36 AM >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>I'm going to sound a dissenting voice here. I don't understand why >>>>>> >>>>>> >>>>>> >>>>>> >>>Rocky, >>> >>> >>> >>> >>>>>>who's no doubt sweat blood to develop his vertical app, should in >>>>>> >>>>>> >effect > > >>>>>>give his system away? Because surely that's what he'd be doing? The >>>>>> >>>>>> >only > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>way >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>doing a development like this makes sense is to get economies of scale >>>>>> >>>>>> >>>>>> >>>>>> >>>by >>> >>> >>> >>> >>>>>>selling lots of copies. Without that incentive vertical apps would >>>>>> >>>>>> >never > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>get >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>developed at all because, in the main, a single customer can't stand >>>>>> >>>>>> >all > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>the >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>development costs. And if you're going to put in the graft why >>>>>> >>>>>> >shouldn't > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>you >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>dream of making money on it, and why should you open yourself to being >>>>>>ripped-off by people who can't be arsed to do the hard work >>>>>> >>>>>> >themselves? > > >>>>>>Sorry, don't understand. >>>>>> >>>>>>-- Andy Lacey >>>>>>http://www.minstersystems.co.uk >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>>>-----Original Message----- >>>>>>>From: accessd-bounces at databaseadvisors.com >>>>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>>>DWUTKA at marlow.com >>>>>>>Sent: 23 June 2004 18:30 >>>>>>>To: accessd at databaseadvisors.com >>>>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>>>> >>>>>>> >>>>>>>'Open source' should pervade into all areas of the >>>>>>>information age. Music, programming, videos, etc. >>>>>>>Unfortunately it will take a complete change in humanity's >>>>>>>driving force....the accumulation of wealth. As long as >>>>>>>people are trying to make a buck, it will be virtually >>>>>>>impossible to get them to do stuff simply for the betterment >>>>>>>of society. >>>>>>> >>>>>>>Drew >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>-- >>>>>>_______________________________________________ >>>>>>AccessD mailing list >>>>>>AccessD at databaseadvisors.com >>>>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>>>Website: http://www.databaseadvisors.com >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>>-- >>>>Marty Connelly >>>>Victoria, B.C. >>>>Canada >>>> >>>> >>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >>-- >>_______________________________________________ >>AccessD mailing list >>AccessD at databaseadvisors.com >>http://databaseadvisors.com/mailman/listinfo/accessd >>Website: http://www.databaseadvisors.com >> >> > > > -- Marty Connelly Victoria, B.C. Canada From rjhjr at cox.net Mon Jul 19 13:19:36 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 19 Jul 2004 14:19:36 -0400 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: <100F91B31300334B89EC531C9DCB0865065831@tccexch01.tappeconstruction.net> Message-ID: <20040719181935.GA46930@kongemord.krig.net> On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). From martyconnelly at shaw.ca Mon Jul 19 13:02:27 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 19 Jul 2004 11:02:27 -0700 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <40FC0CB3.8060807@shaw.ca> you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada From michael.broesdorf at web.de Mon Jul 19 13:29:37 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:29:37 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <100F91B31300334B89EC531C9DCB0865065834@tccexch01.tappeconstruction.net> Message-ID: Thank you! This is exactly what I was looking for! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 19:34 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Not that I'm aware of. I did find this MSKB article that may be helpful to you: INFO: Converting Binary Data to Hexadecimal String http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 11:25 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string Thanks Brett! Is there a similar function in SQL Server? -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Brett Barabash Gesendet: Montag, 19. Juli 2004 18:08 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Convert a byte value to a hex-string Hex() -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 10:52 AM To: Access Developers discussion and problem solving Subject: [AccessD] Convert a byte value to a hex-string Dear group, is there an easy way to convert a byte-value into a string representing it's hexadecimal value? Michael ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 13:35:15 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:35:15 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <20040719181935.GA46930@kongemord.krig.net> Message-ID: INTTOHEX() is not a recognized function name. Can't find anything in BOL, either. Could that be a user-defined function? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Montag, 19. Juli 2004 20:20 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Mon Jul 19 13:35:16 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Mon, 19 Jul 2004 20:35:16 +0200 Subject: AW: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <40FC0CB3.8060807@shaw.ca> Message-ID: That sounds interesting: I was working in a project where all access-objects were stored in Visual Source Safe as text. One of the forms was corrupted, so we went into the text stored in VSS and were able to fix it there. Unfortunately I can't remember what exactly the problem was... -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Montag, 19. Juli 2004 20:02 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Mon Jul 19 13:35:42 2004 From: marcus at tsstech.com (Scott Marcus) Date: Mon, 19 Jul 2004 14:35:42 -0400 Subject: [AccessD] OT ASP.Net configuration trouble. Message-ID: I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 19 13:48:55 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 19 Jul 2004 14:48:55 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost??-SOLVED Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FEC6E@TTNEXCHSRV1.hshhp.com> We solved our problem but unfortunately it's probably nothing anyone here can use (except for the advice to keep a good recent backup). The form was trashed and we reused the code from our most recent backup which was not as old as I suspected. His most recent code mods were to one of the form's subforms, so with very little rewriting we are back to where we were. Thanks to all for suggestions and offers to help. Jim DeMarco -----Original Message----- From: Michael Brosdorf [mailto:michael.broesdorf at web.de] Sent: Monday, July 19, 2004 2:35 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] URGENT!! A2K - form won't load; is code lost?? That sounds interesting: I was working in a project where all access-objects were stored in Visual Source Safe as text. One of the forms was corrupted, so we went into the text stored in VSS and were able to fix it there. Unfortunately I can't remember what exactly the problem was... -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von MartyConnelly Gesendet: Montag, 19. Juli 2004 20:02 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? you can try to use the undocumented SaveAsText and LoadFromText, may help if an object is corrupted or otherwise behaving weirdly. At the debug/immediate window type: Application.SaveAsText acForm,"MyForm","c:\form.txt or depending on Access version SaveAsText acForm,"MyForm","c:\form.txt You can then load the file into a new MDB. Application.LoadFromText acForm,"MyForm","c:\from.txt" Jim DeMarco wrote: >Hello all, > >I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried compact/repair and jetcomp.exe. Can anyone help us get our form and code back? > >Unfortunatelly my developer did not back up his last rev and there is a lot of code to be lost. > >TIA, > >Jim DeMarco >Director Application Development >Hudson Health Plan > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From cfoust at infostatsystems.com Mon Jul 19 14:16:38 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 19 Jul 2004 12:16:38 -0700 Subject: [AccessD] Create custom shortcut menu Message-ID: What do you mean, "global" functions? All public functions are global in the application. What are you trying to do? Charlotte Foust -----Original Message----- From: Michael Br?sdorf [mailto:michael.broesdorf at web.de] Sent: Saturday, July 17, 2004 8:20 AM To: Access Developers discussion and problem solving Subject: [AccessD] Create custom shortcut menu Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Mon Jul 19 14:32:48 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Mon, 19 Jul 2004 12:32:48 -0700 Subject: [AccessD] update query - question#1 Message-ID: I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From kathrynatgwens at socal.rr.com Mon Jul 19 14:39:41 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Mon, 19 Jul 2004 12:39:41 -0700 Subject: [AccessD] update query - question#1 Message-ID: Hmm, after I sent the first time, I realized I was on no-mail, so this might not have gone through. Sorry if it's a duplicate. I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From BBarabash at TappeConstruction.com Mon Jul 19 14:48:56 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Mon, 19 Jul 2004 14:48:56 -0500 Subject: [AccessD] Convert a byte value to a hex-string Message-ID: <100F91B31300334B89EC531C9DCB0865065836@tccexch01.tappeconstruction.net> No, it looks like it is part of Transact SQL for Sybase products: http://tinyurl.com/5s7wo -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Monday, July 19, 2004 1:35 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Convert a byte value to a hex-string INTTOHEX() is not a recognized function name. Can't find anything in BOL, either. Could that be a user-defined function? Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Montag, 19. Juli 2004 20:20 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 06:24:36PM +0200, Michael Brosdorf wrote: > Thanks Brett! > > Is there a similar function in SQL Server? Try INTTOHEX(). -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From DWUTKA at marlow.com Mon Jul 19 15:08:02 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 19 Jul 2004 15:08:02 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> UPDATE tblCemeteries4Updating SET [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]=Trim(Mid([ Name],InStr([Name],",")+1)) That should do it! (No other querries necessary) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Monday, July 19, 2004 2:33 PM To: accessd at databaseadvisors.com Subject: [AccessD] update query - question#1 I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Mon Jul 19 16:38:11 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Mon, 19 Jul 2004 16:38:11 -0500 Subject: [AccessD] Problems with Date() Message-ID: I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 From pharold at proftesting.com Mon Jul 19 17:29:11 2004 From: pharold at proftesting.com (Perry Harold) Date: Mon, 19 Jul 2004 18:29:11 -0400 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739604@bocnte2k4.boc.chevrontexaco.net> Message-ID: <002401c46ddf$d0c284c0$082da8c0@D58BT131> Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 CMackin at Quiznos.com Mon Jul 19 17:35:27 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Mon, 19 Jul 2004 16:35:27 -0600 Subject: [AccessD] Problems with Date() Message-ID: A long while ago I had an MDAC issue that showed the same syptoms and the fix was tyo somply install the latest MDAC. The workaround was to create a funciton like the following: Public Function GetDate2() as Date GetDate2 = Date() End Function Then in every calling place use Find and Replace to change Date() to GetDate2(). If it's the same issue then a VBA call to it worked while the calls from a textbox did not. -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Geller Sent: Monday, July 19, 2004 3:38 PM To: accessd at databaseadvisors.com Subject: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From rjhjr at cox.net Mon Jul 19 17:40:14 2004 From: rjhjr at cox.net (Bob Hall) Date: Mon, 19 Jul 2004 18:40:14 -0400 Subject: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: <20040719181935.GA46930@kongemord.krig.net> Message-ID: <20040719224011.GA49032@kongemord.krig.net> On Mon, Jul 19, 2004 at 08:35:15PM +0200, Michael Brosdorf wrote: > INTTOHEX() is not a recognized function name. Can't find anything in BOL, > either. > Could that be a user-defined function? My bad. It's only in the Sybase implementation. I forgot to check. I don't work much with hex, so I can't tell you if CONVERT() will convert to hex. From d.dick at uws.edu.au Mon Jul 19 17:46:05 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Mon, 19 Jul 2004 22:46:05 -0000 Subject: [AccessD] Date format problem References: <193572B4E0FC1744BEDFEE63F82CEC9E02739605@bocnte2k4.boc.chevrontexaco.net> Message-ID: <003901cb2794$4ef9d4f0$48619a89@DDICK> Hi Chester By adding "yy" to the end of the 'syntax' you are actually telling Access to only return 2 digits of the year If you want to see all four digits of the year, try adding "yyyy" to the end of your syntax instead of just "yy" You can even add something like "dd/mm/yyyy" or "mm/dd/yyyy" to see the whole date expression Hope this helps Darren ----- Original Message ----- From: "Kaup, Chester A" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 20, 2004 1:22 AM Subject: RE: [AccessD] Date format problem > Selected year contains the value 2004. It can contain any year value > from 2001 to 2010 depending on what the user selects from the list box. > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However a large > number of electrons were terribly inconvenienced. > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael > Brosdorf > Sent: Monday, July 19, 2004 9:37 AM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Date format problem > > > What exactly does the field 'selected_year' contain? > > Michael > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, > Chester A > Gesendet: Montag, 19. Juli 2004 15:45 > An: accessd at databaseadvisors.com > Betreff: [AccessD] Date format problem > > > The following expression in a query returns 2004 Test:[Forms]![frm > Select Date]![selected_year] > The following expression returns 05 in a query Test:Format([Forms]![frm > Select Date]![selected_year],"yy") > > I an confused as to what is happening here. Help please. > > > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > 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 andrew.haslett at ilc.gov.au Mon Jul 19 17:59:17 2004 From: andrew.haslett at ilc.gov.au (Haslett, Andrew) Date: Tue, 20 Jul 2004 08:29:17 +0930 Subject: [AccessD] OT ASP.Net configuration trouble. Message-ID: That's pretty weird. Perhaps it doesn't recognise that IIS is running on your local machine. Try running the aspnet_iisreg.exe tool with appropriate switches (watch wrap): http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cptools/htm l/cpgrfaspnetiisregistrationtoolaspnet_regiisexe.asp Its found in the C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\ directory Cheers, Andrew -----Original Message----- From: Scott Marcus [mailto:marcus at tsstech.com] Sent: Tuesday, 20 July 2004 4:06 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT ASP.Net configuration trouble. I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. From d.dick at uws.edu.au Mon Jul 19 18:51:22 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 20 Jul 2004 09:51:22 +1000 Subject: [AccessD] Problems with Date() References: Message-ID: <010801c46deb$4bba01c0$48619a89@DDICK> Hi Susan When you open the dB on their machine and go into any form or module Then click Tools|References Can you see any references marked as 'missing'? or any reference you think should be ticked but are not? Also make sure the 'order' they appear in the list matches your version of the app I have had this sort of thing before with broken and even phantom references Hope this helps Darren ----- Original Message ----- From: "Susan Geller" To: Sent: Tuesday, July 20, 2004 7:38 AM Subject: [AccessD] Problems with Date() > I have a bunch of reports which are really letters and I want them to > have today's date on them when it's run. No problem. I put a textbox on > the report and set the control source as "=Date()". Works fine on my > machine. Doesn't work on other machines. I have a very different set > up than the other machines so I don't even know where to look. Any ideas > on what might be causing the report to pop up with a dialogue box saying > "Enter Date" (as if I was asking for an input parameter) when I run the > report? Note: Office XP, 2002 file format. > > --Susan > > Susan B. Geller > Office of Information Systems > College of Continuing Education > University of Minnesota > 306 Wesbrook Hall > 77 Pleasant Street SE > Minneapolis, MN 55455 > Phone: 612-626-4785 > Fax: 612-625-2568 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:42 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Tue, 20 Jul 2004 10:11:42 +0200 Subject: AW: [AccessD] Create custom shortcut menu In-Reply-To: Message-ID: Hi Charlotte, sorry, I already got it to work using WithEvents - should have 'closed' my question here! Basically, I do not like the idea of having a public function for every button on every shortcut menu bar. Using Withevents I can bind the buttons on the shortcut menus to a set of event procedures and program them just I would do with normal command buttons on a form. Anyhow, thank you for offering help!!! Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Charlotte Foust Gesendet: Montag, 19. Juli 2004 21:17 An: Access Developers discussion and problem solving Betreff: RE: [AccessD] Create custom shortcut menu What do you mean, "global" functions? All public functions are global in the application. What are you trying to do? Charlotte Foust -----Original Message----- From: Michael Br?sdorf [mailto:michael.broesdorf at web.de] Sent: Saturday, July 17, 2004 8:20 AM To: Access Developers discussion and problem solving Subject: [AccessD] Create custom shortcut menu Dear group, I am trying to create a custom shortcut menu for a third-party ActiveX-Control that does not have a ShortcutMenuBar-property. I created the menu and open it in the MouseDown-event of the control and it displays just fine. The only problem now is: how do I respond to the clicks on the MenuBarButtons without using global functions? I've seen a couple of examples using WithEvents, but I just can't get it to work... Michael -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:45 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 10:11:45 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <20040719224011.GA49032@kongemord.krig.net> Message-ID: Hi Bob, Brett pointed me to thie KB-article: http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 I implemented this approach as a user-defined-function and it works great! Thanks to all who helped me out with this problem! Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Bob Hall Gesendet: Dienstag, 20. Juli 2004 00:40 An: Access Developers discussion and problem solving Betreff: Re: [AccessD] Convert a byte value to a hex-string On Mon, Jul 19, 2004 at 08:35:15PM +0200, Michael Brosdorf wrote: > INTTOHEX() is not a recognized function name. Can't find anything in BOL, > either. > Could that be a user-defined function? My bad. It's only in the Sybase implementation. I forgot to check. I don't work much with hex, so I can't tell you if CONVERT() will convert to hex. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Tue Jul 20 03:11:44 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 10:11:44 +0200 Subject: AW: [AccessD] Problems with Date() In-Reply-To: Message-ID: Try using Now() instead of Date() and set the display format of the textbox to one the built-in date formats. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Susan Geller Gesendet: Montag, 19. Juli 2004 23:38 An: accessd at databaseadvisors.com Betreff: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 03:32:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 10:32:37 +0200 Subject: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: References: Message-ID: <1256616904.20040720103237@cactus.dk> Hi Michael So why not share this great work of yours? /gustav > Brett pointed me to thie KB-article: > http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 > I implemented this approach as a user-defined-function and it works great! From stephen at bondsoftware.co.nz Tue Jul 20 03:48:49 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Tue, 20 Jul 2004 20:48:49 +1200 Subject: [AccessD] Append Query Message-ID: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. Any ideas? I didn't design this scenario, I've been asked along at party's end .... Stephen Bond From gustav at cactus.dk Tue Jul 20 04:10:41 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 11:10:41 +0200 Subject: [AccessD] Append Query In-Reply-To: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Message-ID: <1078901559.20040720111041@cactus.dk> Hi Stephen This sounds like a clean job for a Union query: Select * From qdyInter Union All Select * From qyyIntra; /gustav > Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the > duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. > I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. > Any ideas? I didn't design this scenario, I've been asked along at party's end .... > Stephen Bond From thevigil at kabelfoon.nl Tue Jul 20 04:12:28 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Tue, 20 Jul 2004 11:12:28 +0200 Subject: [AccessD] Append Query References: <70F3D727890C784291D8433E9C418F290887CA@server.bondsoftware.co.nz> Message-ID: <001301c46e39$b410af00$3f412d3e@jester> Hi Stephen, Use a union select query. like: select VoterID, vote FROM electronicVote UNION Select VoterID, vote FROM paperVote; Maybe you have to name the columns... and beware the 2 qeuries must have the same number of output columns.. HTH Bert-Jan ----- Original Message ----- From: "Stephen Bond" To: Sent: Tuesday, July 20, 2004 10:48 AM Subject: [AccessD] Append Query > Results of an election come in two forms, paper and electronic. One table for each. There are 2 fields in each table, the VoterId and the vote (Yes/No). A couple of queries have culled out the duplicate voters intra- and inter-. The output of these queries therefore consists of a list of clean electronic votes and a list of clean paper votes. > > I want to take these two output and merge them into one list without using the Maketable/Append approach. I want the list to be a *query* output. > > Any ideas? I didn't design this scenario, I've been asked along at party's end .... > > Stephen Bond > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From thevigil at kabelfoon.nl Tue Jul 20 04:29:53 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Tue, 20 Jul 2004 11:29:53 +0200 Subject: [AccessD] Claas modules Message-ID: <012501c46e3c$1fa337e0$3f412d3e@jester> Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan From michael.broesdorf at web.de Tue Jul 20 04:47:24 2004 From: michael.broesdorf at web.de (=?us-ascii?Q?Michael_Brosdorf?=) Date: Tue, 20 Jul 2004 11:47:24 +0200 Subject: AW: AW: [AccessD] Convert a byte value to a hex-string In-Reply-To: <1256616904.20040720103237@cactus.dk> Message-ID: Hi Gustav, I simply replaced CREATE PROCEDURE with CREATE FUNCTION and set the return value - so it is not really _my_ work ;-) Ah, and removed the leading '0x'... Here is the result: CREATE FUNCTION dbo.myUDF_Binary2HexString (@binvalue varbinary(255)) RETURNS varchar(255) AS begin declare @hexvalue varchar(255) , at charvalue varchar(255) , at i int , at length int , at hexstring char(16) select @charvalue = '' , at i=1 , at length=datalength(@binvalue) , at hexstring = '0123456789abcdef' WHILE (@i<=@length) begin declare @tempint int , at firstint int , at secondint int select @tempint=CONVERT(int, SUBSTRING(@binvalue, at i,1)) select @firstint=FLOOR(@tempint/16) select @secondint=@tempint - (@firstint*16) select @charvalue=@charvalue +SUBSTRING(@hexstring, at firstint+1,1) +SUBSTRING(@hexstring, @secondint+1, 1) select @i=@i+1 end return @charvalue end -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Gustav Brock Gesendet: Dienstag, 20. Juli 2004 10:33 An: Access Developers discussion and problem solving Betreff: Re: AW: [AccessD] Convert a byte value to a hex-string Hi Michael So why not share this great work of yours? /gustav > Brett pointed me to thie KB-article: > http://support.microsoft.com/default.aspx?scid=kb;en-us;104829 > I implemented this approach as a user-defined-function and it works great! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 05:11:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 12:11:01 +0200 Subject: [AccessD] Claas modules In-Reply-To: <012501c46e3c$1fa337e0$3f412d3e@jester> References: <012501c46e3c$1fa337e0$3f412d3e@jester> Message-ID: <3012521104.20040720121101@cactus.dk> Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan From marcus at tsstech.com Tue Jul 20 06:38:05 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 20 Jul 2004 07:38:05 -0400 Subject: [AccessD] OT ASP.Net configuration trouble. -SOLVED Message-ID: I added 'localhost' to the beginning of the exceptions LAN list because I'm using a proxy server. What threw me off was that I had this at the end of the list and it didn't work. After trying other stuff, I decided to try moving it to first in the list, which was successful. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Haslett, Andrew Sent: Monday, July 19, 2004 6:59 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT ASP.Net configuration trouble. That's pretty weird. Perhaps it doesn't recognise that IIS is running on your local machine. Try running the aspnet_iisreg.exe tool with appropriate switches (watch wrap): http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cptools/htm l/cpgrfaspnetiisregistrationtoolaspnet_regiisexe.asp Its found in the C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\ directory Cheers, Andrew -----Original Message----- From: Scott Marcus [mailto:marcus at tsstech.com] Sent: Tuesday, 20 July 2004 4:06 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT ASP.Net configuration trouble. I'm new at developing ASP pages and have Visual Studio .Net 2003 Enterprise Architect. I tried to make a development web server and failed (no need to help me fix it). So I uninstalled VS .NET and the frame work(so that the I could install IIS), installed IIS and reinstalled VS .Net. Now for my problem... VS .Net still looks at the old web server instead of my local IIS install when trying to create new web projects and solutions. Any attempt to change this location results in the 'OK' button (allowing me to create the project) being disabled. What can I do so that VS .Net lets me develop these projects locally? Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Joe Hecht Sent: Monday, July 19, 2004 1:24 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Docmd.setfocus Please remove extra @ sign when replying to Joe Hecht -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Monday, July 19, 2004 7:30 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] moving focus off the tab page I need to force the focus off of the tab page into the first control in the tab order. I do not use SendKeys. Is there a non SendKeys answer? John W. Colby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com IMPORTANT - PLEASE READ ******************** This email and any files transmitted with it are confidential and may contain information protected by law from disclosure. If you have received this message in error, please notify the sender immediately and delete this email from your system. No warranty is given that this email or files, if attached to this email, are free from computer viruses or other defects. They are provided on the basis the user assumes all responsibility for loss, damage or consequence resulting directly or indirectly from their use, whether caused by the negligence of the sender or not. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Tue Jul 20 06:40:54 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Tue, 20 Jul 2004 13:40:54 +0200 (CEST) Subject: [AccessD] Dates And Merging To Word Message-ID: <22139804.1090323654636.JavaMail.www@wwinf3004> To all, I have a table in Access which has two dates fields (formatted as short date and DD/MM/YYYY), I have a word document that links to the database and uses both the date fields, however when I merge the data the dates appear in the format MM/DD/YYYY. Anyone any ideas why this is happening, and how I can get round it please. Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From kaupca at chevrontexaco.com Tue Jul 20 07:05:39 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 07:05:39 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> All I want is the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Monday, July 19, 2010 5:47 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Date format problem Hi Chester By adding "yy" to the end of the 'syntax' you are actually telling Access to only return 2 digits of the year If you want to see all four digits of the year, try adding "yyyy" to the end of your syntax instead of just "yy" You can even add something like "dd/mm/yyyy" or "mm/dd/yyyy" to see the whole date expression Hope this helps Darren ----- Original Message ----- From: "Kaup, Chester A" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 20, 2004 1:22 AM Subject: RE: [AccessD] Date format problem > Selected year contains the value 2004. It can contain any year value > from 2001 to 2010 depending on what the user selects from the list > box. > > Chester Kaup > Information Management Technician IT-MidContinent/MidContinent > Business Unit CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However a large > number of electrons were terribly inconvenienced. > > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael > Brosdorf > Sent: Monday, July 19, 2004 9:37 AM > To: Access Developers discussion and problem solving > Subject: AW: [AccessD] Date format problem > > > What exactly does the field 'selected_year' contain? > > Michael > > -----Ursprungliche Nachricht----- > Von: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Kaup, > Chester A > Gesendet: Montag, 19. Juli 2004 15:45 > An: accessd at databaseadvisors.com > Betreff: [AccessD] Date format problem > > > The following expression in a query returns 2004 Test:[Forms]![frm > Select Date]![selected_year] > The following expression returns 05 in a query > Test:Format([Forms]![frm Select Date]![selected_year],"yy") > > I an confused as to what is happening here. Help please. > > > > Chester Kaup > Information Management Technician IT-MidContinent/MidContinent > Business Unit CTN 8-687-7415 > Outside 432-687-7414 > > 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 kaupca at chevrontexaco.com Tue Jul 20 07:06:40 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 07:06:40 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739611@bocnte2k4.boc.chevrontexaco.net> That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 john at winhaven.net Tue Jul 20 08:22:51 2004 From: john at winhaven.net (John Bartow) Date: Tue, 20 Jul 2004 08:22:51 -0500 Subject: [AccessD] Claas modules In-Reply-To: <3012521104.20040720121101@cactus.dk> Message-ID: Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 08:36:33 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 09:36:33 -0400 Subject: [AccessD] Class modules Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From john at winhaven.net Tue Jul 20 08:59:47 2004 From: john at winhaven.net (John Bartow) Date: Tue, 20 Jul 2004 08:59:47 -0500 Subject: [AccessD] Class modules In-Reply-To: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> Message-ID: :o) Oops, did I misspell Mister? ;-) John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 8:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming in > access and they (try) to explain class modules but i do not understand > it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make and > understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jim.Hale at FleetPride.com Tue Jul 20 09:05:42 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 09:05:42 -0500 Subject: [AccessD] Claas modules Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDD5@corp-es01.fleetpride.com> In Getz's Access developer's handbook p446 there is a very interesting spin button class. Reviewing the properties and methods of this class helped me to understand what classes are all about. The ADH chap 3 also has a good introduction to classes. Good luck. Jim Hale -----Original Message----- From: Bert-Jan Brinkhuis [mailto:thevigil at kabelfoon.nl] Sent: Tuesday, July 20, 2004 4:30 AM To: accessd at databaseadvisors.com Subject: [AccessD] Claas modules Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 09:20:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 16:20:47 +0200 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> References: <193572B4E0FC1744BEDFEE63F82CEC9E02739610@bocnte2k4.boc.chevrontexaco.net> Message-ID: <1927507543.20040720162047@cactus.dk> Hi Chester If the year is saved as 2004 you can retrieve the deca and single years like this: intShortYear = FullYear Mod 100 If FullYear is a String - as in a combobox - you can do this: strShortYear = Right(FullYear, 2) The reason you are confused is that 2004 is a year and not the date value you expect as you can see from this: ? Format(2004, "mm/dd/yyyy") If you insist on using Format() you must build a DateTime value from the year, say 2004-01-01: datDate = DateSerial(2004, 1, 1) Doing so, Format(datDate, "yy") will return "04". /gustav > All I want is the last 2 digits of the year. It needs to be that way to > load into another program. >> Selected year contains the value 2004. It can contain any year value >> from 2001 to 2010 depending on what the user selects from the list >> box. >> >> The following expression in a query returns 2004 Test:[Forms]![frm >> Select Date]![selected_year] >> The following expression returns 05 in a query >> Test:Format([Forms]![frm Select Date]![selected_year],"yy") >> >> I an confused as to what is happening here. Help please. From Jim.Hale at FleetPride.com Tue Jul 20 09:22:11 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 09:22:11 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDD6@corp-es01.fleetpride.com> Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 20 09:28:28 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 20 Jul 2004 10:28:28 -0400 Subject: [AccessD] Class modules In-Reply-To: <916187228923D311A6FE00A0CC3FAA3090ECEE@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6AF@ADGSERVER> John, Just an FYI. The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 9:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming > in access and they (try) to explain class modules but i do not > understand it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make > and understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kaupca at chevrontexaco.com Tue Jul 20 09:50:17 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Tue, 20 Jul 2004 09:50:17 -0500 Subject: [AccessD] Date format problem Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E02739612@bocnte2k4.boc.chevrontexaco.net> Good explanation. The way I was trying to do it confuses the format function. I think I will use the Right function. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 9:21 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Date format problem Hi Chester If the year is saved as 2004 you can retrieve the deca and single years like this: intShortYear = FullYear Mod 100 If FullYear is a String - as in a combobox - you can do this: strShortYear = Right(FullYear, 2) The reason you are confused is that 2004 is a year and not the date value you expect as you can see from this: ? Format(2004, "mm/dd/yyyy") If you insist on using Format() you must build a DateTime value from the year, say 2004-01-01: datDate = DateSerial(2004, 1, 1) Doing so, Format(datDate, "yy") will return "04". /gustav > All I want is the last 2 digits of the year. It needs to be that way > to load into another program. >> Selected year contains the value 2004. It can contain any year value >> from 2001 to 2010 depending on what the user selects from the list >> box. >> >> The following expression in a query returns 2004 Test:[Forms]![frm >> Select Date]![selected_year] >> The following expression returns 05 in a query >> Test:Format([Forms]![frm Select Date]![selected_year],"yy") >> >> I an confused as to what is happening here. Help please. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 09:57:47 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 10:57:47 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD81@DISABILITYINS01> No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel I am doing imports from data sent to us in Excel spreadsheets which I Link to the db then build queries on the resulting "table". In order to make sure that the spreadsheet is named something consistent (so that the link functions correctly), I am using the following function to rename a spreadsheet in Excel. Function XLRenameSpreadsheet(strFileName As String, strTblName As String) On Error GoTo Err_XLRenameSpreadsheet Dim xlApp As Object Dim xlWs As Object Set xlApp = CreateObject("Excel.application") xlApp.Workbooks.Open strFileName Set xlWs = xlApp.Workbooks(1).Worksheets(1) xlWs.Name = strTblName Exit_XLRenameSpreadsheet: On Error Resume Next xlApp.Workbooks(1).Close True Set xlWs = Nothing If Not (xlApp Is Nothing) Then xlApp.Close: Set xlApp = Nothing Exit Function Err_XLRenameSpreadsheet: MsgBox Err.Description, , "Error in Function basUtils.XLRenameSpreadsheet" Resume Exit_XLRenameSpreadsheet Resume 0 '.FOR TROUBLESHOOTING End Function Unfortunately I get a message: "XXX.XLS is a Microsoft Excel 5.0/95 workbook. Do you want to overwrite it with the latest Excel format" when I try and do the save xlApp.Workbooks(1).Close True Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 09:58:18 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 10:58:18 -0400 Subject: [AccessD] Class modules Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD82@DISABILITYINS01> Thanks, I'll look into that. JWC -----Original Message----- From: Bobby Heid [mailto:bheid at appdevgrp.com] Sent: Tuesday, July 20, 2004 10:28 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules John, Just an FYI. The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John Sent: Tuesday, July 20, 2004 9:37 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Class modules >You will find a great set of instructions from Master John Colby. ROTFL. Master? You can go also to my site to find a series of articles on using a framework, which is all about classes. Click the C2DbFW3G button. John W. Colby www.colbyconsulting.com -----Original Message----- From: John Bartow [mailto:john at winhaven.net] Sent: Tuesday, July 20, 2004 9:23 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Claas modules Bert-Jan I second on Gustav's response. I think the best resource you're going to find on class modules is right here. Read through the newsletters, then start discussing it with the class module gurus on this list. For really advanced class module usage go to the archives and search for "Framework Discussion" during the month of March this year. You will find a great set of instructions from Master John Colby. John B. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Tuesday, July 20, 2004 5:11 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Claas modules Hi Bert-Jan Have you studied the work from our own listmembers? Have a look here: http://www.databaseadvisors.com/newsletters.htm Look up July 2001 and: "An Introduction to Class Modules (by John Colby)" Much more stuff in these newsletters by the way. /gustav > I have written several functions in modules. And used several class modules > and can follow the code to see what it is doing, but i still do not > understand class modules... ;-( I have several books about programming > in access and they (try) to explain class modules but i do not > understand it...... so i am unable to write them myself.... > I feel i am missing out a lot of the fun of access and ofcourse of its > functionality! > Does anyone know a good document/book/website explaining how to make > and understand class modules? > Thanks in advance. > Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From carbonnb at sympatico.ca Tue Jul 20 10:03:52 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Tue, 20 Jul 2004 11:03:52 -0400 Subject: [AccessD] Class modules Message-ID: <20040720150352.MMBE1833.tomts8-srv.bellnexxia.net@mxmta.bellnexxia.net> > From: "Colby, John" > Thanks, I'll look into that. > -----Original Message----- > From: Bobby Heid [mailto:bheid at appdevgrp.com] > John, > > Just an FYI. > > The toolbar is not showing up for me on Firefox .92. Works fine in IE 6. You need to have the Flash Player installed. I just checked in FF 0.9.1 with the patch to 0.9.2 installed) and they work just fine for me. -- Bryan Carbonnell - carbonnb at sympatico.ca Unfortunately common sense isn't so common! From bchacc at san.rr.com Tue Jul 20 10:33:51 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 20 Jul 2004 08:33:51 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD7E@DISABILITYINS01> Message-ID: <008e01c46e6e$f7e03360$6601a8c0@HAL9002> John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Monday, July 19, 2004 9:39 AM Subject: RE: [AccessD] moving focus off the tab page > LOL. I think you misunderstood the question. > > When a tabbed form opens, the tab control tends to have the focus, usually > with the tab0 page of the tab control. > > I want to place the control into the first control on the selected tab that > can validly recieve the focus. This means: > > The control with the Lowest Tabindex that has TabStop = true that is Enabled > that is Visible. > > IF I used Sendkeys I could just send a tab key which would cause Access to > tab the cursor into the first valid control. > > Since I don't use Sendkeys, I need another way to do this. > > Somewhere in the guts of Access (page control) there is a collection of > items that may (or are) be in the tab order. Unfortunately it doesn't > appear to be exposed for us to use. > > I have built a pair of functions to find the first control that can receive > the focus. It involves iterating the collection of all controls, testing > each control to see if it has a TabStop property, then if it is enabled, > then if it is visible. If all these things are true, then this control MAY > be the first in the tab order. Now each such control is tested against > every other such control to find the one with the lowest TabIndex property. > > It works, and on my machine takes about 16ms to run on a fairly complex > form. > > It just seems that somewhere built in to Access I should be able to ask the > object with a controls collection which control in the collection is the > "first valid control in the tab order", i.e. which control can ACTUALLY > RECEIVE the focus using the tab key. > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 12:12 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > FirstControl is the control you want to get the focus... > > Doris Manning > Database Administrator > Hargrove Inc. > www.hargroveinc.com > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 11:02 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > What is FirstControl a property or method of? > > JWC > > -----Original Message----- > From: Mike & Doris Manning [mailto:mikedorism at adelphia.net] > Sent: Monday, July 19, 2004 10:42 AM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] moving focus off the tab page > > > Firstcontrol.SetFocus > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Colby, John > Sent: Monday, July 19, 2004 10:30 AM > To: 'Access Developers discussion and problem solving' > Subject: [AccessD] moving focus off the tab page > > > I need to force the focus off of the tab page into the first control in the > tab order. > > I do not use SendKeys. > > Is there a non SendKeys answer? > > John W. Colby > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From Jim.Hale at FleetPride.com Tue Jul 20 10:38:15 2004 From: Jim.Hale at FleetPride.com (Hale, Jim) Date: Tue, 20 Jul 2004 10:38:15 -0500 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <6A6AA9DF57E4F046BDA1E273BDDB677217FDDB@corp-es01.fleetpride.com> Hmm... If I recall correctly if you open an excel sheet and don't make changes it won't ask you if you want to save, i.e. you can just close it thereby avoiding the message box. If you can get the name of the sheet and use it in your connection string without changing the sheet name you may be able to avoid the stupid message box. As you know, you can give a linked table in Access whatever name you desire regardless of the source table name so your queries wouldn't have to change. The sole trick is to access the data without changing the workbook so the message box doesn't pop up. Something like appExcel.activeworkbook.Sheets(1).name should retrieve the name for use in your connection string. Anyway, just a thought. Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 9:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 20 11:02:10 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 20 Jul 2004 12:02:10 -0400 Subject: [AccessD] Class modules In-Reply-To: <916187228923D311A6FE00A0CC3FAA3090ED26@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6B0@ADGSERVER> Thanks Bryan. Sorry about the false issue John. I guess I have not hit any flash sites since going to 0.9.2. Bobby >You need to have the Flash Player installed. > >I just checked in FF 0.9.1 with the patch to 0.9.2 installed) and they work just fine for me. > >-- >Bryan Carbonnell - carbonnb at sympatico.ca >Unfortunately common sense isn't so common! From JColby at dispec.com Tue Jul 20 11:08:50 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:08:50 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD83@DISABILITYINS01> Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky From JColby at dispec.com Tue Jul 20 11:09:50 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:09:50 -0400 Subject: [AccessD] Preventing user prompts from Excel Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD84@DISABILITYINS01> Yea, that seems to be the answer. JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 11:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Hmm... If I recall correctly if you open an excel sheet and don't make changes it won't ask you if you want to save, i.e. you can just close it thereby avoiding the message box. If you can get the name of the sheet and use it in your connection string without changing the sheet name you may be able to avoid the stupid message box. As you know, you can give a linked table in Access whatever name you desire regardless of the source table name so your queries wouldn't have to change. The sole trick is to access the data without changing the workbook so the message box doesn't pop up. Something like appExcel.activeworkbook.Sheets(1).name should retrieve the name for use in your connection string. Anyway, just a thought. Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 9:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel No! 8-( JWC -----Original Message----- From: Hale, Jim [mailto:Jim.Hale at fleetpride.com] Sent: Tuesday, July 20, 2004 10:22 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Preventing user prompts from Excel Did you find a solution to this problem? Jim Hale -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 13, 2004 2:45 PM To: 'accessd at databaseadvisors.com' Subject: [AccessD] Preventing user prompts from Excel Since this is an automated process there is no one around to answer yes (Excel can be so stupid sometimes). Is there any way to force a yes (or no, I don't really much care what the format is!) JWC -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 11:27:15 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 12:27:15 -0400 Subject: [AccessD] Class modules example Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD85@DISABILITYINS01> At one client I have built a rather elaborate system that tracks events that happen to an insurance claim. As events happen they are recorded in an event table that is child to insurance claim. The events can cause status changes, and events subsequent to any event that causes a status change inherits the "current" status if it does not cause a status change. Thus the last event always displays the current status. In each event record there are pointers to the immediate previous event, the event that caused the current status, and the event that caused the previous status. I do that for reporting purposes, so that we can determine (with queries) how long claims are in a given status, when the status changed etc. Of course this means that as a new event is created these fields have to be populated by code that looks up these previous events and fills in the FKs. Furthermore if an event is deleted, these pointers will need adjusting. Additionally, the users need the current event type / status displayed out in the main claim form. For speed reasons I have, with malice and forethought, denormalized the db and placed a pointer to the last event in the main claim record. Likewise, if the LAST event is deleted, then this pointer needs to be adjusted. I adjust this pointer directly in the record itself rather than by setting a value in a form simply so that the code that create events aren't tied to a form being open. Which brings up an interesting phenomenon - If the claim form IS OPEN, and the field in the current claim that tracks the current event is modified, any attempt to edit the current manually through the form will display a message "another user has modified this claim - your changes will be lost". The message is displayed as the user is entering the change in the very first field being changed, and the change is discarded by Access, requiring the user to start over after clicking the OK button to the message being displayed. In order to work around this and still use the encapsulation provided by the classes building the events and updating the claim record, I am using RaiseEvent to broadcast a message that the claim record has been modified, at the time that the claim is updated. The claim form listens for the message and if it sees a "claim modified" message, immediately requeries the form. Understand that the class cannot update the claim if that claim is currently being modified by any user, which in itself can cause a "multi-user" issue. I have designed a "message" class (available on my site BTW) which allows message class users to broadcast / receive messages. The event class which modified the claim gets a pointer to a global message class. It uses this pointer to send messages on that message channel. The claim form gets a pointer to the same message class. In the claim form's class module I set up an event handler to sink the message classes' message event. Thus the claim form now receives any events broadcast on that message channel. It watches the subject, and if the subject is "claim record change", it looks in the message parameter and checks the claim ID against the claim the form is currently displaying. If the claim being displayed if the claim form is the same as the claim the event class just modified, then the claim form has to requery so that the user won't get these annoying messages. It seems like Access should just requery the data by itself if it senses that the data has changed, and allow the user to continue modifying the data after the requery. Unfortunately that does not seem to be the case. There are of course other ways to handle this problem. However, using a message class - which one class module uses to broadcast messages, and another class module uses to receive messages - allows me to encapsulate and isolate the various processes. The event class can update events without worrying about whether the claim form is open and trying to cause it to requery somehow. It can simply broadcast a message "hey, I modified claim number XXX". ANY form that might be affected can listen for these messages and if it sees a message saying that the claim it is currently displaying was modified, it can requery itself. The event class logs any failed attempts to update the claim record (some user was actively editing that claim at that moment) and another process performs those updates later. John W. Colby From kathrynatgwens at socal.rr.com Tue Jul 20 11:56:10 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Tue, 20 Jul 2004 09:56:10 -0700 Subject: [AccessD] update query - question#1 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> Message-ID: :( fooey, it didn't work. Asks me for a parameter value. I copy/pasted your SQL statement: http://www.babcockancestry.com/storage/accesscemeteries1.jpg and went to the design view to look at how that parsed out http://www.babcockancestry.com/storage/accesscemeteries2.jpg then ran it and got this: http://www.babcockancestry.com/storage/accesscemeteries3.jpg On a side note, before I pasted the SQL statement, the default was UPDATE tblCemeteries4Updating SET; I tried adding the ; after SET in your statement but that gave a syntax error, so I don't know what that is about. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Monday, July 19, 2004 1:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > UPDATE tblCemeteries4Updating SET > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > Trim(Mid([ > Name],InStr([Name],",")+1)) > > That should do it! (No other querries necessary) > > Drew > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Monday, July 19, 2004 2:33 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] update query - question#1 > > > I have a table named > tblCemeteries4Updating > The pertinant fields are: > Name > Surname > FirstName > MarrName > > Query #1 > Name currently has (for example) > WESTWATER, John Ovenstone > I want to update this table to put Westwater (initial letter cap > only, rest > smalls) into the Surname field and John Ovenstone in the FirstName field. > I know I have to first make a query with the fields in it, and then change > it to an update query. That gives me the grid boxes for "Update To" and > "Criteria" but I'm not sure what to type in them. > > After that is done, I have another update, but I think I'll do one at a > time. Maybe with the answer to this one, I might be able to figure out the > other one, though the other one involves two tables, so I might be back. > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 20 12:01:34 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jul 2004 10:01:34 -0700 Subject: [AccessD] moving focus off the tab page Message-ID: I'm not sure this is what you're talking about, John, but I built this a long time ago to handle a similar problem: Public Function FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) As String 'created by Charlotte Foust 9/14/99 'last modified 9/11/2000 Dim ctl As Control Dim intTab As Integer Dim strCtlName As String Dim blnSkip As Boolean 'Use the count of controls as the 'maximum tab value intTab = frm.Count 'Loop throught all controls on form For Each ctl In frm If frmSection <> -1 Then If ctl.Section <> frmSection Then blnSkip = True End If 'ctl.Section <> frmSection End If 'frmSection <> -1 If Not blnSkip Then Select Case ctl.ControlType 'If control can accept value 'test its tab value against intTab. Case acTextBox, acOptionGroup, acComboBox, acListBox, _ acCheckBox, acOptionButton, acCommandButton, _ acToggleButton 'If tab value less than intTab 'set intTab = tab value and 'set strCtlName = control name. If ctl.TabIndex < intTab Then If ctl.TabStop = True Then intTab = ctl.TabIndex strCtlName = ctl.Name End If 'ctl.TabStop = True End If 'ctl.TabIndex < intTab End Select 'Case ctl.ControlType End If 'not blnSkip Next 'ctl In frm 'Return name of control with lowest tab value FirstFormControl = strCtlName End Function 'FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 8:09 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From JColby at dispec.com Tue Jul 20 12:31:01 2004 From: JColby at dispec.com (Colby, John) Date: Tue, 20 Jul 2004 13:31:01 -0400 Subject: [AccessD] moving focus off the tab page Message-ID: <05C61C52D7CAD211A7830008C7DF6F1079BD86@DISABILITYINS01> That is close... It doesn't take into account whether a control is hidden or disabled - both of those conditions will prevent the control from getting the focus. Further it doesn't figure out whether a tab page has the focus. But that is the general idea. I wrote code to do what I needed already. I was just answering Rocky's question. JWC -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Tuesday, July 20, 2004 1:02 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] moving focus off the tab page I'm not sure this is what you're talking about, John, but I built this a long time ago to handle a similar problem: Public Function FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) As String 'created by Charlotte Foust 9/14/99 'last modified 9/11/2000 Dim ctl As Control Dim intTab As Integer Dim strCtlName As String Dim blnSkip As Boolean 'Use the count of controls as the 'maximum tab value intTab = frm.Count 'Loop throught all controls on form For Each ctl In frm If frmSection <> -1 Then If ctl.Section <> frmSection Then blnSkip = True End If 'ctl.Section <> frmSection End If 'frmSection <> -1 If Not blnSkip Then Select Case ctl.ControlType 'If control can accept value 'test its tab value against intTab. Case acTextBox, acOptionGroup, acComboBox, acListBox, _ acCheckBox, acOptionButton, acCommandButton, _ acToggleButton 'If tab value less than intTab 'set intTab = tab value and 'set strCtlName = control name. If ctl.TabIndex < intTab Then If ctl.TabStop = True Then intTab = ctl.TabIndex strCtlName = ctl.Name End If 'ctl.TabStop = True End If 'ctl.TabIndex < intTab End Select 'Case ctl.ControlType End If 'not blnSkip Next 'ctl In frm 'Return name of control with lowest tab value FirstFormControl = strCtlName End Function 'FirstFormControl(frm As Form, _ Optional frmSection As Index = -1) Charlotte Foust -----Original Message----- From: Colby, John [mailto:JColby at dispec.com] Sent: Tuesday, July 20, 2004 8:09 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] moving focus off the tab page Rocky, The question is "what is the desired control to set the focus in", NOT how to set the focus. In any form, there is no single "tab index 0" control. If you have a header with controls in it, there will be one there. If you have a footer with controls, there will be one there. There will be one in the main part of the form. Furthermore, if you have tab controls, EACH page of the tab control has it's own tab order etc. So.. if I am in the header and tap the tab key I go one place, if I am in the footer and tap the tab key I go another, if I am in the main part of the form I go a third, if I am in page1 of the tab control I go another, if I am in page 2 of the form I go another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? To complicate matters further, just because a control has tab index set to 0 doesn't mean it can get the focus. It may be invisible, it may be disabled, or it may simply have it's property that allows it to be "tabbed into" set to false. My question is... How do I determine WHICH control would get the focus if the tab key were tapped? The answer varies depending on whether there are tabs (if so which tab is currently selected?), whether the current focus is in the header / footer / body of the form, etc. UGLY question, and Access is no help at all determining the answer (AFAICT). This is one of those "the stupid bastards know the answer" (the tab key works doesn't it?) but they don't expose the answer to me so I can set the focus to that control using SomeControl.SetFocus syntax. JWC. -----Original Message----- From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] Sent: Tuesday, July 20, 2004 11:34 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] moving focus off the tab page John: Why can't you use the _Open event of the form to se the focus to the desired control? Rocky -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 20 12:56:52 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 20 Jul 2004 10:56:52 -0700 Subject: [AccessD] moving focus off the tab page References: <05C61C52D7CAD211A7830008C7DF6F1079BD83@DISABILITYINS01> Message-ID: <014d01c46e82$f02a89e0$6601a8c0@HAL9002> John: At first I thought you were trying to solve this for a specific form where you knew the controls and you knew where you wanted the focus set. But you're trying to make a general case routine? Would using Screen.currrentControl help figure out where you are? Rocky ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 20, 2004 9:08 AM Subject: RE: [AccessD] moving focus off the tab page > Rocky, > > The question is "what is the desired control to set the focus in", NOT how > to set the focus. > > In any form, there is no single "tab index 0" control. If you have a header > with controls in it, there will be one there. If you have a footer with > controls, there will be one there. There will be one in the main part of > the form. Furthermore, if you have tab controls, EACH page of the tab > control has it's own tab order etc. So.. if I am in the header and tap the > tab key I go one place, if I am in the footer and tap the tab key I go > another, if I am in the main part of the form I go a third, if I am in page1 > of the tab control I go another, if I am in page 2 of the form I go > another..... WHICH CONTROL WILL RECEIVE THE FOCUS IF I TAP THE TAB KEY? > > To complicate matters further, just because a control has tab index set to 0 > doesn't mean it can get the focus. It may be invisible, it may be disabled, > or it may simply have it's property that allows it to be "tabbed into" set > to false. My question is... > > How do I determine WHICH control would get the focus if the tab key were > tapped? The answer varies depending on whether there are tabs (if so which > tab is currently selected?), whether the current focus is in the header / > footer / body of the form, etc. UGLY question, and Access is no help at all > determining the answer (AFAICT). > > This is one of those "the stupid bastards know the answer" (the tab key > works doesn't it?) but they don't expose the answer to me so I can set the > focus to that control using SomeControl.SetFocus syntax. > > JWC. > > -----Original Message----- > From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com] > Sent: Tuesday, July 20, 2004 11:34 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] moving focus off the tab page > > > John: > > Why can't you use the _Open event of the form to se the focus to the desired > control? > > Rocky > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From sgeller at cce.umn.edu Tue Jul 20 13:04:39 2004 From: sgeller at cce.umn.edu (Susan Geller) Date: Tue, 20 Jul 2004 13:04:39 -0500 Subject: [AccessD] Problems with Date() Message-ID: The problem was a missing reference which I discovered thanks to other replies to my post, but Now() did work even with the missing reference. I solved the problem by unchecking the missing reference from the reference list -- it wasn't needed anyway. Thanks! --Susan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Brosdorf Sent: Tuesday, July 20, 2004 3:12 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Problems with Date() Try using Now() instead of Date() and set the display format of the textbox to one the built-in date formats. Michael -----Ursprungliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von Susan Geller Gesendet: Montag, 19. Juli 2004 23:38 An: accessd at databaseadvisors.com Betreff: [AccessD] Problems with Date() I have a bunch of reports which are really letters and I want them to have today's date on them when it's run. No problem. I put a textbox on the report and set the control source as "=Date()". Works fine on my machine. Doesn't work on other machines. I have a very different set up than the other machines so I don't even know where to look. Any ideas on what might be causing the report to pop up with a dialogue box saying "Enter Date" (as if I was asking for an input parameter) when I run the report? Note: Office XP, 2002 file format. --Susan Susan B. Geller Office of Information Systems College of Continuing Education University of Minnesota 306 Wesbrook Hall 77 Pleasant Street SE Minneapolis, MN 55455 Phone: 612-626-4785 Fax: 612-625-2568 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Tue Jul 20 13:08:38 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Tue, 20 Jul 2004 14:08:38 -0400 Subject: [AccessD] Average ages Message-ID: This should be simple...I think I am just missing something simple (and probably dumb). I have a query that has the following fields: Client Name: UCase([txtLastName] & ", " & [txtFirstName]) xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) kSubContID lnkClient CareGiver (Criteria: True) DatEntry (Criteria: >=#04/01/04#) The SQL looks like this: SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, tblClient.datEntry FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = tblSubConts.lnkClient WHERE (((tblSubConts.CareGiver)=True) AND ((tblClient.datEntry)>=#4/1/2004#)) ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), tblClient.datEntry; How do I get an average age for all of my clients in this query? I think I could muddle through this easier in a report or form, but I just needed a number, and I tried using the 'Totals' section for the query and choosing 'Avg' for the 'xAge' field. This does not seem to work though. John W. Clark Computer Programmer Niagara County Central Data Processing From DWUTKA at marlow.com Tue Jul 20 13:19:41 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 20 Jul 2004 13:19:41 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB158@main2.marlow.com> Line wrap! In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to the end of that line, and hit delete, which should bring Name].... back up into that line. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Tuesday, July 20, 2004 11:56 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] update query - question#1 :( fooey, it didn't work. Asks me for a parameter value. I copy/pasted your SQL statement: http://www.babcockancestry.com/storage/accesscemeteries1.jpg and went to the design view to look at how that parsed out http://www.babcockancestry.com/storage/accesscemeteries2.jpg then ran it and got this: http://www.babcockancestry.com/storage/accesscemeteries3.jpg On a side note, before I pasted the SQL statement, the default was UPDATE tblCemeteries4Updating SET; I tried adding the ; after SET in your statement but that gave a syntax error, so I don't know what that is about. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Monday, July 19, 2004 1:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > UPDATE tblCemeteries4Updating SET > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > Trim(Mid([ > Name],InStr([Name],",")+1)) > > That should do it! (No other querries necessary) > > Drew > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Monday, July 19, 2004 2:33 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] update query - question#1 > > > I have a table named > tblCemeteries4Updating > The pertinant fields are: > Name > Surname > FirstName > MarrName > > Query #1 > Name currently has (for example) > WESTWATER, John Ovenstone > I want to update this table to put Westwater (initial letter cap > only, rest > smalls) into the Surname field and John Ovenstone in the FirstName field. > I know I have to first make a query with the fields in it, and then change > it to an update query. That gives me the grid boxes for "Update To" and > "Criteria" but I'm not sure what to type in them. > > After that is done, I have another update, but I think I'll do one at a > time. Maybe with the answer to this one, I might be able to figure out the > other one, though the other one involves two tables, so I might be back. > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 20 13:24:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 20 Jul 2004 20:24:24 +0200 Subject: [AccessD] Average ages In-Reply-To: References: Message-ID: <14642124421.20040720202424@cactus.dk> Hi John > This should be simple...I think I am just missing something simple (and > probably dumb). Yes, but you need to Group By no field and only Select Avg(Age). If you use your XAge, all Nulls count as Zero age which obstructs the average completely. /gustav > I have a query that has the following fields: > Client Name: UCase([txtLastName] & ", " & [txtFirstName]) > xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) > kSubContID > lnkClient > CareGiver (Criteria: True) > DatEntry (Criteria: >=#04/01/04#) > The SQL looks like this: > SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], > IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, > tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, > tblClient.datEntry > FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = > tblSubConts.lnkClient > WHERE (((tblSubConts.CareGiver)=True) AND > ((tblClient.datEntry)>=#4/1/2004#)) > ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), > tblClient.datEntry; > How do I get an average age for all of my clients in this query? I > think I could muddle through this easier in a report or form, but I just > needed a number, and I tried using the 'Totals' section for the query > and choosing 'Avg' for the 'xAge' field. This does not seem to work > though. > John W. Clark > Computer Programmer > Niagara County > Central Data Processing From stephen at bondsoftware.co.nz Tue Jul 20 14:12:13 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Wed, 21 Jul 2004 07:12:13 +1200 Subject: [AccessD] Append Query Message-ID: <70F3D727890C784291D8433E9C418F290887CE@server.bondsoftware.co.nz> Thank you Gustav and Bert-Jan. The brain was a bit constipated last night. Stephen From artful at rogers.com Tue Jul 20 15:31:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Tue, 20 Jul 2004 16:31:50 -0400 Subject: [AccessD] Dlookup syntax Message-ID: <003601c46e98$963226d0$6601a8c0@rock> I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur From kathrynatgwens at socal.rr.com Tue Jul 20 15:29:49 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Tue, 20 Jul 2004 13:29:49 -0700 Subject: [AccessD] update query - question#1 In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB158@main2.marlow.com> Message-ID: That did it, thanks. I'll work on the next part and post any problems another time. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, July 20, 2004 11:20 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > Line wrap! > > In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to > the end of that line, and hit delete, which should bring Name].... back up > into that line. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Tuesday, July 20, 2004 11:56 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] update query - question#1 > > > :( fooey, it didn't work. Asks me for a parameter value. > I copy/pasted your SQL statement: > http://www.babcockancestry.com/storage/accesscemeteries1.jpg > and went to the design view to look at how that parsed out > http://www.babcockancestry.com/storage/accesscemeteries2.jpg > then ran it and got this: > http://www.babcockancestry.com/storage/accesscemeteries3.jpg > > On a side note, before I pasted the SQL statement, the default was > UPDATE tblCemeteries4Updating SET; > I tried adding the ; after SET in your statement but that gave a syntax > error, so I don't know what that is about. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Monday, July 19, 2004 1:08 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] update query - question#1 > > > > > > UPDATE tblCemeteries4Updating SET > > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > > Trim(Mid([ > > Name],InStr([Name],",")+1)) > > > > That should do it! (No other querries necessary) > > > > Drew > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Monday, July 19, 2004 2:33 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] update query - question#1 > > > > > > I have a table named > > tblCemeteries4Updating > > The pertinant fields are: > > Name > > Surname > > FirstName > > MarrName > > > > Query #1 > > Name currently has (for example) > > WESTWATER, John Ovenstone > > I want to update this table to put Westwater (initial letter cap > > only, rest > > smalls) into the Surname field and John Ovenstone in the > FirstName field. > > I know I have to first make a query with the fields in it, and > then change > > it to an update query. That gives me the grid boxes for "Update To" and > > "Criteria" but I'm not sure what to type in them. > > > > After that is done, I have another update, but I think I'll do one at a > > time. Maybe with the answer to this one, I might be able to > figure out the > > other one, though the other one involves two tables, so I might be back. > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Tue Jul 20 15:41:17 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 20 Jul 2004 13:41:17 -0700 Subject: [AccessD] Dlookup syntax Message-ID: You either need to dim X as a variant or use an Nz function around Dlookup. Integers aren't especially fond of being set to Null, which is what Dlookup returns if there is no matching value. Charlotte Foust -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Tuesday, July 20, 2004 12:32 PM To: AccessD Subject: [AccessD] Dlookup syntax I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From CMackin at Quiznos.com Tue Jul 20 15:55:43 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Tue, 20 Jul 2004 14:55:43 -0600 Subject: [AccessD] Dlookup syntax Message-ID: Personally I find SQL strings a lot easier to read than any of the Lookup functions. I use this and pass it a SQL string, returns the first value in the first field of the SQL statement. It will return a Null when nothing is returned..... Public Function CLookup(strSQL As String) As Variant Dim rst As ADODB.Recordset Set rst = New ADODB.Recordset rst.Open strSQL, CurrentProject.Connection, adOpenStatic If rst.EOF Then CLookup = Null Else rst.MoveFirst CLookup = rst(0) End If rst.Close Set rst = Nothing End Function -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Arthur Fuller Sent: Tuesday, July 20, 2004 2:32 PM To: AccessD Subject: [AccessD] Dlookup syntax I can't remember how to format this! Bloddy L. The second thing to go is memory. I forget what the first is. Dim s as string Dim x as Integer Dim d as Date d = Date() X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") Doesn't seem to work. What should I be doing instead? TIA, Arthur -- _______________________________________________ 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 Jul 20 15:56:25 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 20 Jul 2004 21:56:25 +0100 Subject: [AccessD] Dlookup syntax In-Reply-To: <003601c46e98$963226d0$6601a8c0@rock> Message-ID: <000001c46e9c$0531cd80$b274d0d5@minster33c3r25> Arthur How's it failing? May be worth trying: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & Format(d,"mm/dd/yy") & "#") Or, as Charlotte suggests: X = Nz(Dlookup("myColumn", "myTable", "myDateColumn=#" & Format(d,"mm/dd/yy") & "#"),0) -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Arthur Fuller > Sent: 20 July 2004 21:32 > To: AccessD > Subject: [AccessD] Dlookup syntax > > > I can't remember how to format this! Bloddy L. The second > thing to go is memory. I forget what the first is. > > Dim s as string > Dim x as Integer > Dim d as Date > > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > > Doesn't seem to work. What should I be doing instead? > > TIA, > Arthur > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From DWUTKA at marlow.com Tue Jul 20 17:54:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 20 Jul 2004 17:54:19 -0500 Subject: [AccessD] update query - question#1 Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB163@main2.marlow.com> Okay, glad to help. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Tuesday, July 20, 2004 3:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] update query - question#1 That did it, thanks. I'll work on the next part and post any problems another time. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Tuesday, July 20, 2004 11:20 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] update query - question#1 > > > Line wrap! > > In the design view, it shows Trim(Mid([ and that's it. In the SQL, go to > the end of that line, and hit delete, which should bring Name].... back up > into that line. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Tuesday, July 20, 2004 11:56 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] update query - question#1 > > > :( fooey, it didn't work. Asks me for a parameter value. > I copy/pasted your SQL statement: > http://www.babcockancestry.com/storage/accesscemeteries1.jpg > and went to the design view to look at how that parsed out > http://www.babcockancestry.com/storage/accesscemeteries2.jpg > then ran it and got this: > http://www.babcockancestry.com/storage/accesscemeteries3.jpg > > On a side note, before I pasted the SQL statement, the default was > UPDATE tblCemeteries4Updating SET; > I tried adding the ; after SET in your statement but that gave a syntax > error, so I don't know what that is about. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Monday, July 19, 2004 1:08 PM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] update query - question#1 > > > > > > UPDATE tblCemeteries4Updating SET > > [Surname]=strConv(Left([Name],inStr([Name],",")-1),3),[FirstName]= > > Trim(Mid([ > > Name],InStr([Name],",")+1)) > > > > That should do it! (No other querries necessary) > > > > Drew > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Monday, July 19, 2004 2:33 PM > > To: accessd at databaseadvisors.com > > Subject: [AccessD] update query - question#1 > > > > > > I have a table named > > tblCemeteries4Updating > > The pertinant fields are: > > Name > > Surname > > FirstName > > MarrName > > > > Query #1 > > Name currently has (for example) > > WESTWATER, John Ovenstone > > I want to update this table to put Westwater (initial letter cap > > only, rest > > smalls) into the Surname field and John Ovenstone in the > FirstName field. > > I know I have to first make a query with the fields in it, and > then change > > it to an update query. That gives me the grid boxes for "Update To" and > > "Criteria" but I'm not sure what to type in them. > > > > After that is done, I have another update, but I think I'll do one at a > > time. Maybe with the answer to this one, I might be able to > figure out the > > other one, though the other one involves two tables, so I might be back. > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From connie.kamrowski at agric.nsw.gov.au Tue Jul 20 20:25:33 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Wed, 21 Jul 2004 11:25:33 +1000 Subject: [AccessD] WindowsXP not recognising api Call Message-ID: Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From thevigil at kabelfoon.nl Wed Jul 21 02:54:22 2004 From: thevigil at kabelfoon.nl (Bert-Jan Brinkhuis) Date: Wed, 21 Jul 2004 09:54:22 +0200 Subject: [AccessD] Class modules References: <05C61C52D7CAD211A7830008C7DF6F1079BD80@DISABILITYINS01> Message-ID: <000b01c46ef7$f176f8e0$3f412d3e@jester> Thanks for the responses. I'll check into the newsletters, especcialy july 2001 And maybe John's articles on framework and the code will help me understand them too. I did read Getz ADH, but couldn't understand it/// ;-) But the spinclass module example i didn't read. Maybe i have to 'study' ADH better... ;-) Bert-Jan ----- Original Message ----- From: "Colby, John" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 20, 2004 3:36 PM Subject: RE: [AccessD] Class modules > >You will find a great set of instructions from Master John Colby. > > ROTFL. Master? > > You can go also to my site to find a series of articles on using a > framework, which is all about classes. > > Click the C2DbFW3G button. > > John W. Colby > > www.colbyconsulting.com > > -----Original Message----- > From: John Bartow [mailto:john at winhaven.net] > Sent: Tuesday, July 20, 2004 9:23 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Claas modules > > > Bert-Jan > I second on Gustav's response. > > I think the best resource you're going to find on class modules is right > here. Read through the newsletters, then start discussing it with the class > module gurus on this list. > > For really advanced class module usage go to the archives and search for > "Framework Discussion" during the month of March this year. You will find a > great set of instructions from Master John Colby. > > John B. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Tuesday, July 20, 2004 5:11 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Claas modules > > > Hi Bert-Jan > > Have you studied the work from our own listmembers? > > Have a look here: > > http://www.databaseadvisors.com/newsletters.htm > > Look up July 2001 and: > > "An Introduction to Class Modules (by John Colby)" > > Much more stuff in these newsletters by the way. > > /gustav > > > > I have written several functions in modules. And used several class > modules > > and can follow the code to see what it is doing, but i still do not > > understand class modules... ;-( I have several books about programming in > > access and they (try) to explain class modules but i do not understand > > it...... so i am unable to write them myself.... > > > I feel i am missing out a lot of the fun of access and ofcourse of its > > functionality! > > > Does anyone know a good document/book/website explaining how to make and > > understand class modules? > > > Thanks in advance. > > > Bert-Jan > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 21 03:56:36 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 10:56:36 +0200 Subject: [AccessD] Dlookup syntax In-Reply-To: <003601c46e98$963226d0$6601a8c0@rock> References: <003601c46e98$963226d0$6601a8c0@rock> Message-ID: <1976438147.20040721105636@cactus.dk> Hi Arthur The syntax is OK. The expression, however, must contain the usual US formatted date(time) string: strDate = Format(d, "mm\/dd\/yyyy") Then: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & strDate & "#") And, as Charlotte points out, always take care of a possible Null return from DLookup(). /gustav > I can't remember how to format this! Bloddy L. The second thing to go is > memory. I forget what the first is. > Dim s as string > Dim x as Integer > Dim d as Date > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > Doesn't seem to work. What should I be doing instead? > TIA, > Arthur From dwaters at usinternet.com Wed Jul 21 07:50:42 2004 From: dwaters at usinternet.com (Dan Waters) Date: Wed, 21 Jul 2004 07:50:42 -0500 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <16679441.1090373375236.JavaMail.root@sniper4.usinternet.com> Message-ID: <000401c46f21$55b25150$de1811d8@danwaters> Connie, I use the code I downloaded from Candace Tripp's website for this. It's been a while, but I remember that she has separate downloads for these operating systems, and that the code is slightly different, although I didn't understand the differences. I use the code as is on Windows XP PC's, and it works. Look at www.candace-tripp.com. Good Luck! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, July 20, 2004 8:26 PM To: accessd at databaseadvisors.com Subject: [AccessD] WindowsXP not recognising api Call Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jul 21 09:00:24 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 16:00:24 +0200 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <000401c46f21$55b25150$de1811d8@danwaters> References: <000401c46f21$55b25150$de1811d8@danwaters> Message-ID: <15824666248.20040721160024@cactus.dk> Hi Dan the Monkey (ape call?) You probably need to set these values of the OFN structure: .strCustomFilter = String(255, 0) .nMaxCustFilter = 255 If that works, could you please report if these settings work with Win9x too? /gustav > I use the code I downloaded from Candace Tripp's website for this. It's > been a while, but I remember that she has separate downloads for these > operating systems, and that the code is slightly different, although I > didn't understand the differences. I use the code as is on Windows XP PC's, > and it works. > Look at www.candace-tripp.com. > Good Luck! > Dan Waters > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > connie.kamrowski at agric.nsw.gov.au > Sent: Tuesday, July 20, 2004 8:26 PM > To: accessd at databaseadvisors.com > Subject: [AccessD] WindowsXP not recognising api Call > Ok further to last week I have been trying to find the problem with my > inherited app. The api call works fine on windows98 and when taken to > windows XP machines does not work. > It throws no errors just does not open the Windows Open Save dialog box. > The code is word for word to the Getz API call but when the XP machine > reaches the > If OpenFile Then > fResult = adh_apiGetOpenFileName(OFN) > Else > fResult = adh_apiGetSaveFileName(OFN) > End If > It does not open the dialogue box. Running the same code side by side on > the win98 machine I get the popup box every time. I have run a reference > checker and it says all references are OK. > The code is below if that helps. > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 > Function adhCommonFileOpenSave( _ > Optional ByRef Flags As Variant, _ > Optional ByVal InitialDir As Variant, _ > Optional ByVal Filter As Variant, _ > Optional ByVal FilterIndex As Variant, _ > Optional ByVal DefaultExt As Variant, _ > Optional ByVal FileName As Variant, _ > Optional ByVal DialogTitle As Variant, _ > Optional ByVal hwnd As Variant, _ > Optional ByVal OpenFile As Variant) As Variant > ' This is the entry point you'll use to call the common > ' file open/save dialog. The parameters are listed > ' below, and all are optional. > ' > ' From Access 97 Developer's Handbook > ' by Litwin, Getz and Gilbert. (Sybex) > ' Copyright 1997. All Rights Reserved. > ' > ' In: > ' Flags: one or more of the adhOFN_* constants, OR'd together. > ' InitialDir: the directory in which to first look > ' Filter: a set of file filters, set up by calling > ' AddFilterItem. See examples. > ' FilterIndex: 1-based integer indicating which filter > ' set to use, by default (1 if unspecified) > ' DefaultExt: Extension to use if the user doesn't enter one. > ' Only useful on file saves. > ' FileName: Default value for the file name text box. > ' DialogTitle: Title for the dialog. > ' OpenFile: Boolean(True=Open File/False=Save As) > ' Out: > ' Return Value: Either Null or the selected filename > Dim OFN As tagOPENFILENAME > Dim strFileName As String > Dim strFileTitle As String > Dim fResult As Boolean > ' Give the dialog a caption title. > 'If IsMissing(InitialDir) Then InitialDir = "" > If IsMissing(InitialDir) Then > InitialDir = CurDir > Else > If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir > End If > If IsMissing(Filter) Then Filter = "" > If IsMissing(FilterIndex) Then FilterIndex = 1 > If IsMissing(Flags) Then Flags = 0& > If IsMissing(DefaultExt) Then DefaultExt = "" > If IsMissing(FileName) Then FileName = "" > If IsMissing(DialogTitle) Then DialogTitle = "" > If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp > If IsMissing(OpenFile) Then OpenFile = True > ' Allocate string space for the returned strings. > strFileName = Left(FileName & String(256, 0), 256) > strFileTitle = String(256, 0) > ' Set up the data structure before you call the function > With OFN > .lStructSize = Len(OFN) > .hwndOwner = hwnd > .strFilter = Filter > .nFilterIndex = FilterIndex > .strFile = strFileName > .nMaxFile = Len(strFileName) > .strFileTitle = strFileTitle > .nMaxFileTitle = Len(strFileTitle) > .strTitle = DialogTitle > .Flags = Flags > .strDefExt = DefaultExt > '.strInitialDir = CurDir > .strInitialDir = InitialDir > ' Didn't think most people would want to deal with > ' these options. > .hInstance = 0 > .strCustomFilter = "" > .nMaxCustFilter = 0 > .lpfnHook = 0 > End With > ' This will pass the desired data structure to the > ' Windows API, which will in turn it uses to display > ' the Open/Save As Dialog. > If OpenFile Then > fResult = adh_apiGetOpenFileName(OFN) > Else > fResult = adh_apiGetSaveFileName(OFN) > End If > ' The function call filled in the strFileTitle member > ' of the structure. You'll have to write special code > ' to retrieve that if you're interested. > If fResult Then > ' You might care to check the Flags member of the > ' structure to get information about the chosen file. > ' In this example, if you bothered to pass in a > ' value for Flags, we'll fill it in with the outgoing > ' Flags value. > If Not IsMissing(Flags) Then Flags = OFN.Flags > adhCommonFileOpenSave = adhTrimNull(OFN.strFile) > msgbox adhCommonFileOpenSave > Else > adhCommonFileOpenSave = Null > End If > End Function > This message is intended for the addressee named and may contain > confidential information. If you are not the intended recipient or received > it in error, please delete the message and notify sender. Views expressed > are those of the individual sender and are not necessarily the views of > their organisation. From John.Clark at niagaracounty.com Wed Jul 21 09:57:42 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Wed, 21 Jul 2004 10:57:42 -0400 Subject: [AccessD] Average ages Message-ID: Well, don't I feel the fool?! Thanks Gustav...as usual you have enlightened me! I have never used the 'Totals' feature before. I had basically thought it it would put the 'answer' at the end of the query or something. Thanks again...take care! John W Clark >>> gustav at cactus.dk 7/20/2004 2:24:24 PM >>> Hi John > This should be simple...I think I am just missing something simple (and > probably dumb). Yes, but you need to Group By no field and only Select Avg(Age). If you use your XAge, all Nulls count as Zero age which obstructs the average completely. /gustav > I have a query that has the following fields: > Client Name: UCase([txtLastName] & ", " & [txtFirstName]) > xAge: IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) > kSubContID > lnkClient > CareGiver (Criteria: True) > DatEntry (Criteria: >=#04/01/04#) > The SQL looks like this: > SELECT UCase([txtLastName] & ", " & [txtFirstName]) AS [Client Name], > IIf(IsNull([datDOB]),0,Age([tblClient]![datDOB])) AS xAge, > tblSubConts.kSubContID, tblSubConts.lnkClient, tblSubConts.CareGiver, > tblClient.datEntry > FROM tblClient INNER JOIN tblSubConts ON tblClient.kClientID = > tblSubConts.lnkClient > WHERE (((tblSubConts.CareGiver)=True) AND > ((tblClient.datEntry)>=#4/1/2004#)) > ORDER BY UCase([txtLastName] & ", " & [txtFirstName]), > tblClient.datEntry; > How do I get an average age for all of my clients in this query? I > think I could muddle through this easier in a report or form, but I just > needed a number, and I tried using the 'Totals' section for the query > and choosing 'Avg' for the 'xAge' field. This does not seem to work > though. > John W. Clark > Computer Programmer > Niagara County > Central Data Processing -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Wed Jul 21 10:27:52 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Wed, 21 Jul 2004 08:27:52 -0700 Subject: [AccessD] WindowsXP not recognizing ape Call Message-ID: Windows 95 used 16-bit API calls. Win98 could handle those or 32 bit calls. Win NT and up only handle the 32-bit calls and the names of some of the libraries and the types of some of the arguments are different. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Wednesday, July 21, 2004 4:51 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] WindowsXP not recognizing ape Call Connie, I use the code I downloaded from Candace Tripp's website for this. It's been a while, but I remember that she has separate downloads for these operating systems, and that the code is slightly different, although I didn't understand the differences. I use the code as is on Windows XP PC's, and it works. Look at www.candace-tripp.com. Good Luck! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of connie.kamrowski at agric.nsw.gov.au Sent: Tuesday, July 20, 2004 8:26 PM To: accessd at databaseadvisors.com Subject: [AccessD] WindowsXP not recognising api Call Ok further to last week I have been trying to find the problem with my inherited app. The api call works fine on windows98 and when taken to windows XP machines does not work. It throws no errors just does not open the Windows Open Save dialog box. The code is word for word to the Getz API call but when the XP machine reaches the If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If It does not open the dialogue box. Running the same code side by side on the win98 machine I get the popup box every time. I have run a reference checker and it says all references are OK. The code is below if that helps. Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 Function adhCommonFileOpenSave( _ Optional ByRef Flags As Variant, _ Optional ByVal InitialDir As Variant, _ Optional ByVal Filter As Variant, _ Optional ByVal FilterIndex As Variant, _ Optional ByVal DefaultExt As Variant, _ Optional ByVal FileName As Variant, _ Optional ByVal DialogTitle As Variant, _ Optional ByVal hwnd As Variant, _ Optional ByVal OpenFile As Variant) As Variant ' This is the entry point you'll use to call the common ' file open/save dialog. The parameters are listed ' below, and all are optional. ' ' From Access 97 Developer's Handbook ' by Litwin, Getz and Gilbert. (Sybex) ' Copyright 1997. All Rights Reserved. ' ' In: ' Flags: one or more of the adhOFN_* constants, OR'd together. ' InitialDir: the directory in which to first look ' Filter: a set of file filters, set up by calling ' AddFilterItem. See examples. ' FilterIndex: 1-based integer indicating which filter ' set to use, by default (1 if unspecified) ' DefaultExt: Extension to use if the user doesn't enter one. ' Only useful on file saves. ' FileName: Default value for the file name text box. ' DialogTitle: Title for the dialog. ' OpenFile: Boolean(True=Open File/False=Save As) ' Out: ' Return Value: Either Null or the selected filename Dim OFN As tagOPENFILENAME Dim strFileName As String Dim strFileTitle As String Dim fResult As Boolean ' Give the dialog a caption title. 'If IsMissing(InitialDir) Then InitialDir = "" If IsMissing(InitialDir) Then InitialDir = CurDir Else If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir End If If IsMissing(Filter) Then Filter = "" If IsMissing(FilterIndex) Then FilterIndex = 1 If IsMissing(Flags) Then Flags = 0& If IsMissing(DefaultExt) Then DefaultExt = "" If IsMissing(FileName) Then FileName = "" If IsMissing(DialogTitle) Then DialogTitle = "" If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp If IsMissing(OpenFile) Then OpenFile = True ' Allocate string space for the returned strings. strFileName = Left(FileName & String(256, 0), 256) strFileTitle = String(256, 0) ' Set up the data structure before you call the function With OFN .lStructSize = Len(OFN) .hwndOwner = hwnd .strFilter = Filter .nFilterIndex = FilterIndex .strFile = strFileName .nMaxFile = Len(strFileName) .strFileTitle = strFileTitle .nMaxFileTitle = Len(strFileTitle) .strTitle = DialogTitle .Flags = Flags .strDefExt = DefaultExt '.strInitialDir = CurDir .strInitialDir = InitialDir ' Didn't think most people would want to deal with ' these options. .hInstance = 0 .strCustomFilter = "" .nMaxCustFilter = 0 .lpfnHook = 0 End With ' This will pass the desired data structure to the ' Windows API, which will in turn it uses to display ' the Open/Save As Dialog. If OpenFile Then fResult = adh_apiGetOpenFileName(OFN) Else fResult = adh_apiGetSaveFileName(OFN) End If ' The function call filled in the strFileTitle member ' of the structure. You'll have to write special code ' to retrieve that if you're interested. If fResult Then ' You might care to check the Flags member of the ' structure to get information about the chosen file. ' In this example, if you bothered to pass in a ' value for Flags, we'll fill it in with the outgoing ' Flags value. If Not IsMissing(Flags) Then Flags = OFN.Flags adhCommonFileOpenSave = adhTrimNull(OFN.strFile) msgbox adhCommonFileOpenSave Else adhCommonFileOpenSave = Null End If End Function This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 21 10:56:33 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 21 Jul 2004 17:56:33 +0200 Subject: [AccessD] WindowsXP not recognizing ape Call In-Reply-To: <15824666248.20040721160024@cactus.dk> References: <000401c46f21$55b25150$de1811d8@danwaters> <15824666248.20040721160024@cactus.dk> Message-ID: <4131635629.20040721175633@cactus.dk> Hi Dan Or you may simply comment this line out: ' .strCustomFilter = "" Again, I'm not sure how the code will run on Win9x. /gustav > Hi Dan the Monkey (ape call?) > You probably need to set these values of the OFN structure: > .strCustomFilter = String(255, 0) > .nMaxCustFilter = 255 > If that works, could you please report if these settings work with Win9x too? > /gustav >> I use the code I downloaded from Candace Tripp's website for this. It's >> been a while, but I remember that she has separate downloads for these >> operating systems, and that the code is slightly different, although I >> didn't understand the differences. I use the code as is on Windows XP PC's, >> and it works. >> Look at www.candace-tripp.com. >> Good Luck! >> Dan Waters >> -----Original Message----- >> From: accessd-bounces at databaseadvisors.com >> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >> connie.kamrowski at agric.nsw.gov.au >> Sent: Tuesday, July 20, 2004 8:26 PM >> To: accessd at databaseadvisors.com >> Subject: [AccessD] WindowsXP not recognising api Call >> Ok further to last week I have been trying to find the problem with my >> inherited app. The api call works fine on windows98 and when taken to >> windows XP machines does not work. >> It throws no errors just does not open the Windows Open Save dialog box. >> The code is word for word to the Getz API call but when the XP machine >> reaches the >> If OpenFile Then >> fResult = adh_apiGetOpenFileName(OFN) >> Else >> fResult = adh_apiGetSaveFileName(OFN) >> End If >> It does not open the dialogue box. Running the same code side by side on >> the win98 machine I get the popup box every time. I have run a reference >> checker and it says all references are OK. >> The code is below if that helps. >> Connie Kamrowski >> Analyst/Programmer >> Information Technology >> NSW Department of Primary Industries >> Orange >> Ph: 02 6391 3250 >> Fax:02 6391 3290 >> Function adhCommonFileOpenSave( _ >> Optional ByRef Flags As Variant, _ >> Optional ByVal InitialDir As Variant, _ >> Optional ByVal Filter As Variant, _ >> Optional ByVal FilterIndex As Variant, _ >> Optional ByVal DefaultExt As Variant, _ >> Optional ByVal FileName As Variant, _ >> Optional ByVal DialogTitle As Variant, _ >> Optional ByVal hwnd As Variant, _ >> Optional ByVal OpenFile As Variant) As Variant >> ' This is the entry point you'll use to call the common >> ' file open/save dialog. The parameters are listed >> ' below, and all are optional. >> ' >> ' From Access 97 Developer's Handbook >> ' by Litwin, Getz and Gilbert. (Sybex) >> ' Copyright 1997. All Rights Reserved. >> ' >> ' In: >> ' Flags: one or more of the adhOFN_* constants, OR'd together. >> ' InitialDir: the directory in which to first look >> ' Filter: a set of file filters, set up by calling >> ' AddFilterItem. See examples. >> ' FilterIndex: 1-based integer indicating which filter >> ' set to use, by default (1 if unspecified) >> ' DefaultExt: Extension to use if the user doesn't enter one. >> ' Only useful on file saves. >> ' FileName: Default value for the file name text box. >> ' DialogTitle: Title for the dialog. >> ' OpenFile: Boolean(True=Open File/False=Save As) >> ' Out: >> ' Return Value: Either Null or the selected filename >> Dim OFN As tagOPENFILENAME >> Dim strFileName As String >> Dim strFileTitle As String >> Dim fResult As Boolean >> ' Give the dialog a caption title. >> 'If IsMissing(InitialDir) Then InitialDir = "" >> If IsMissing(InitialDir) Then >> InitialDir = CurDir >> Else >> If Dir(InitialDir, vbDirectory) = "" Then InitialDir = CurDir >> End If >> If IsMissing(Filter) Then Filter = "" >> If IsMissing(FilterIndex) Then FilterIndex = 1 >> If IsMissing(Flags) Then Flags = 0& >> If IsMissing(DefaultExt) Then DefaultExt = "" >> If IsMissing(FileName) Then FileName = "" >> If IsMissing(DialogTitle) Then DialogTitle = "" >> If IsMissing(hwnd) Then hwnd = Application.hWndAccessApp >> If IsMissing(OpenFile) Then OpenFile = True >> ' Allocate string space for the returned strings. >> strFileName = Left(FileName & String(256, 0), 256) >> strFileTitle = String(256, 0) >> ' Set up the data structure before you call the function >> With OFN >> .lStructSize = Len(OFN) >> .hwndOwner = hwnd >> .strFilter = Filter >> .nFilterIndex = FilterIndex >> .strFile = strFileName >> .nMaxFile = Len(strFileName) >> .strFileTitle = strFileTitle >> .nMaxFileTitle = Len(strFileTitle) >> .strTitle = DialogTitle >> .Flags = Flags >> .strDefExt = DefaultExt >> '.strInitialDir = CurDir >> .strInitialDir = InitialDir >> ' Didn't think most people would want to deal with >> ' these options. >> .hInstance = 0 >> .strCustomFilter = "" >> .nMaxCustFilter = 0 >> .lpfnHook = 0 >> End With >> ' This will pass the desired data structure to the >> ' Windows API, which will in turn it uses to display >> ' the Open/Save As Dialog. >> If OpenFile Then >> fResult = adh_apiGetOpenFileName(OFN) >> Else >> fResult = adh_apiGetSaveFileName(OFN) >> End If >> ' The function call filled in the strFileTitle member >> ' of the structure. You'll have to write special code >> ' to retrieve that if you're interested. >> If fResult Then >> ' You might care to check the Flags member of the >> ' structure to get information about the chosen file. >> ' In this example, if you bothered to pass in a >> ' value for Flags, we'll fill it in with the outgoing >> ' Flags value. >> If Not IsMissing(Flags) Then Flags = OFN.Flags >> adhCommonFileOpenSave = adhTrimNull(OFN.strFile) >> msgbox adhCommonFileOpenSave >> Else >> adhCommonFileOpenSave = Null >> End If >> End Function From artful at rogers.com Wed Jul 21 11:48:15 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 12:48:15 -0400 Subject: [AccessD] Seconds Missing In-Reply-To: Message-ID: <017201c46f42$85072860$6601a8c0@rock> If it were I in your place, I would look instead at defaulting the datetime column in the SQL table to GetDate(), which will grab the system dateTime for you. Then you can direct your concerns to the data other than this column. I use this technique all the time and forget about the Access equivalents. What I care most about is when the row was inserted, so I'd leave it to SQL to determine that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Monday, July 19, 2004 9:18 AM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Seconds Missing Does it work if you enter a time including seconds directly into the linked table? If so, I would try to track down the problem using the Profiler from SQL Server. Run the append query while Profiler is running to find out what exactly is sent to the server. Comparing date/time-values is always a problem with Access and SQL-Server, because date and time are always stored as ONE number. I've come to the point where I explicitly convert any data/time-value to a string ("20041231", "1755") before I do the comparison. This way you can also solve the problems that might result from the different base-dates used in SQL Server and Access. Michael From artful at rogers.com Wed Jul 21 11:53:24 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 12:53:24 -0400 Subject: [AccessD] Date format problem In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E02739611@bocnte2k4.boc.chevrontexaco.net> Message-ID: <017301c46f43$3d3e46c0$6601a8c0@rock> Why not modulus the year with 100 and grab the modulo? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Tuesday, July 20, 2004 8:07 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Date format problem That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 artful at rogers.com Wed Jul 21 12:03:17 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 13:03:17 -0400 Subject: [AccessD] Dlookup syntax In-Reply-To: <1976438147.20040721105636@cactus.dk> Message-ID: <017501c46f44$9e3e0360$6601a8c0@rock> Thanks for the tips. What really puzzles me is that no matter what values I supply, the first call works and the second call fails. Bizarre! I'm still investigating. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Wednesday, July 21, 2004 4:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dlookup syntax Hi Arthur The syntax is OK. The expression, however, must contain the usual US formatted date(time) string: strDate = Format(d, "mm\/dd\/yyyy") Then: X = Dlookup("myColumn", "myTable", "myDateColumn=#" & strDate & "#") And, as Charlotte points out, always take care of a possible Null return from DLookup(). /gustav > I can't remember how to format this! Bloddy L. The second thing to go > is memory. I forget what the first is. > Dim s as string > Dim x as Integer > Dim d as Date > d = Date() > X = Dlookup("myColumn", "myTable", "myDateColumn=#" & d & "#") > Doesn't seem to work. What should I be doing instead? > TIA, > Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Wed Jul 21 12:18:22 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Wed, 21 Jul 2004 13:18:22 -0400 Subject: [AccessD] Date format problem Message-ID: ;) Be careful Arthur...you might introduce a programming bug for which there is no "catchy" name. We are all familiar with the millennium bug (every 1000 years), however your approach will only work through the year 9999. Unfortunately, the next catchy phrase in time scale terms will be the "Epoch bug" (for which there is no set timeframe, but is, at a minimum, 1 million years). Mark -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Wednesday, July 21, 2004 12:53 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Why not modulus the year with 100 and grab the modulo? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Tuesday, July 20, 2004 8:07 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Date format problem That would work but I only want the last 2 digits of the year. It needs to be that way to load into another program. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Perry Harold Sent: Monday, July 19, 2004 5:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Date format problem Try "yyyy" Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kaup, Chester A Sent: Monday, July 19, 2004 9:45 AM To: accessd at databaseadvisors.com Subject: [AccessD] Date format problem The following expression in a query returns 2004 Test:[Forms]![frm Select Date]![selected_year] The following expression returns 05 in a query Test:Format([Forms]![frm Select Date]![selected_year],"yy") I an confused as to what is happening here. Help please. Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 Drawbridge.Jack at ic.gc.ca Wed Jul 21 13:06:23 2004 From: Drawbridge.Jack at ic.gc.ca (Drawbridge.Jack at ic.gc.ca) Date: Wed, 21 Jul 2004 14:06:23 -0400 Subject: [AccessD] Claas modules Message-ID: <45C67756F7C0F942AD80AE35546F40C20DF7F62A@mb-bp-011.ic.gc.ca> See the following link for writeup by Jim DeMarco. It is very good. http://www.databaseadvisors.com/newletters/newsletter022002/0202ClassesForTh eMasses.htm Also check accessd for Class Modules , and for WithEvents People on accessd - John Colby and others have many interesting and helpful articles/messages and links. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bert-Jan Brinkhuis Sent: Tuesday, July 20, 2004 5:30 AM To: accessd at databaseadvisors.com Subject: [AccessD] Claas modules Hi all, I have written several functions in modules. And used several class modules and can follow the code to see what it is doing, but i still do not understand class modules... ;-( I have several books about programming in access and they (try) to explain class modules but i do not understand it...... so i am unable to write them myself.... I feel i am missing out a lot of the fun of access and ofcourse of its functionality! Does anyone know a good document/book/website explaining how to make and understand class modules? Thanks in advance. Bert-Jan -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mwp.reid at qub.ac.uk Wed Jul 21 16:57:46 2004 From: mwp.reid at qub.ac.uk (Martin Reid) Date: Wed, 21 Jul 2004 22:57:46 +0100 Subject: [AccessD] OT Ignore References: Message-ID: <001a01c46f6d$c2d98450$1c02a8c0@MARTINREID> Checking outside access From artful at rogers.com Wed Jul 21 18:48:01 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 21 Jul 2004 19:48:01 -0400 Subject: [AccessD] Treeview Problems Message-ID: <01d501c46f7d$28caf000$6601a8c0@rock> Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. TIA, Arthur From connie.kamrowski at agric.nsw.gov.au Wed Jul 21 19:00:26 2004 From: connie.kamrowski at agric.nsw.gov.au (connie.kamrowski at agric.nsw.gov.au) Date: Thu, 22 Jul 2004 10:00:26 +1000 Subject: [AccessD] Re: WindowsXP not recognizing ape Call -Solved. Message-ID: Gustav! That works perfectly, and also works in Win98. I would like to send you a bottle of good Australian wine for your trouble, but I don't know how it would travel. You have saved my sanity! I wonder if the not recognising Ape call was a problem for Tarzan Thankyou Connie Kamrowski Analyst/Programmer Information Technology NSW Department of Primary Industries Orange Ph: 02 6391 3250 Fax:02 6391 3290 This message is intended for the addressee named and may contain confidential information. If you are not the intended recipient or received it in error, please delete the message and notify sender. Views expressed are those of the individual sender and are not necessarily the views of their organisation. From lists at theopg.com Wed Jul 21 19:49:10 2004 From: lists at theopg.com (MarkH) Date: Thu, 22 Jul 2004 01:49:10 +0100 Subject: [AccessD] Treeview Problems In-Reply-To: <01d501c46f7d$28caf000$6601a8c0@rock> Message-ID: <000001c46f85$b39cfcc0$5e0d6bd5@netboxxp> Taking into account I'm on my third glass of wine and its real late... Not sure if I took it all in but I have a similar situation where for each node at a given level I want to create child nodes for all possible parameters etc. I make the index (key of the node) unique by combining the parameters (child) primary key with the parent nodes key. If I need to create relationships where none exist (i.e. to get all records etc.) I just create a dummy column in each query with the same value, e.g. "'asd' AS theKey" and join on that... Hth... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: 22 July 2004 00:48 To: AccessD Subject: [AccessD] Treeview Problems Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. TIA, Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Wed Jul 21 21:28:00 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 21 Jul 2004 22:28:00 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <000001c46f85$b39cfcc0$5e0d6bd5@netboxxp> Message-ID: <001501c46f93$8555e0d0$0201a8c0@COA3> Well, I had 6 beers (and counting) ... But ... Shouldn't this already exist? > table (OrderDetailTypes) with one of each OrderDetailType... > so that there's a combo when choosing the detail type upon entry? If its not in a table, isn't it then a DISTINCT query, not a union, to get a single list of all existing types? And, further, wouldn't your key be: type & customer, (I don't like multi-column pk either, but I see no other choice) so if Select * where customer =1 and type = 4 returns no records, there are no child rows to add. I haven't seen your cool code for treeviews, but you may be up against a situation where you have to customize something non-re-usable ... Going now for # 7 Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MarkH Sent: Wednesday, July 21, 2004 8:49 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Treeview Problems Taking into account I'm on my third glass of wine and its real late... Not sure if I took it all in but I have a similar situation where for each node at a given level I want to create child nodes for all possible parameters etc. I make the index (key of the node) unique by combining the parameters (child) primary key with the parent nodes key. If I need to create relationships where none exist (i.e. to get all records etc.) I just create a dummy column in each query with the same value, e.g. "'asd' AS theKey" and join on that... Hth... Mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: 22 July 2004 00:48 To: AccessD Subject: [AccessD] Treeview Problems Some of you may have read my stuff about data-driven treeviews. Lately I have run into a problem using my own code, and am looking for a graceful way out. If you've read or at least run the code, then you know that it reduces the population of any given level to a simple select statement, using a query, a table, a view or a UDF. However, my current problem is this: Let's suppose that you have parent table P and child table C, which references an FK F (i.e. OrderDetailType.... Assuming that there can be several types of OrderDetail, say CarRental, CampGroundSite, CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney Park, one of the most beautiful places in the world, so forgive my examples)). Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview Level 3 is all the possible order detail types. TV 4 is the detail types arranged under TV3. I.e. 1: ABC Company DEF Company 2: Order 123 from ABC Order 125 from ABC Order 126 from DEF Order 139 from DEF 3: CarRental CampGroundSite CanoeRental Etc. 4: Specific instances of CarRental, CampGroundSite, CanoeRental, etc. My code so far can handle levels 1 and 2 easily, one statement per level. The problem is at level 3. I want to populate the treeview at level 3 with all the order detail types (CarRental, CampGroundSite, CanoeRental, etc.) for each Order. It's a simple UNION query to do this, but where do I get the unique key? Generalizing my problem, I have a simple (and dare I say it pretty cool) way of populating the data-driven levels of a treeview. But that's insufficient for my current problem. I need to populate the OrderDetailTypes level with all possible order detail types and then sub-populate level 4 with the corresponding children. I'm at a loss how to achieve this. One way to do it, which would fall conveniently into my current scheme, is to populate a bridge table (OrderDetailTypes) with one of each OrderDetailType... But that sucks, IMO. It stores a bunch of data that is most of the time unnecessary. I HATE unnecessary detail! I'll go there if I have to, but it makes me gag. Generalizing the problem.... Given: code that can populate any tree-level with a simple select How to insert a level that is not data-driven or alternatively is data-driven but not with related FKs Treeview nodes insist upon unique keys (understandably so). But how should I manufacture said unique keys given that no physical rows correspond to them. Maybe the generalization is: how to relate a grandchild to a parent in the absence of parental data? That might be an incorrect phrasing, but that's what I mean. I hope that I have stated the problem clearly enough for you to follow the logic. If not, please reply for further clarification. Any suggestions much appreciated. 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 gustav at cactus.dk Thu Jul 22 03:10:44 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 10:10:44 +0200 Subject: [AccessD] Re: WindowsXP not recognizing ape Call -Solved. In-Reply-To: References: Message-ID: <1904040630.20040722101044@cactus.dk> Hi Connie Great! Now I can have the different code examples for the dialog cleaned up. Maybe I should go and get the bottle myself ... I've always wanted to visit Australia but never found the right occasion - now I have one reason more! /gustav > Gustav! > That works perfectly, and also works in Win98. > I would like to send you a bottle of good Australian wine for your trouble, > but I don't know how it would travel. You have saved my sanity! > I wonder if the not recognising Ape call was a problem for Tarzan > Thankyou > Connie Kamrowski > Analyst/Programmer > Information Technology > NSW Department of Primary Industries > Orange > Ph: 02 6391 3250 > Fax:02 6391 3290 From gustav at cactus.dk Thu Jul 22 03:26:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 10:26:59 +0200 Subject: [AccessD] Treeview Problems In-Reply-To: <01d501c46f7d$28caf000$6601a8c0@rock> References: <01d501c46f7d$28caf000$6601a8c0@rock> Message-ID: <735015471.20040722102659@cactus.dk> Hi Arthur Your problem is that the tree structure you aim for is not a true branching tree structure as you at level 3 wish to list all possible order detail types instead of those actually used. However, it could be easily solved; you don't even need a union query, you just need to - as you state - list all possible types, regardless if they are used or not (that means just list them). I guess it will break the system in your fancy tree code but you can justify that for yourself by remembering that the code was created for the clean tree structure. /gustav > Some of you may have read my stuff about data-driven treeviews. Lately I > have run into a problem using my own code, and am looking for a graceful > way out. > If you've read or at least run the code, then you know that it reduces > the population of any given level to a simple select statement, using a > query, a table, a view or a UDF. > However, my current problem is this: > Let's suppose that you have parent table P and child table C, which > references an FK F (i.e. OrderDetailType.... Assuming that there can be > several types of OrderDetail, say CarRental, CampGroundSite, > CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney > Park, one of the most beautiful places in the world, so forgive my > examples)). > Assume that Treeview level 1 is Customer. TV level 2 is Orders. Treeview > Level 3 is all the possible order detail types. TV 4 is the detail types > arranged under TV3. > I.e. > 1: > ABC Company > DEF Company > 2: > Order 123 from ABC > Order 125 from ABC > Order 126 from DEF > Order 139 from DEF > 3: > CarRental > CampGroundSite > CanoeRental > Etc. > 4: > Specific instances of CarRental, CampGroundSite, CanoeRental, etc. > My code so far can handle levels 1 and 2 easily, one statement per > level. > The problem is at level 3. I want to populate the treeview at level 3 > with all the order detail types (CarRental, CampGroundSite, CanoeRental, > etc.) for each Order. It's a simple UNION query to do this, but where do > I get the unique key? > Generalizing my problem, I have a simple (and dare I say it pretty cool) > way of populating the data-driven levels of a treeview. But that's > insufficient for my current problem. I need to populate the > OrderDetailTypes level with all possible order detail types and then > sub-populate level 4 with the corresponding children. I'm at a loss how > to achieve this. > One way to do it, which would fall conveniently into my current scheme, > is to populate a bridge table (OrderDetailTypes) with one of each > OrderDetailType... But that sucks, IMO. It stores a bunch of data that > is most of the time unnecessary. I HATE unnecessary detail! I'll go > there if I have to, but it makes me gag. > Generalizing the problem.... > Given: code that can populate any tree-level with a simple select > How to insert a level that is not data-driven or alternatively is > data-driven but not with related FKs > Treeview nodes insist upon unique keys (understandably so). But how > should I manufacture said unique keys given that no physical rows > correspond to them. > Maybe the generalization is: how to relate a grandchild to a parent in > the absence of parental data? That might be an incorrect phrasing, but > that's what I mean. > I hope that I have stated the problem clearly enough for you to follow > the logic. If not, please reply for further clarification. > Any suggestions much appreciated. > TIA, > Arthur From Drawbridge.Jack at ic.gc.ca Thu Jul 22 08:44:28 2004 From: Drawbridge.Jack at ic.gc.ca (Drawbridge.Jack at ic.gc.ca) Date: Thu, 22 Jul 2004 09:44:28 -0400 Subject: [AccessD] update query - question#1 Message-ID: <45C67756F7C0F942AD80AE35546F40C20DF7F62B@mb-bp-011.ic.gc.ca> Kathryn, Not sure if you have resolved this but here is SQL to try. Create a new query; go to SQL Mode and type this in. Then switch to Query Design and it will have the names and criteria. UPDATE tblCemeteries4Updating SET tblCemeteries4Updating.Surname = StrConv(Mid([Name],1,InStr([Name],",")-1),3) , tblCemeteries4Updating.FirstName = Mid([Name],InStr([Name],",")+1); If the format of Name always has the surName followed by a ",", then this should work. Good luck -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Monday, July 19, 2004 3:33 PM To: accessd at databaseadvisors.com Subject: [AccessD] update query - question#1 I have a table named tblCemeteries4Updating The pertinant fields are: Name Surname FirstName MarrName Query #1 Name currently has (for example) WESTWATER, John Ovenstone I want to update this table to put Westwater (initial letter cap only, rest smalls) into the Surname field and John Ovenstone in the FirstName field. I know I have to first make a query with the fields in it, and then change it to an update query. That gives me the grid boxes for "Update To" and "Criteria" but I'm not sure what to type in them. After that is done, I have another update, but I think I'll do one at a time. Maybe with the answer to this one, I might be able to figure out the other one, though the other one involves two tables, so I might be back. -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Thu Jul 22 09:56:13 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 10:56:13 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <735015471.20040722102659@cactus.dk> Message-ID: <02b601c46ffc$0860f470$6601a8c0@rock> Thanks for replying, Gustav. The part I'm having difficulty getting my head around is this. Suppose 4 levels in the tree: Customer Order All Possible Detail Types Specific Detail of type x My code can handle levels 1 and 2 with one statement each. No problem. Level 3 I can write with individual "Add" statements. But now what? How can I relate level 4, which should be as easily handled as levels 1 and 2, i.e. with one statement that mentions the parent key? I don't have a parent key, or maybe I do, but I can't see it. At the moment, I'm thinking that the only way to achieve what I want is to manufacture a bridge table called OrderDetailTypes and automatically add N rows to this every time a new Order is created. Such a solution makes my stomach turn, but at the moment I don't see another solution. Any advice appreciated, Arthur P.S. Thanks for the rationalization (justification) you offered. Next time I fight with my girl friend, I'll request more rationalizations :) -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 22, 2004 4:27 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Treeview Problems Hi Arthur Your problem is that the tree structure you aim for is not a true branching tree structure as you at level 3 wish to list all possible order detail types instead of those actually used. However, it could be easily solved; you don't even need a union query, you just need to - as you state - list all possible types, regardless if they are used or not (that means just list them). I guess it will break the system in your fancy tree code but you can justify that for yourself by remembering that the code was created for the clean tree structure. /gustav > Some of you may have read my stuff about data-driven treeviews. Lately > I have run into a problem using my own code, and am looking for a > graceful way out. > If you've read or at least run the code, then you know that it reduces > the population of any given level to a simple select statement, using > a query, a table, a view or a UDF. > However, my current problem is this: > Let's suppose that you have parent table P and child table C, which > references an FK F (i.e. OrderDetailType.... Assuming that there can > be several types of OrderDetail, say CarRental, CampGroundSite, > CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney > Park, one of the most beautiful places in the world, so forgive my > examples)). > Assume that Treeview level 1 is Customer. TV level 2 is Orders. > Treeview Level 3 is all the possible order detail types. TV 4 is the > detail types arranged under TV3. > I.e. > 1: > ABC Company > DEF Company > 2: > Order 123 from ABC > Order 125 from ABC > Order 126 from DEF > Order 139 from DEF > 3: > CarRental > CampGroundSite > CanoeRental > Etc. > 4: > Specific instances of CarRental, CampGroundSite, CanoeRental, etc. > My code so far can handle levels 1 and 2 easily, one statement per > level. > The problem is at level 3. I want to populate the treeview at level 3 > with all the order detail types (CarRental, CampGroundSite, > CanoeRental, > etc.) for each Order. It's a simple UNION query to do this, but where do > I get the unique key? > Generalizing my problem, I have a simple (and dare I say it pretty > cool) way of populating the data-driven levels of a treeview. But > that's insufficient for my current problem. I need to populate the > OrderDetailTypes level with all possible order detail types and then > sub-populate level 4 with the corresponding children. I'm at a loss > how to achieve this. > One way to do it, which would fall conveniently into my current > scheme, is to populate a bridge table (OrderDetailTypes) with one of > each OrderDetailType... But that sucks, IMO. It stores a bunch of data > that is most of the time unnecessary. I HATE unnecessary detail! I'll > go there if I have to, but it makes me gag. > Generalizing the problem.... > Given: code that can populate any tree-level with a simple select How > to insert a level that is not data-driven or alternatively is > data-driven but not with related FKs Treeview nodes insist upon unique > keys (understandably so). But how should I manufacture said unique > keys given that no physical rows correspond to them. > Maybe the generalization is: how to relate a grandchild to a parent in > the absence of parental data? That might be an incorrect phrasing, but > that's what I mean. > I hope that I have stated the problem clearly enough for you to follow > the logic. If not, please reply for further clarification. > Any suggestions much appreciated. > TIA, > Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Thu Jul 22 10:31:58 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 22 Jul 2004 10:31:58 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From gustav at cactus.dk Thu Jul 22 10:42:39 2004 From: gustav at cactus.dk (Gustav Brock) Date: Thu, 22 Jul 2004 17:42:39 +0200 Subject: [AccessD] Treeview Problems In-Reply-To: <02b601c46ffc$0860f470$6601a8c0@rock> References: <02b601c46ffc$0860f470$6601a8c0@rock> Message-ID: <6631155819.20040722174239@cactus.dk> Hi Arthur Yes I can see your problem at connecting level 3 and 4. Although your stomach may face a hard time I think that's a possible route, though you - as far as I can see - wouldn't need (to fill) a bridging table but could use a view or query where you bring the PK of the orderdetail record forward together with the list of all orderdetail types. Then you will at level 4 have that PK and all order types and can select any of these even if the picked combination doesn't carry any actual orderdetails of that type. I haven't your code at hand so I cannot verify if this is possible. /gustav > Thanks for replying, Gustav. The part I'm having difficulty getting my > head around is this. Suppose 4 levels in the tree: > Customer > Order > All Possible Detail Types > Specific Detail of type x > My code can handle levels 1 and 2 with one statement each. No problem. > Level 3 I can write with individual "Add" statements. But now what? How > can I relate level 4, which should be as easily handled as levels 1 and > 2, i.e. with one statement that mentions the parent key? I don't have a > parent key, or maybe I do, but I can't see it. > At the moment, I'm thinking that the only way to achieve what I want is > to manufacture a bridge table called OrderDetailTypes and automatically > add N rows to this every time a new Order is created. Such a solution > makes my stomach turn, but at the moment I don't see another solution. > Any advice appreciated, > Arthur > P.S. > Thanks for the rationalization (justification) you offered. Next time I > fight with my girl friend, I'll request more rationalizations :) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock > Sent: Thursday, July 22, 2004 4:27 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Treeview Problems > Hi Arthur > Your problem is that the tree structure you aim for is not a true > branching tree structure as you at level 3 wish to list all possible > order detail types instead of those actually used. > However, it could be easily solved; you don't even need a union query, > you just need to - as you state - list all possible types, regardless if > they are used or not (that means just list them). I guess it will break > the system in your fancy tree code but you can justify that for yourself > by remembering that the code was created for the clean tree structure. > /gustav >> Some of you may have read my stuff about data-driven treeviews. Lately >> I have run into a problem using my own code, and am looking for a >> graceful way out. >> If you've read or at least run the code, then you know that it reduces >> the population of any given level to a simple select statement, using >> a query, a table, a view or a UDF. >> However, my current problem is this: >> Let's suppose that you have parent table P and child table C, which >> references an FK F (i.e. OrderDetailType.... Assuming that there can >> be several types of OrderDetail, say CarRental, CampGroundSite, >> CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney >> Park, one of the most beautiful places in the world, so forgive my >> examples)). >> Assume that Treeview level 1 is Customer. TV level 2 is Orders. >> Treeview Level 3 is all the possible order detail types. TV 4 is the >> detail types arranged under TV3. >> I.e. >> 1: >> ABC Company >> DEF Company >> 2: >> Order 123 from ABC >> Order 125 from ABC >> Order 126 from DEF >> Order 139 from DEF >> 3: >> CarRental >> CampGroundSite >> CanoeRental >> Etc. >> 4: >> Specific instances of CarRental, CampGroundSite, CanoeRental, etc. >> My code so far can handle levels 1 and 2 easily, one statement per >> level. >> The problem is at level 3. I want to populate the treeview at level 3 >> with all the order detail types (CarRental, CampGroundSite, >> CanoeRental, >> etc.) for each Order. It's a simple UNION query to do this, but where > do >> I get the unique key? >> Generalizing my problem, I have a simple (and dare I say it pretty >> cool) way of populating the data-driven levels of a treeview. But >> that's insufficient for my current problem. I need to populate the >> OrderDetailTypes level with all possible order detail types and then >> sub-populate level 4 with the corresponding children. I'm at a loss >> how to achieve this. >> One way to do it, which would fall conveniently into my current >> scheme, is to populate a bridge table (OrderDetailTypes) with one of >> each OrderDetailType... But that sucks, IMO. It stores a bunch of data >> that is most of the time unnecessary. I HATE unnecessary detail! I'll >> go there if I have to, but it makes me gag. >> Generalizing the problem.... >> Given: code that can populate any tree-level with a simple select How >> to insert a level that is not data-driven or alternatively is >> data-driven but not with related FKs Treeview nodes insist upon unique >> keys (understandably so). But how should I manufacture said unique >> keys given that no physical rows correspond to them. >> Maybe the generalization is: how to relate a grandchild to a parent in >> the absence of parental data? That might be an incorrect phrasing, but >> that's what I mean. >> I hope that I have stated the problem clearly enough for you to follow >> the logic. If not, please reply for further clarification. >> Any suggestions much appreciated. >> TIA, >> Arthur From DWUTKA at marlow.com Thu Jul 22 10:55:48 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jul 2004 10:55:48 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB17B@main2.marlow.com> Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Thu Jul 22 11:01:02 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 22 Jul 2004 11:01:02 -0500 (CDT) Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <1976438147.20040721105636@cactus.dk> References: <003601c46e98$963226d0$6601a8c0@rock> <1976438147.20040721105636@cactus.dk> Message-ID: <2024.216.43.21.235.1090512062.squirrel@cetus.email.starband.net> Hi everyone! I'm not sure how to do this, or if it can even be done. Currently using Access 97 on WinXP. The application is a secured (through access workgroup/users) database front end. At this point, I have no customized toolbars or menus, just using the standard ones. The client has found that some of the users have messed with the toolbars (dragged them off to who knows where...) and afterwards can't get to them when they really do need them. I eventually plan to have customized toolbars and menubars for them, but this question will apply to them as well, even though they're not ready yet. Is there a way to lock the menubar and toolbar in place using vb code or some other way of automatically locking them? I know it can be done in Access on each workstation, but these pc's are all over the place and I don't want to tell their MIS that he has to go around to each computer and lock the toolbars in place. That would gain me MORE than just a dirty look. Explicit hand signals might be involved.... Any help would be greatly appreciated. TIA! Greg Smith gregsmith at starband.net From kaupca at chevrontexaco.com Thu Jul 22 11:13:57 2004 From: kaupca at chevrontexaco.com (Kaup, Chester A) Date: Thu, 22 Jul 2004 11:13:57 -0500 Subject: [AccessD] Restrict data entry from form into table Message-ID: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> I have a form for data entry into a table. The first field, date, is automatically filled in from a selection on another form. The second field is a drop down list box. The third field is to enter a numeric value. For any given date I need to let the user only select a particular item from the drop down list in the second field once. Is this possible through indexing or some other method? I am drawing a blank here. Thanks Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced. From BBarabash at TappeConstruction.com Thu Jul 22 11:36:53 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Thu, 22 Jul 2004 11:36:53 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB0865065850@tccexch01.tappeconstruction.net> Hmm... Just did a PlanetSourceCode.com search on named pipes, and received 3 hits. Guess which one I downloaded? Hint: http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=40065& lngWId=1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, July 22, 2004 10:56 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Network registry? Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From artful at rogers.com Thu Jul 22 12:06:50 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 13:06:50 -0400 Subject: [AccessD] Treeview Problems In-Reply-To: <6631155819.20040722174239@cactus.dk> Message-ID: <02e201c4700e$47a909d0$6601a8c0@rock> Thanks! I think you may be onto something here. There's no reason that a view can't be a relational multiplication. The trick is going to be devising the unique keys of its rows, and relating those to level 4, but I think that I can pull that off. Thanks again for the pointer! Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Thursday, July 22, 2004 11:43 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Treeview Problems Hi Arthur Yes I can see your problem at connecting level 3 and 4. Although your stomach may face a hard time I think that's a possible route, though you - as far as I can see - wouldn't need (to fill) a bridging table but could use a view or query where you bring the PK of the orderdetail record forward together with the list of all orderdetail types. Then you will at level 4 have that PK and all order types and can select any of these even if the picked combination doesn't carry any actual orderdetails of that type. I haven't your code at hand so I cannot verify if this is possible. /gustav > Thanks for replying, Gustav. The part I'm having difficulty getting my > head around is this. Suppose 4 levels in the tree: > Customer > Order > All Possible Detail Types > Specific Detail of type x > My code can handle levels 1 and 2 with one statement each. No problem. > Level 3 I can write with individual "Add" statements. But now what? > How can I relate level 4, which should be as easily handled as levels > 1 and 2, i.e. with one statement that mentions the parent key? I don't > have a parent key, or maybe I do, but I can't see it. > At the moment, I'm thinking that the only way to achieve what I want > is to manufacture a bridge table called OrderDetailTypes and > automatically add N rows to this every time a new Order is created. > Such a solution makes my stomach turn, but at the moment I don't see > another solution. > Any advice appreciated, > Arthur > P.S. > Thanks for the rationalization (justification) you offered. Next time > I fight with my girl friend, I'll request more rationalizations :) > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav > Brock > Sent: Thursday, July 22, 2004 4:27 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Treeview Problems > Hi Arthur > Your problem is that the tree structure you aim for is not a true > branching tree structure as you at level 3 wish to list all possible > order detail types instead of those actually used. > However, it could be easily solved; you don't even need a union query, > you just need to - as you state - list all possible types, regardless > if they are used or not (that means just list them). I guess it will > break the system in your fancy tree code but you can justify that for > yourself by remembering that the code was created for the clean tree > structure. > /gustav >> Some of you may have read my stuff about data-driven treeviews. >> Lately >> I have run into a problem using my own code, and am looking for a >> graceful way out. >> If you've read or at least run the code, then you know that it >> reduces >> the population of any given level to a simple select statement, using >> a query, a table, a view or a UDF. >> However, my current problem is this: >> Let's suppose that you have parent table P and child table C, which >> references an FK F (i.e. OrderDetailType.... Assuming that there can >> be several types of OrderDetail, say CarRental, CampGroundSite, >> CanoeRental, etc. ((hey, it's summer and I need to revisit Killarney >> Park, one of the most beautiful places in the world, so forgive my >> examples)). >> Assume that Treeview level 1 is Customer. TV level 2 is Orders. >> Treeview Level 3 is all the possible order detail types. TV 4 is the >> detail types arranged under TV3. >> I.e. >> 1: >> ABC Company >> DEF Company >> 2: >> Order 123 from ABC >> Order 125 from ABC >> Order 126 from DEF >> Order 139 from DEF >> 3: >> CarRental >> CampGroundSite >> CanoeRental >> Etc. >> 4: >> Specific instances of CarRental, CampGroundSite, CanoeRental, etc. >> My code so far can handle levels 1 and 2 easily, one statement per >> level. >> The problem is at level 3. I want to populate the treeview at level 3 >> with all the order detail types (CarRental, CampGroundSite, >> CanoeRental, >> etc.) for each Order. It's a simple UNION query to do this, but where > do >> I get the unique key? >> Generalizing my problem, I have a simple (and dare I say it pretty >> cool) way of populating the data-driven levels of a treeview. But >> that's insufficient for my current problem. I need to populate the >> OrderDetailTypes level with all possible order detail types and then >> sub-populate level 4 with the corresponding children. I'm at a loss >> how to achieve this. >> One way to do it, which would fall conveniently into my current >> scheme, is to populate a bridge table (OrderDetailTypes) with one of >> each OrderDetailType... But that sucks, IMO. It stores a bunch of data >> that is most of the time unnecessary. I HATE unnecessary detail! I'll >> go there if I have to, but it makes me gag. >> Generalizing the problem.... >> Given: code that can populate any tree-level with a simple select How >> to insert a level that is not data-driven or alternatively is >> data-driven but not with related FKs Treeview nodes insist upon unique >> keys (understandably so). But how should I manufacture said unique >> keys given that no physical rows correspond to them. >> Maybe the generalization is: how to relate a grandchild to a parent in >> the absence of parental data? That might be an incorrect phrasing, but >> that's what I mean. >> I hope that I have stated the problem clearly enough for you to >> follow >> the logic. If not, please reply for further clarification. >> Any suggestions much appreciated. >> TIA, >> Arthur -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Thu Jul 22 13:01:16 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Thu, 22 Jul 2004 11:01:16 -0700 Subject: [AccessD] Restrict data entry from form into table References: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> Message-ID: <00f601c47015$e29bec30$6601a8c0@HAL9002> Chester: Instead of datasheet view use continuous form. Then you can set the Enabled and Locked properties of each field individually. HTH Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Kaup, Chester A" To: Sent: Thursday, July 22, 2004 9:13 AM Subject: [AccessD] Restrict data entry from form into table I have a form for data entry into a table. The first field, date, is automatically filled in from a selection on another form. The second field is a drop down list box. The third field is to enter a numeric value. For any given date I need to let the user only select a particular item from the drop down list in the second field once. Is this possible through indexing or some other method? I am drawing a blank here. Thanks Chester Kaup Information Management Technician IT-MidContinent/MidContinent Business Unit CTN 8-687-7415 Outside 432-687-7414 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 Thu Jul 22 13:04:12 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 11:04:12 -0700 Subject: [AccessD] Toolbar/Menubar Locking Message-ID: One of the properties of the individual toolbar/menubars is Allow Customizing and another is Allow Moving. If both of those are turned off for each toolbar/menubar that should stop the users from shooting themselves in the foot, at least in your application. Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Thursday, July 22, 2004 8:01 AM To: accessd at databaseadvisors.com Subject: [AccessD] Toolbar/Menubar Locking Hi everyone! I'm not sure how to do this, or if it can even be done. Currently using Access 97 on WinXP. The application is a secured (through access workgroup/users) database front end. At this point, I have no customized toolbars or menus, just using the standard ones. The client has found that some of the users have messed with the toolbars (dragged them off to who knows where...) and afterwards can't get to them when they really do need them. I eventually plan to have customized toolbars and menubars for them, but this question will apply to them as well, even though they're not ready yet. Is there a way to lock the menubar and toolbar in place using vb code or some other way of automatically locking them? I know it can be done in Access on each workstation, but these pc's are all over the place and I don't want to tell their MIS that he has to go around to each computer and lock the toolbars in place. That would gain me MORE than just a dirty look. Explicit hand signals might be involved.... Any help would be greatly appreciated. TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 22 13:15:31 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 22 Jul 2004 13:15:31 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB17E@main2.marlow.com> LOL. Those classes are pretty easy to use. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 11:37 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? Hmm... Just did a PlanetSourceCode.com search on named pipes, and received 3 hits. Guess which one I downloaded? Hint: http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=40065& lngWId=1 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Thursday, July 22, 2004 10:56 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] OT: Network registry? Along the lines of the window service, I would recommend going with Named Pipes. They're pretty easy to setup, and they're fast. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash Sent: Thursday, July 22, 2004 10:32 AM To: Access Developers discussion and problem solving Subject: [AccessD] OT: Network registry? Here's the problem. I have an encrypted piece of information that I want to share with every computer in my network (~70 machines). This information can change at any time so it would be difficult to store it locally on each workstation. Currently I am storing this information in an INI file on a network share, which causes a series of problems: - I need to hard code the INI file location in the code accessing the data. If the file location changes, I would need to update all of the workstations. - All users accessing this file need the appropriate file permissions. There really isn't a single network location that ALL users in this building access. I was thinking of writing a Windows service that could run on one of the servers, that could monitor incoming requests from client workstations, and return the encrypted data. That way, one would only need to know the local IP address of the server, which is unlikely to change. Any other ideas? Brett Barabash Lead Software Developer Tappe Construction, Co. Eagan, MN Email: bbarabash at tappeconstruction.com Phone: (651) 256-6831 "Intel Inside: The world's most widely used warning label" - Jim Hopper ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Thu Jul 22 14:31:15 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Thu, 22 Jul 2004 20:31:15 +0100 Subject: [AccessD] Restrict data entry from form into table In-Reply-To: <193572B4E0FC1744BEDFEE63F82CEC9E0F97C6@bocnte2k4.boc.chevrontexaco.net> Message-ID: <001201c47022$74634bc0$b274d0d5@minster33c3r25> Chester If you set an index on the date plus the second field and make it Unique won't that do it? They'll still be able to select the 'wrong' value from the dropdown but Access will error when they try to save that record. You can have an error handler to intercept the errror and give a neater message if you want to. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Kaup, Chester A > Sent: 22 July 2004 17:14 > To: accessd at databaseadvisors.com > Subject: [AccessD] Restrict data entry from form into table > > > I have a form for data entry into a table. The first field, > date, is automatically filled in from a selection on another > form. The second field is a drop down list box. The third > field is to enter a numeric value. For any given date I need > to let the user only select a particular item from the drop > down list in the second field once. Is this possible through > indexing or some other method? I am drawing a blank here. Thanks > > Chester Kaup > Information Management Technician > IT-MidContinent/MidContinent Business Unit > CTN 8-687-7415 > Outside 432-687-7414 > > No trees were killed in the sending of this message. However > a large number of electrons were terribly inconvenienced. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > From cfoust at infostatsystems.com Thu Jul 22 15:59:27 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 13:59:27 -0700 Subject: [AccessD] Database Conversion in VBA Message-ID: Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust From artful at rogers.com Thu Jul 22 17:02:56 2004 From: artful at rogers.com (Arthur Fuller) Date: Thu, 22 Jul 2004 18:02:56 -0400 Subject: [AccessD] Database Conversion in VBA In-Reply-To: Message-ID: <034c01c47037$a4f728f0$6601a8c0@rock> Is there something wrong with doing it in the menu? Do you need to do it programmatically? If so, there must be constants that you can pass in to DoCmd that will achieve same. Never had the need to do it yet but what's wrong with the menu options themselves? Just asking Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 22, 2004 4:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Database Conversion in VBA Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Thu Jul 22 17:13:03 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Thu, 22 Jul 2004 15:13:03 -0700 Subject: [AccessD] Database Conversion in VBA Message-ID: We need to examine a datafile in code and convert it if it is in 2002 format. Our users don't see the menu to do this, and we couldn't safely leave it to them anyhow. There are no constants except acCmdConvertDatabase, and the only code I've seen used SendKeys to run that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be running this in the current database, it becomes problematic. Charlotte Foust -----Original Message----- From: Arthur Fuller [mailto:artful at rogers.com] Sent: Thursday, July 22, 2004 2:03 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Database Conversion in VBA Is there something wrong with doing it in the menu? Do you need to do it programmatically? If so, there must be constants that you can pass in to DoCmd that will achieve same. Never had the need to do it yet but what's wrong with the menu options themselves? Just asking Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Thursday, July 22, 2004 4:59 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Database Conversion in VBA Has anyone succeeded in converting a database from 2002 to 2000 format in code? No matter what I try, I only trigger the conversion dialog without successfully passing in the arguments it needs. What I'm looking for is 2002 code that will specify a database file and convert that file to 2000 format. Charlotte Foust -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jul 22 17:21:11 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 22 Jul 2004 22:21:11 +0000 Subject: [AccessD] Launch Access From Batch Message-ID: Hello All, Have a batch file that opens A97db...if you run the batch on the server...it runs fine...but if you call it remotely from AS400...it hangs on the statement in the batch were you execute the db...any ideas? Thanks, Mark A. Matte _________________________________________________________________ Planning a family vacation? Check out the MSN Family Travel guide! http://dollar.msn.com From d.dick at uws.edu.au Thu Jul 22 18:28:29 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Fri, 23 Jul 2004 09:28:29 +1000 Subject: [AccessD] Toolbar/Menubar Locking References: <003601c46e98$963226d0$6601a8c0@rock><1976438147.20040721105636@cactus.dk> <2024.216.43.21.235.1090512062.squirrel@cetus.email.starband.net> Message-ID: <000c01c47043$989a5f30$48619a89@DDICK> Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently using > Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, just > using the standard ones. The client has found that some of the users have > messed with the toolbars (dragged them off to who knows where...) and > afterwards can't get to them when they really do need them. > > I eventually plan to have customized toolbars and menubars for them, but > this question will apply to them as well, even though they're not ready > yet. > > Is there a way to lock the menubar and toolbar in place using vb code or > some other way of automatically locking them? I know it can be done in > Access on each workstation, but these pc's are all over the place and I > don't want to tell their MIS that he has to go around to each computer and > lock the toolbars in place. That would gain me MORE than just a dirty > look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Thu Jul 22 19:27:14 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jul 2004 17:27:14 -0700 Subject: [AccessD] Hiding Back End Design References: <000001c45950$fa09d2a0$b274d0d5@minster33c3r25> <020701c4597e$ea93e990$6601a8c0@HAL9002> <40F731F1.60209@shaw.ca> <020a01c46ae7$2e245860$6601a8c0@HAL9002> <40F75E7E.2090505@shaw.ca> <012301c46d1e$2ef4fb30$6601a8c0@HAL9002> Message-ID: <41005B62.30902@shaw.ca> Just for Info. One other thing to do is file a copyright, you have a copyright automatically but you cannot sue for infringement, unless it is registered This costs $30. You send in roughly first and last 25 pages of source code with blocked out trade secrets. Government processing time is six months. For US details see: Copyright Registration for Computer Programs http://www.copyright.gov/circs/circ61.html#deposit Rocky Smolin - Beach Access Software wrote: >Marty: > >Every place I've done work where there were mdw's involved the problems >ranged from nuisance to nightmare. Since this is my proprietary product and >I'm hoping to have lots of them installed around the world over the next few >years (hope springs eternal) I'm really reluctant to start down that road. > >I think I've convinced my Chinese distributor, who started all this, that >having the back end open while the front end is totally protected, is the >best of both worlds. > >Rocky > >----- Original Message ----- >From: "MartyConnelly" >To: "Access Developers discussion and problem solving" > >Sent: Thursday, July 15, 2004 9:50 PM >Subject: Re: [AccessD] Hiding Back End Design > > > > >>Well if you were the owner through mdw you could, everyone else would >>have to go through a query. >>This assumes the mdw is crackable. >> >>Rocky Smolin - Beach Access Software wrote: >> >> >> >>>Marty: >>> >>>Why couldn't they just go directly into the back end and open the table >>> >>> >in > > >>>design view? >>> >>>Rocky >>> >>> >>>----- Original Message ----- >>>From: "MartyConnelly" >>>To: "Access Developers discussion and problem solving" >>> >>>Sent: Thursday, July 15, 2004 6:40 PM >>>Subject: Re: [AccessD] Hiding Back End Design >>> >>> >>> >>> >>> >>> >>>>I came across this today under the Access ORK.You might be able to hide >>>>the design this way. >>>>http://www.microsoft.com/office/ork/2000/three/65t3_9.htm >>>> >>>>Using the RunPermissions Property with User-Level Security >>>>In order for Microsoft Access to display a table or query, it must read >>>>the design of that table or query. As a result, in order for a user to >>>>read and display the data in a table or query, that user must also have >>>>permission to read the design of the table or query. >>>>If you dont want your users to see the design of your table or query, >>>>you can create a query and set its RunPermissions property to restrict >>>>their access to this information. >>>>Set it up and test against one of the access reengineering case tools >>>>like Sparxs or EZDesign. >>>> >>>>Rocky Smolin - Beach Access Software wrote: >>>> >>>> >>>> >>>> >>>> >>>>>One of the great advantages of Access is that the user can work with >>>>> >>>>> >the > > >>>>>data apart from the front end app. It's transparency is a real >>>>> >>>>> >marketing > > >>>>>plus. So I'd like to leave the back end open. I think it will be >>>>>beneficial. >>>>> >>>>>Rocky >>>>> >>>>>----- Original Message ----- >>>>>From: "Andy Lacey" >>>>>To: "'Access Developers discussion and problem solving'" >>>>> >>>>>Sent: Wednesday, June 23, 2004 11:36 AM >>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>I'm going to sound a dissenting voice here. I don't understand why >>>>>> >>>>>> >>>>>> >>>>>> >>>Rocky, >>> >>> >>> >>> >>>>>>who's no doubt sweat blood to develop his vertical app, should in >>>>>> >>>>>> >effect > > >>>>>>give his system away? Because surely that's what he'd be doing? The >>>>>> >>>>>> >only > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>way >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>doing a development like this makes sense is to get economies of scale >>>>>> >>>>>> >>>>>> >>>>>> >>>by >>> >>> >>> >>> >>>>>>selling lots of copies. Without that incentive vertical apps would >>>>>> >>>>>> >never > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>get >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>developed at all because, in the main, a single customer can't stand >>>>>> >>>>>> >all > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>the >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>development costs. And if you're going to put in the graft why >>>>>> >>>>>> >shouldn't > > >>>>>> >>>>>> >>>>>> >>>>>> >>>>>you >>>>> >>>>> >>>>> >>>>> >>>>> >>>>> >>>>>>dream of making money on it, and why should you open yourself to being >>>>>>ripped-off by people who can't be arsed to do the hard work >>>>>> >>>>>> >themselves? > > >>>>>>Sorry, don't understand. >>>>>> >>>>>>-- Andy Lacey >>>>>>http://www.minstersystems.co.uk >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>>>-----Original Message----- >>>>>>>From: accessd-bounces at databaseadvisors.com >>>>>>>[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of >>>>>>>DWUTKA at marlow.com >>>>>>>Sent: 23 June 2004 18:30 >>>>>>>To: accessd at databaseadvisors.com >>>>>>>Subject: RE: [AccessD] Hiding Back End Design >>>>>>> >>>>>>> >>>>>>>'Open source' should pervade into all areas of the >>>>>>>information age. Music, programming, videos, etc. >>>>>>>Unfortunately it will take a complete change in humanity's >>>>>>>driving force....the accumulation of wealth. As long as >>>>>>>people are trying to make a buck, it will be virtually >>>>>>>impossible to get them to do stuff simply for the betterment >>>>>>>of society. >>>>>>> >>>>>>>Drew >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>> >>>>>>-- >>>>>>_______________________________________________ >>>>>>AccessD mailing list >>>>>>AccessD at databaseadvisors.com >>>>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>>>Website: http://www.databaseadvisors.com >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>>> >>>>> >>>>> >>>>> >>>>-- >>>>Marty Connelly >>>>Victoria, B.C. >>>>Canada >>>> >>>> >>>> >>>>-- >>>>_______________________________________________ >>>>AccessD mailing list >>>>AccessD at databaseadvisors.com >>>>http://databaseadvisors.com/mailman/listinfo/accessd >>>>Website: http://www.databaseadvisors.com >>>> >>>> >>>> >>>> >>> >>> >>> >>-- >>Marty Connelly >>Victoria, B.C. >>Canada >> >> >> >> >> >> > > -- Marty Connelly Victoria, B.C. Canada From martyconnelly at shaw.ca Thu Jul 22 20:02:34 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Thu, 22 Jul 2004 18:02:34 -0700 Subject: [AccessD] OT: Network registry? References: <2F8793082E00D4119A1700B0D0216BF8031BB17B@main2.marlow.com> Message-ID: <410063AA.3000406@shaw.ca> You could also use ADSI scripts to add this info into a registry key on each clients machine from a network admin account. Use the ADsSecurity.dll COM component from the ADSI SDK (Win2000) or the built-in AdsSecurityUtility object on WinXP. It has a COM interface as well as an API interface. This is not easy stuff! But it would give the BOFH heart failure. No, I have not done this before but should be possible to write from vbs or Access. DWUTKA at marlow.com wrote: >Along the lines of the window service, I would recommend going with Named >Pipes. They're pretty easy to setup, and they're fast. > >Drew > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Brett Barabash >Sent: Thursday, July 22, 2004 10:32 AM >To: Access Developers discussion and problem solving >Subject: [AccessD] OT: Network registry? > > >Here's the problem. I have an encrypted piece of information that I >want to share with every computer in my network (~70 machines). This >information can change at any time so it would be difficult to store it >locally on each workstation. > >Currently I am storing this information in an INI file on a network >share, which causes a series of problems: >- I need to hard code the INI file location in the code accessing the >data. If the file location changes, I would need to update all of the >workstations. >- All users accessing this file need the appropriate file permissions. >There really isn't a single network location that ALL users in this >building access. > >I was thinking of writing a Windows service that could run on one of the >servers, that could monitor incoming requests from client workstations, >and return the encrypted data. That way, one would only need to know >the local IP address of the server, which is unlikely to change. > >Any other ideas? > >Brett Barabash >Lead Software Developer >Tappe Construction, Co. >Eagan, MN > >Email: bbarabash at tappeconstruction.com >Phone: (651) 256-6831 > >"Intel Inside: The world's most widely used warning label" - Jim Hopper > > > >---------------------------------------------------------------------------- >---------------------------------------- >The information in this email may contain confidential information that >is legally privileged. The information is only for the use of the intended >recipient(s) named above. If you are not the intended recipient(s), you >are hereby notified that any disclosure, copying, distribution, or the >taking >of any action in regard to the content of this email is strictly prohibited. >If >transmission is incorrect, unclear, or incomplete, please notify the sender >immediately. The authorized recipient(s) of this information is/are >prohibited >from disclosing this information to any other party and is/are required to >destroy the information after its stated need has been fulfilled. > >Any views expressed in this message are those of the individual >sender, except where the sender specifies and with authority, >states them to be the views of Tappe Construction Co. > >This footer also confirms that this email message has been scanned >for the presence of computer viruses.Scanning of this message and >addition of this footer is performed by SurfControl E-mail Filter software >in conjunction with virus detection software. >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > -- Marty Connelly Victoria, B.C. Canada From dwaters at usinternet.com Thu Jul 22 20:45:04 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 22 Jul 2004 20:45:04 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <000001c47056$ad0f5ca0$de1811d8@danwaters> In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters From jmhla at earthlink.net Fri Jul 23 00:14:09 2004 From: jmhla at earthlink.net (Joe Hecht) Date: Thu, 22 Jul 2004 22:14:09 -0700 Subject: [AccessD] Hit the Wall? In-Reply-To: <000001c47056$ad0f5ca0$de1811d8@danwaters> Message-ID: <200407230513.i6N5DtQ05147@databaseadvisors.com> Dan Max number of fields in a table =255. Look at your design. You probably need to normalize the table and make several fields across multiple tables. Joe Hecht jmhla at earthlink.net 28g -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 6:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael at ddisolutions.com.au Fri Jul 23 00:40:55 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Fri, 23 Jul 2004 15:40:55 +1000 Subject: [AccessD] Hit the Wall? Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AB1@ddi-pdc.ddisolutions.ddisolutions.com.au> No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 01:36:02 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 08:36:02 +0200 Subject: [AccessD] OT: Network registry? In-Reply-To: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB086506584E@tccexch01.tappeconstruction.net> Message-ID: <1901759800.20040723083602@cactus.dk> Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store it > locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of the > servers, that could monitor incoming requests from client workstations, > and return the encrypted data. That way, one would only need to know > the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 From stephen at bondsoftware.co.nz Fri Jul 23 05:43:08 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 22:43:08 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Access 2000 - In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). Any Ideas? TIA Stephen Bond Otatara, New Zealand From gustav at cactus.dk Fri Jul 23 05:59:03 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 12:59:03 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Message-ID: <11417541363.20040723125903@cactus.dk> Hi Stephen How do you specify it in the report's headings and groupings specification? You may need to write the original expression: =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) Is startdate included as i (not visible) textbox in the report? /gustav > Access 2000 - > In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. > I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed > incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms > (there will be but I have removed it to attempt to solve this). > Any Ideas? > TIA > Stephen Bond > Otatara, New Zealand From andy at minstersystems.co.uk Fri Jul 23 06:03:04 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 23 Jul 2004 12:03:04 +0100 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <20040723110301.B4392252701@smtp.nildram.co.uk> Stephen How about trying this. Create a public function to which you pass StartDate and which returns the correct Year. Then replace your IIF test in the query with the function call and group on that. Might make the SQL 'simpler' so Access can cope. Haven't tried it but may work. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: accessd at databaseadvisors.com Subject: [AccessD] Report Grouping on a derived query field Date: 23/07/04 10:56 > > Access 2000 - > In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. > > I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). > > Any Ideas? > > TIA > Stephen Bond > Otatara, New Zealand > > > > -- > _______________________________________________ > 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 stephen at bondsoftware.co.nz Fri Jul 23 06:08:33 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:08:33 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> Hi Gustav, you're up early! 11pm Friday here. In the report, I am using the field FY. It presents in the Field List, and in the Sorting And Grouping drop box. startDate is included in the detail line of the report. Will try your suggestion and let you know. Stephen Bond > -----Original Message----- > From: Gustav Brock [mailto:gustav at cactus.dk] > Sent: Friday, 23 July 2004 10:59 p.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Report Grouping on a derived query field > > > Hi Stephen > > How do you specify it in the report's headings and groupings > specification? > You may need to write the original expression: > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > Is startdate included as i (not visible) textbox in the report? > > /gustav > > > > Access 2000 - > > In a query which feeds a report I have a derived field. It > is derived directly from a date field in one of the > contributing tables, thus: > > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > > The query runs perfectly, and gives me values like 2003, > 2004 etc in the FY field. > > > I am using this derived field, FY, as a grouping level (the > only grouping level) in the report. When I run the report, > it bombs off immediately with the error message "The > expression is typed > > incorrectly, or is too complex to be evaluated ..." and > more stuff about simplifying the expression. When I remove > the Grouping Level completely the report runs. There is no > code-behind-forms > > (there will be but I have removed it to attempt to solve this). > > > Any Ideas? > > > TIA > > Stephen Bond > > Otatara, New Zealand > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From stephen at bondsoftware.co.nz Fri Jul 23 06:16:20 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:16:20 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DB@server.bondsoftware.co.nz> Andy, thanks, tried that and same result. Stephen > -----Original Message----- > From: Andy Lacey [mailto:andy at minstersystems.co.uk] > Sent: Friday, 23 July 2004 11:03 p.m. > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Report Grouping on a derived query field > > > Stephen > How about trying this. Create a public function to which you > pass StartDate > and which returns the correct Year. Then replace your IIF > test in the query > with the function call and group on that. Might make the SQL > 'simpler' so > Access can cope. Haven't tried it but may work. > > > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From gustav at cactus.dk Fri Jul 23 06:16:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 13:16:19 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887DA@server.bondsoftware.co.nz> Message-ID: <14518576661.20040723131619@cactus.dk> Hi Stephen > Hi Gustav, you're up early! 11pm Friday here. Oh not at all, I'm in Europe - it's 13.00 hours here. > In the report, I am using the field FY. It presents in the Field List, and in the Sorting And Grouping drop box. > startDate is included in the detail line of the report. > Will try your suggestion and let you know. OK. /gustav > Stephen Bond >> -----Original Message----- >> From: Gustav Brock [mailto:gustav at cactus.dk] >> Sent: Friday, 23 July 2004 10:59 p.m. >> To: Access Developers discussion and problem solving >> Subject: Re: [AccessD] Report Grouping on a derived query field >> >> >> Hi Stephen >> >> How do you specify it in the report's headings and groupings >> specification? >> You may need to write the original expression: >> >> =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) >> >> Is startdate included as i (not visible) textbox in the report? >> >> /gustav >> >> >> > Access 2000 - >> > In a query which feeds a report I have a derived field. It >> is derived directly from a date field in one of the >> contributing tables, thus: >> >> > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) >> >> > The query runs perfectly, and gives me values like 2003, >> 2004 etc in the FY field. >> >> > I am using this derived field, FY, as a grouping level (the >> only grouping level) in the report. When I run the report, >> it bombs off immediately with the error message "The >> expression is typed >> > incorrectly, or is too complex to be evaluated ..." and >> more stuff about simplifying the expression. When I remove >> the Grouping Level completely the report runs. There is no >> code-behind-forms >> > (there will be but I have removed it to attempt to solve this). >> >> > Any Ideas? >> >> > TIA >> > Stephen Bond >> > Otatara, New Zealand From stephen at bondsoftware.co.nz Fri Jul 23 06:22:34 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:22:34 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DC@server.bondsoftware.co.nz> > > Hi Stephen > > > Hi Gustav, you're up early! 11pm Friday here. > > Oh not at all, I'm in Europe - it's 13.00 hours here. > Quite right, I was looking at the time at AccessD ;-> From stephen at bondsoftware.co.nz Fri Jul 23 06:27:37 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Fri, 23 Jul 2004 23:27:37 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Gustav, identical result as before :-< > > How do you specify it in the report's headings and groupings > > specification? > > You may need to write the original expression: > > > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > > > Is startdate included as i (not visible) textbox in the report? > > > > /gustav From paul.hartland at fsmail.net Fri Jul 23 06:40:12 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 23 Jul 2004 13:40:12 +0200 (CEST) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <20967598.1090582812566.JavaMail.www@wwinf3001> To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From jmhla at earthlink.net Fri Jul 23 06:44:41 2004 From: jmhla at earthlink.net (jmhla at earthlink.net) Date: Fri, 23 Jul 2004 04:44:41 -0700 (GMT-07:00) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <9948306.1090583082041.JavaMail.root@kermit.psp.pas.earthlink.net> Paul, I do not know the code but you need to open the Excel object model and access the page setup options. In Excel turn on the macro recorder and set the options manually. Look at the generated code. -----Original Message----- From: paul.hartland at fsmail.net Sent: Jul 23, 2004 4:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 23 06:48:09 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 23 Jul 2004 07:48:09 -0400 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: I'm guessing you want to set this using automation...? Here is an example from the help file: ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address Mark -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From paul.hartland at fsmail.net Fri Jul 23 06:54:29 2004 From: paul.hartland at fsmail.net (paul.hartland at fsmail.net) Date: Fri, 23 Jul 2004 13:54:29 +0200 (CEST) Subject: [AccessD] OT-Excel Printing Header Rows On Each Page Message-ID: <11742222.1090583669313.JavaMail.www@wwinf3001> Thanks everyone, never even thought of looking in the help today.....can tell it's Friday..... Message date : Jul 23 2004, 12:52 PM >From : "Mitsules, Mark S. (Newport News)" To : "'Access Developers discussion and problem solving'" Copy to : Subject : RE: [AccessD] OT-Excel Printing Header Rows On Each Page I'm guessing you want to set this using automation...? Here is an example from the help file: ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address Mark -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm From dwaters at usinternet.com Fri Jul 23 06:54:28 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 06:54:28 -0500 Subject: [AccessD] Hit the Wall? In-Reply-To: <14618365.1090561122538.JavaMail.root@sniper4.usinternet.com> Message-ID: <000401c470ab$cf65a480$de1811d8@danwaters> Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 06:55:48 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 13:55:48 +0200 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> References: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Message-ID: <9720945598.20040723135548@cactus.dk> Hi Stephen Then, as neither Andy's suggestion did make a difference, something else must be going on. You may need to group on more fields - you can try that out in the query itself. /gustav > Gustav, identical result as before :-< >> > How do you specify it in the report's headings and groupings >> > specification? >> > You may need to write the original expression: >> > >> > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) >> > >> > Is startdate included as i (not visible) textbox in the report? >> > >> > /gustav From jmoss111 at bellsouth.net Fri Jul 23 07:00:08 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Fri, 23 Jul 2004 07:00:08 -0500 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page In-Reply-To: <20967598.1090582812566.JavaMail.www@wwinf3001> Message-ID: In excel turn on the macro recorder, and create your header. Stop the recorder and open the macro, and copy the code. Then in an Access module, insert the code with looping and row counting with your recordset code. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of paul.hartland at fsmail.net Sent: Friday, July 23, 2004 6:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Fri Jul 23 07:55:00 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 23 Jul 2004 08:55:00 -0400 Subject: [AccessD] OT-Excel Printing Header Rows On Each Page In-Reply-To: Message-ID: <000801c470b4$46c86960$0201a8c0@COA3> You want this property, I believe: With ActiveSheet.PageSetup .PrintTitleRows = "$1:$1" ' <- prints the first row on every page .PrintTitleColumns = "" End With Alternatively, you could do this manually in an XLT file, and send your data to the xlt each time (which will "spawn" a new copy of itself each time). Steve -----Original Message----- From: paul.hartland at fsmail.net [mailto:paul.hartland at fsmail.net] Sent: Friday, July 23, 2004 7:40 AM To: accessd Subject: [AccessD] OT-Excel Printing Header Rows On Each Page To all, I have an access database which in the end opens an excel spreadsheet, the problem being if it goes over one page I need the header to appear on all over pages (header being row A & B). Anyone any ideas how to do this, without the user having to go into Page Setup and do it manually ? Thanks in advance for any help. Paul Hartland -- Whatever you Wanadoo: http://www.wanadoo.co.uk/time/ This email has been checked for most known viruses - find out more at: http://www.wanadoo.co.uk/help/id/7098.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 23 08:05:04 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 23 Jul 2004 09:05:04 -0400 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887DD@server.bondsoftware.co.nz> Message-ID: <042b01c470b5$ac000350$6601a8c0@rock> I think that you have no choice but to bounce the derived field up to the master level of the report (that is, join the detail table to the master so you can grab this one field), and then do your grouping on that. Doing this will probably give you duplicate rows at the master level but you can get around that by grouping on the columns that duplicate. Try it as a query first, and then once you have it working, slam it back into the report. HTH, Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stephen Bond Sent: Friday, July 23, 2004 7:28 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Report Grouping on a derived query field Gustav, identical result as before :-< > > How do you specify it in the report's headings and groupings > > specification? You may need to write the original expression: > > > > =IIf(Month(startDate) < 7, Year(startDate), 1 + Year(startDate)) > > > > Is startdate included as i (not visible) textbox in the report? > > > > /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jul 23 09:00:47 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 23 Jul 2004 09:00:47 -0500 Subject: [AccessD] OT: Network registry? Message-ID: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From jimdettman at earthlink.net Fri Jul 23 06:04:06 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 23 Jul 2004 07:04:06 -0400 Subject: [AccessD] Report Grouping on a derived query field In-Reply-To: <70F3D727890C784291D8433E9C418F290887D9@server.bondsoftware.co.nz> Message-ID: Stephen, Try putting the calc in a subquery. Then build the report query off that. I know the general rule of thumb has always been to move calculations up rather then down, but I've run into a couple cases where it worked. Then there are a few cases where I actually had to build a temp table in a temp database to feed the report. Jim. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond Sent: Friday, July 23, 2004 6:43 AM To: accessd at databaseadvisors.com Subject: [AccessD] Report Grouping on a derived query field Access 2000 - In a query which feeds a report I have a derived field. It is derived directly from a date field in one of the contributing tables, thus: FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) The query runs perfectly, and gives me values like 2003, 2004 etc in the FY field. I am using this derived field, FY, as a grouping level (the only grouping level) in the report. When I run the report, it bombs off immediately with the error message "The expression is typed incorrectly, or is too complex to be evaluated ..." and more stuff about simplifying the expression. When I remove the Grouping Level completely the report runs. There is no code-behind-forms (there will be but I have removed it to attempt to solve this). Any Ideas? TIA Stephen Bond Otatara, New Zealand -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 23 09:14:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 23 Jul 2004 16:14:05 +0200 Subject: [AccessD] OT: Network registry? In-Reply-To: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> References: <100F91B31300334B89EC531C9DCB0865065853@tccexch01.tappeconstruction.net> Message-ID: <2929242838.20040723161405@cactus.dk> Hi Brett You could ask your app to look for it whenever it launches. Or you could set a time stamp or version no. in the backend, then let your app recopy and load the info when it needs the info and an update is available. It all depends, of course, on how frequent the info changes. /gustav > The info *could* be stored on the workstation. However, the mechanism > for updating it is the big question. How do I keep 70 workstations > updated when it changes? > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock > Sent: Friday, July 23, 2004 1:36 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] OT: Network registry? > Hi Brett > Must the user read the info off the remote file or would it be allowed > to copy the encrypted info as a file to the users' machines? > The last option opens for a lot of quite simple solutions like ftp or > http transfer. > /gustav >> Here's the problem. I have an encrypted piece of information that I >> want to share with every computer in my network (~70 machines). This >> information can change at any time so it would be difficult to store >> it locally on each workstation. >> Currently I am storing this information in an INI file on a network >> share, which causes a series of problems: >> - I need to hard code the INI file location in the code accessing the >> data. If the file location changes, I would need to update all of the >> workstations. >> - All users accessing this file need the appropriate file permissions. >> There really isn't a single network location that ALL users in this >> building access. >> I was thinking of writing a Windows service that could run on one of >> the servers, that could monitor incoming requests from client >> workstations, and return the encrypted data. That way, one would only >> need to know the local IP address of the server, which is unlikely to > change. >> Any other ideas? >> Brett Barabash >> Lead Software Developer >> Tappe Construction, Co. >> Eagan, MN From GregSmith at starband.net Fri Jul 23 09:29:24 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 23 Jul 2004 09:29:24 -0500 Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <000c01c47043$989a5f30$48619a89@DDICK> Message-ID: <200407231427.i6NER17J025721@apollo.email.starband.net> Hi Darren. Thanks for responding. What you said is along the line of what I want to do, however, I want to be able to control the toolbars' properties based on the security. That is, if I login as the developer, I want the toolbars 'loose', so I can do what I want with them. However, when the "public" signs in, I want the toolbars "locked" so they can't mess with them. The only way I know to do this is through code, but I don't know (or can find) the syntax of the code to do it. Or is this type of control not possible? Thanks! Greg Smith gregsmith at starband.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Thursday, July 22, 2004 6:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Toolbar/Menubar Locking Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently using > Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, just > using the standard ones. The client has found that some of the users have > messed with the toolbars (dragged them off to who knows where...) and > afterwards can't get to them when they really do need them. > > I eventually plan to have customized toolbars and menubars for them, but > this question will apply to them as well, even though they're not ready > yet. > > Is there a way to lock the menubar and toolbar in place using vb code or > some other way of automatically locking them? I know it can be done in > Access on each workstation, but these pc's are all over the place and I > don't want to tell their MIS that he has to go around to each computer and > lock the toolbars in place. That would gain me MORE than just a dirty > look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From mikedorism at adelphia.net Fri Jul 23 10:36:53 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Fri, 23 Jul 2004 11:36:53 -0400 Subject: [AccessD] Toolbar/Menubar Locking In-Reply-To: <200407231427.i6NER17J025721@apollo.email.starband.net> Message-ID: <000001c470ca$e1e82a50$cc0aa845@hargrove.internal> Lookup the CommandBar object in the help files. Doris Manning Database Administrator Hargrove Inc. www.hargroveinc.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Greg Smith Sent: Friday, July 23, 2004 10:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Toolbar/Menubar Locking Hi Darren. Thanks for responding. What you said is along the line of what I want to do, however, I want to be able to control the toolbars' properties based on the security. That is, if I login as the developer, I want the toolbars 'loose', so I can do what I want with them. However, when the "public" signs in, I want the toolbars "locked" so they can't mess with them. The only way I know to do this is through code, but I don't know (or can find) the syntax of the code to do it. Or is this type of control not possible? Thanks! Greg Smith gregsmith at starband.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Thursday, July 22, 2004 6:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Toolbar/Menubar Locking Hi Greg You can "AllowMoving" "allowCustomising" "allowShow/Hide" and other things when you create the toolbars. Those properties stay with the toolbar and thus the app (of course) when you move your app from machine to machine. Click View|Toolbars|Customise. Select the first Tab then the relevant toolbar from the list then click on the properties button to the right Set what you want don't want from there Hope this helps Darren ----- Original Message ----- From: "Greg Smith" To: Sent: Friday, July 23, 2004 2:01 AM Subject: [AccessD] Toolbar/Menubar Locking > Hi everyone! > > I'm not sure how to do this, or if it can even be done. Currently > using Access 97 on WinXP. > > The application is a secured (through access workgroup/users) database > front end. At this point, I have no customized toolbars or menus, > just using the standard ones. The client has found that some of the > users have messed with the toolbars (dragged them off to who knows > where...) and afterwards can't get to them when they really do need > them. > > I eventually plan to have customized toolbars and menubars for them, > but this question will apply to them as well, even though they're not > ready yet. > > Is there a way to lock the menubar and toolbar in place using vb code > or some other way of automatically locking them? I know it can be > done in Access on each workstation, but these pc's are all over the > place and I don't want to tell their MIS that he has to go around to > each computer and lock the toolbars in place. That would gain me MORE > than just a dirty look. Explicit hand signals might be involved.... > > Any help would be greatly appreciated. > > TIA! > > Greg Smith > gregsmith at starband.net > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Rich_Lavsa at pghcorning.com Fri Jul 23 10:58:21 2004 From: Rich_Lavsa at pghcorning.com (Lavsa, Rich) Date: Fri, 23 Jul 2004 11:58:21 -0400 Subject: [AccessD] OT: Network registry? Message-ID: <833956F5C117124A89417638FDB11290EBD22F@goexchange.pghcorning.com> Thinking outside the box a little, so don't crucify me if these options don't sound good.. Possible option #1...... I for one am not savvy when it comes to writing VB code, however would think that someone could write a little VB app that could monitor the basic field properties such as Modified date of the encrypted field in question. When that date changes you could then copy that file out to all 70 machines. In my mind this VB application would run as a Service, and would monitor the file maybe every minute to check the old with the new modified date property, if current date is newer then old date then start the Push routine that will push out the new file to every workstation. That is just something I would think about doing, then again I wouldn't know how to implement that and would come to this list or a VB list to ask HOW? Possible option #2...... Isn't there something called RobotCopy or maybe Briefcase or if have XP you might be able to get away with using the Synchronization Manager. Again not sure what your requirements and demand on the network all of this would be, just suggestions and thinking outside the box a little... Rich -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Friday, July 23, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 ---------------------------------------------------------------------------- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 23 11:12:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 09:12:04 -0700 Subject: [AccessD] OT: Network registry? Message-ID: LOL We're only allowed one crucifixion a week, and I think we already had one this week. Charlotte Foust -----Original Message----- From: Lavsa, Rich [mailto:Rich_Lavsa at pghcorning.com] Sent: Friday, July 23, 2004 7:58 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] OT: Network registry? Thinking outside the box a little, so don't crucify me if these options don't sound good.. Possible option #1...... I for one am not savvy when it comes to writing VB code, however would think that someone could write a little VB app that could monitor the basic field properties such as Modified date of the encrypted field in question. When that date changes you could then copy that file out to all 70 machines. In my mind this VB application would run as a Service, and would monitor the file maybe every minute to check the old with the new modified date property, if current date is newer then old date then start the Push routine that will push out the new file to every workstation. That is just something I would think about doing, then again I wouldn't know how to implement that and would come to this list or a VB list to ask HOW? Possible option #2...... Isn't there something called RobotCopy or maybe Briefcase or if have XP you might be able to get away with using the Synchronization Manager. Again not sure what your requirements and demand on the network all of this would be, just suggestions and thinking outside the box a little... Rich -----Original Message----- From: Brett Barabash [mailto:BBarabash at tappeconstruction.com] Sent: Friday, July 23, 2004 10:01 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] OT: Network registry? The info *could* be stored on the workstation. However, the mechanism for updating it is the big question. How do I keep 70 workstations updated when it changes? -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 23, 2004 1:36 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] OT: Network registry? Hi Brett Must the user read the info off the remote file or would it be allowed to copy the encrypted info as a file to the users' machines? The last option opens for a lot of quite simple solutions like ftp or http transfer. /gustav > Here's the problem. I have an encrypted piece of information that I > want to share with every computer in my network (~70 machines). This > information can change at any time so it would be difficult to store > it locally on each workstation. > Currently I am storing this information in an INI file on a network > share, which causes a series of problems: > - I need to hard code the INI file location in the code accessing the > data. If the file location changes, I would need to update all of the > workstations. > - All users accessing this file need the appropriate file permissions. > There really isn't a single network location that ALL users in this > building access. > I was thinking of writing a Windows service that could run on one of > the servers, that could monitor incoming requests from client > workstations, and return the encrypted data. That way, one would only > need to know the local IP address of the server, which is unlikely to change. > Any other ideas? > Brett Barabash > Lead Software Developer > Tappe Construction, Co. > Eagan, MN > Email: bbarabash at tappeconstruction.com > Phone: (651) 256-6831 ------------------------------------------------------------------------ ---- ---------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Fri Jul 23 13:22:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 13:22:46 -0500 Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <000501c470e2$0db19c40$de1811d8@danwaters> Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Fri Jul 23 13:23:00 2004 From: artful at rogers.com (Arthur Fuller) Date: Fri, 23 Jul 2004 14:23:00 -0400 Subject: [AccessD] Pivot table builder Message-ID: <048301c470e2$15f564e0$6601a8c0@rock> I'm trying to create a pivot table form in Access and no matter how simple I try to make it, I immediately get an error message in the detail area that says "The query could not be processed. The data provider didn't supply any further error information." The database is Access MDB. The version is Access 2002 SP-1. Can anyone who has a simple pivot table form built please send me a zipped MDB so I can verify that I can at least open and use one? If so, please send it directly to me, zipped up. TIA, Arthur From cfoust at infostatsystems.com Fri Jul 23 13:26:20 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 11:26:20 -0700 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 13:38:57 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 13:38:57 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB192@main2.marlow.com> Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Fri Jul 23 13:55:10 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 13:55:10 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <6039825.1090607377268.JavaMail.root@sniper4.usinternet.com> Message-ID: <000001c470e6$9498b000$de1811d8@danwaters> I guess I had thought of using an unbound form as well. But I think at this point, with more fields perhaps to come as the customer starts using this, it would make more sense to rewrite this as an ADP rather than rewrite it to be unbound. However, this many fields is a function of the process and nothing else. There is no logical normalization that can be done that hasn't already been done (there are two different child tables). To remove fields is to change the business process. Thanks Charlotte! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 23, 2004 1:26 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael.broesdorf at web.de Fri Jul 23 13:59:23 2004 From: michael.broesdorf at web.de (=?iso-8859-1?Q?Michael_Br=F6sdorf?=) Date: Fri, 23 Jul 2004 20:59:23 +0200 Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB192@main2.marlow.com> Message-ID: How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From my.lists at verizon.net Fri Jul 23 14:02:49 2004 From: my.lists at verizon.net (Francisco H Tapia) Date: Fri, 23 Jul 2004 12:02:49 -0700 Subject: [AccessD] Alternate Front Ends Message-ID: <410160D9.4010607@verizon.net> Because it's friday and because a friend forwarded this to me, I'm wondering if there are any of you guys out there testing this FE out? it certainly (according to the help pages) seems like it can do what Access can but it's not a db, so you'd still need something like mySQL or alike to manage it your db, tho it looks like you can make queries right from this gui tool. http://www.totalrekall.co.uk/index.php -- -Francisco From dwaters at usinternet.com Fri Jul 23 14:04:18 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 14:04:18 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <31138944.1090608512512.JavaMail.root@sniper8.usinternet.com> Message-ID: <000101c470e7$db23a880$de1811d8@danwaters> Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Fri Jul 23 14:13:52 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 14:13:52 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <19197918.1090609193394.JavaMail.root@sniper6.usinternet.com> Message-ID: <000601c470e9$312efb70$de1811d8@danwaters> This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it?s a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Fri Jul 23 14:50:03 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Fri, 23 Jul 2004 15:50:03 -0400 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <000601c470e9$312efb70$de1811d8@danwaters> Message-ID: <20040723195001.LFEM1788.imf22aec.mail.bellsouth.net@SUSANONE> Why not divide the data into the same structure as the tab and use 1:1 relationships? Susan H. This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it?s a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jul 23 14:47:15 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 23 Jul 2004 14:47:15 -0500 Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: It would be at least a little scary to maintain but you could use larger text fields to store groups of your other smaller text fields so that COMBINED_FIELD1 of 255 characters contained the data for logical fields 1-51 (assuming 5 character fields) You could then reference data in form controls by using controls populated by MID([COMBINED_FIELD1],1,5) for the first one MID([COMBINED_FIELD1],6,5) for the second etc. Gary Kjos garykjos at hotmail.com >From: "Dan Waters" >Reply-To: Access Developers discussion and problem >solving >To: "Database Advisors" >Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) >Date: Fri, 23 Jul 2004 13:22:46 -0500 > >Any other ideas on ways to resolve this issue? > >Thanks! >Dan Waters > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters >Sent: Thursday, July 22, 2004 8:45 PM >To: Database Advisors >Subject: [AccessD] Hit the Wall? > >In an Access app w/FE and BE, I need a table that has about 270 fields. A >single form will be bound to the table. (This is a business process >management application.) If I upsize this to a project (never done this), >I >can have up to 1024 fields in a table. > > > >I tried creating a query to join two smaller tables, but queries are also >limited to 255 columns. > > > >Is there a way around this so I can still use an Access BE? > > > >Thanks! > >Dan Waters > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From BBarabash at TappeConstruction.com Fri Jul 23 14:37:31 2004 From: BBarabash at TappeConstruction.com (Brett Barabash) Date: Fri, 23 Jul 2004 14:37:31 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <100F91B31300334B89EC531C9DCB0865065859@tccexch01.tappeconstruction.net> How about using subforms for each tab page? That way you could have up to 11 different recordsources. It sounds like you were able to logically split the FE fields into 11 pages. It shouldn't be too difficult to at least split the BE into 2 tables. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:14 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) This sounds good too. The form is 8" W X 5" tall. It uses a tabbed control with 11 tabs. This is a Six Sigma Project management module, within a Workflow System. I've done many processes like this, and people love it (a direct quote!). If you compare this approach to managing a business process to using paper forms, emails, memory, phone calls, walking down the hall, 'smoke signals', etc., it's a great productivity tool. Some processes, like Debit Memos, or Supplier Deviations, are simple. Some, like Supplier First Article, Nonconforming Material, or Six Sigma Projects, are complex. And the more complex, the more value a database has. I've made the screens very easy to use. Labels are colored to indicate required, optional, locked, or system entered. During the current event the focus is moved to the page and the field where the work on that process probably needs to be done next. Access is great for this kind of stuff where a main goal is to make the user's life much easier. Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Br?sdorf Sent: Friday, July 23, 2004 1:59 PM To: Access Developers discussion and problem solving Subject: AW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) How about 2 tables with a 1:1 relationship? To display that as a form you could use an main form/sub form approach or two subforms on an (unbound) main form. But 270 field - who is gonna read/understand this?? Does that even fit on a standard-size-display? Michael -----Urspr?ngliche Nachricht----- Von: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]Im Auftrag von DWUTKA at marlow.com Gesendet: Freitag, 23. Juli 2004 20:39 An: accessd at databaseadvisors.com Betreff: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- -------------------------------------------------------------------------------------------------------------------- The information in this email may contain confidential information that is legally privileged. The information is only for the use of the intended recipient(s) named above. If you are not the intended recipient(s), you are hereby notified that any disclosure, copying, distribution, or the taking of any action in regard to the content of this email is strictly prohibited. If transmission is incorrect, unclear, or incomplete, please notify the sender immediately. The authorized recipient(s) of this information is/are prohibited from disclosing this information to any other party and is/are required to destroy the information after its stated need has been fulfilled. Any views expressed in this message are those of the individual sender, except where the sender specifies and with authority, states them to be the views of Tappe Construction Co. This footer also confirms that this email message has been scanned for the presence of computer viruses.Scanning of this message and addition of this footer is performed by SurfControl E-mail Filter software in conjunction with virus detection software. From cfoust at infostatsystems.com Fri Jul 23 15:06:51 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 23 Jul 2004 13:06:51 -0700 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: I'm not talking about removing fields from the *process*, I'm talking about changing the nature of a record to include a field for the value and a field for the "field name", "process segment", or whatever else you want to call it. Trust me, I've made this work with hundreds of "fields" because I didn't have to deal with trying to update individual fields in a single record, I could simply update a single record for that "field". If you have hundreds of fields in a single record, that doesn't mean you can't normalize it further. It may just mean you're in first normal form. Charlotte -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:55 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) I guess I had thought of using an unbound form as well. But I think at this point, with more fields perhaps to come as the customer starts using this, it would make more sense to rewrite this as an ADP rather than rewrite it to be unbound. However, this many fields is a function of the process and nothing else. There is no logical normalization that can be done that hasn't already been done (there are two different child tables). To remove fields is to change the business process. Thanks Charlotte! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 23, 2004 1:26 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Even for a process management project, I think 270 fields in a single table is a BAD idea. The way I got around this kind of problem in a survey app was to use an unbound form with fully relational tables and code to populate the controls and to write each change to the correct record. Charlotte Foust -----Original Message----- From: Dan Waters [mailto:dwaters at usinternet.com] Sent: Friday, July 23, 2004 10:23 AM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 15:28:25 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 15:28:25 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB194@main2.marlow.com> Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 23 15:49:19 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 23 Jul 2004 15:49:19 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stephen at bondsoftware.co.nz Fri Jul 23 15:18:49 2004 From: stephen at bondsoftware.co.nz (Stephen Bond) Date: Sat, 24 Jul 2004 08:18:49 +1200 Subject: [AccessD] Report Grouping on a derived query field Message-ID: <70F3D727890C784291D8433E9C418F290887DE@server.bondsoftware.co.nz> Gustav, Andy, Jim, Arthur, thanks for your input overnight, it's 8am Saturday, I'm awake, I've read your various contributions, and moved the derived field by itself to a query that is two query levels away from the report (so now it feeds the query that feeds the report). Eureka! Thank you one and all. Stephen Bond P.S. Jim, I was reaching the stage of the temp table approach. Not elegant is it? > -----Original Message----- > From: Jim Dettman [mailto:jimdettman at earthlink.net] > Sent: Friday, 23 July 2004 11:04 p.m. > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Report Grouping on a derived query field > > > Stephen, > > Try putting the calc in a subquery. Then build the report > query off that. > I know the general rule of thumb has always been to move > calculations up > rather then down, but I've run into a couple cases where it worked. > > Then there are a few cases where I actually had to build a > temp table in a > temp database to feed the report. > > Jim. > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Bond > Sent: Friday, July 23, 2004 6:43 AM > To: accessd at databaseadvisors.com > Subject: [AccessD] Report Grouping on a derived query field > > > Access 2000 - > In a query which feeds a report I have a derived field. It is derived > directly from a date field in one of the contributing tables, thus: > > FY:Iif(Month(startDate) < 7, Year(startDate), 1+Year(startDate)) > > The query runs perfectly, and gives me values like 2003, 2004 > etc in the FY > field. > > I am using this derived field, FY, as a grouping level (the > only grouping > level) in the report. When I run the report, it bombs off > immediately with > the error message "The expression is typed incorrectly, or is > too complex to > be evaluated ..." and more stuff about simplifying the > expression. When I > remove the Grouping Level completely the report runs. There is no > code-behind-forms (there will be but I have removed it to > attempt to solve > this). > > Any Ideas? > > TIA > Stephen Bond > Otatara, 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 dwaters at usinternet.com Fri Jul 23 16:59:46 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 23 Jul 2004 16:59:46 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <1020837.1090615986482.JavaMail.root@sniper3.usinternet.com> Message-ID: <000001c47100$5e15eb50$de1811d8@danwaters> Thank you Drew! This is a whole area I don't know about, and your example looks like a great example to learn from. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:49 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Fri Jul 23 20:53:51 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Fri, 23 Jul 2004 18:53:51 -0700 Subject: [AccessD] Database Conversion in VBA References: Message-ID: <4101C12F.4000503@shaw.ca> Well here is some rough code that will scan through directories and sub directories. to determine an mdb's version and print out the Access Version and Jet Version numbers. You will have to run this from Access 2002 or 2003, otherwise higher versions will not be recognized. This code will not be able to get at mdb's that are read only versions or those opened exclusively. Sub VersionTest(strpath As String) 'VersionTest "C:\Access files\Images\Picture2002.mdb" On Error GoTo ErrHandler Dim db As Database Dim i As Long Set db = DBEngine.OpenDatabase(strpath) Debug.Print strpath & " - " & db.Version & " - " & db.Properties("AccessVersion") 'For i = 0 To 8 ' Debug.Print db.Properties(i).Name & "-" & db.Properties(i).Value 'Next Exit Sub ErrHandler: ' most likely 3051 read only databases MsgBox Err.Number & " - " & Err.Description & vbCrLf & strpath End Sub Sub testfind() FindSub "C:\Access files\", "*mdb" End Sub ' FindSub() ermittelt alle Dateien mit der im Commondialog ' ausgew?hlten Dateiendung bis zur untersten Ebene ab dem gew?hlten 'Verzeichnis. ' Hierzu wird ein rekursiver Aufruf der Routine FindSub() eingesetzt. ' FindSub() determines all files with in the Commondialog the ' selected file dung up to the lowest level starting from the selected 'Verzeichnis. ' For this a recursive call of the routine FindSub() is used. Sub FindSub(strStart As String, strFindWhat As String) Dim arrFindDir() As String Dim strFind As String Dim i As Integer ChDrive (Left(strStart, 3)) ChDir (strStart) Call DirSub(strFindWhat, strStart) strFind = Dir("*.*", vbDirectory) i = 0 'ermittelt alle vorhandenen Dateien und Verzeichnisse im aktuellen 'Verzeichnis 'ermittelt all existing files and listings in the current 'Verzeichnis Do Until strFind = "" ReDim Preserve arrFindDir(i) arrFindDir(i) = strFind i = i + 1 strFind = Dir() Loop For i = 0 To UBound(arrFindDir) ' If... ermittelt ob es sich um ein Verzeichnis handelt ' und verzweigt dann rekursiv in dieses Verzeichnis If Dir(arrFindDir(i), vbNormal) = "" And Left(arrFindDir(i), 1) <> "." Then ' Rekursiver Aufruf von FindSub Call FindSub(strStart & arrFindDir(i) & "\", strFindWhat) ChDir (strStart) End If Next End Sub ' ermittelt alle gesuchten Dateien im momentan aktuellen Verzeichnis ' und gibt die gefundenen Dateien mit Pfad in eine Listenfeld (lstFiles)aus. ' determines all looked for files in the momentarily current listing ' and gives the found files with path in list field (lstFiles)aus. Sub DirSub(strFindWhat, strStart) Dim strFindfile As String strFindfile = Dir(strFindWhat, vbNormal) Do While strFindfile <> "" VersionTest strStart & strFindfile '.lstFiles.AddItem strStart & strFindfile strFindfile = Dir() Loop End Sub Charlotte Foust wrote: >We need to examine a datafile in code and convert it if it is in 2002 >format. Our users don't see the menu to do this, and we couldn't safely >leave it to them anyhow. There are no constants except >acCmdConvertDatabase, and the only code I've seen used SendKeys to run >that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be >running this in the current database, it becomes problematic. > >Charlotte Foust > > >-----Original Message----- >From: Arthur Fuller [mailto:artful at rogers.com] >Sent: Thursday, July 22, 2004 2:03 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Database Conversion in VBA > > >Is there something wrong with doing it in the menu? Do you need to do it >programmatically? If so, there must be constants that you can pass in to >DoCmd that will achieve same. Never had the need to do it yet but what's >wrong with the menu options themselves? > >Just asking > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: Thursday, July 22, 2004 4:59 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] Database Conversion in VBA > > >Has anyone succeeded in converting a database from 2002 to 2000 format >in code? No matter what I try, I only trigger the conversion dialog >without successfully passing in the arguments it needs. What I'm >looking for is 2002 code that will specify a database file and convert >that file to 2000 format. > >Charlotte Foust > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sat Jul 24 02:39:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jul 2004 09:39:08 +0200 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> References: <2F8793082E00D4119A1700B0D0216BF8031BB195@main2.marlow.com> Message-ID: <451029900.20040724093908@cactus.dk> Hi Drew Interesting and creative solution for this topic! /gustav > As an addition to the email below, if you go this method, you can really > save on form creation time, if you build your form one table at a > time. .. From gustav at cactus.dk Sat Jul 24 03:09:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sat, 24 Jul 2004 10:09:05 +0200 Subject: [AccessD] Database Conversion in VBA In-Reply-To: <4101C12F.4000503@shaw.ca> References: <4101C12F.4000503@shaw.ca> Message-ID: <1822827285.20040724100905@cactus.dk> Hi Marty Just curious - where will the code fail for read-only mdbs? /gustav > This code will not be able to get at mdb's that are read only versions > or those opened exclusively. From jimdettman at earthlink.net Sat Jul 24 09:31:30 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 24 Jul 2004 10:31:30 -0400 Subject: [AccessD] Database Conversion in VBA In-Reply-To: <4101C12F.4000503@shaw.ca> Message-ID: Marty (and all), A did a sample database a while back to find all MDB's in a path and build a table with the result. Anyone that wants a copy can e-mail me off-line. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of MartyConnelly Sent: Friday, July 23, 2004 9:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Database Conversion in VBA Well here is some rough code that will scan through directories and sub directories. to determine an mdb's version and print out the Access Version and Jet Version numbers. You will have to run this from Access 2002 or 2003, otherwise higher versions will not be recognized. This code will not be able to get at mdb's that are read only versions or those opened exclusively. Sub VersionTest(strpath As String) 'VersionTest "C:\Access files\Images\Picture2002.mdb" On Error GoTo ErrHandler Dim db As Database Dim i As Long Set db = DBEngine.OpenDatabase(strpath) Debug.Print strpath & " - " & db.Version & " - " & db.Properties("AccessVersion") 'For i = 0 To 8 ' Debug.Print db.Properties(i).Name & "-" & db.Properties(i).Value 'Next Exit Sub ErrHandler: ' most likely 3051 read only databases MsgBox Err.Number & " - " & Err.Description & vbCrLf & strpath End Sub Sub testfind() FindSub "C:\Access files\", "*mdb" End Sub ' FindSub() ermittelt alle Dateien mit der im Commondialog ' ausgew?hlten Dateiendung bis zur untersten Ebene ab dem gew?hlten 'Verzeichnis. ' Hierzu wird ein rekursiver Aufruf der Routine FindSub() eingesetzt. ' FindSub() determines all files with in the Commondialog the ' selected file dung up to the lowest level starting from the selected 'Verzeichnis. ' For this a recursive call of the routine FindSub() is used. Sub FindSub(strStart As String, strFindWhat As String) Dim arrFindDir() As String Dim strFind As String Dim i As Integer ChDrive (Left(strStart, 3)) ChDir (strStart) Call DirSub(strFindWhat, strStart) strFind = Dir("*.*", vbDirectory) i = 0 'ermittelt alle vorhandenen Dateien und Verzeichnisse im aktuellen 'Verzeichnis 'ermittelt all existing files and listings in the current 'Verzeichnis Do Until strFind = "" ReDim Preserve arrFindDir(i) arrFindDir(i) = strFind i = i + 1 strFind = Dir() Loop For i = 0 To UBound(arrFindDir) ' If... ermittelt ob es sich um ein Verzeichnis handelt ' und verzweigt dann rekursiv in dieses Verzeichnis If Dir(arrFindDir(i), vbNormal) = "" And Left(arrFindDir(i), 1) <> "." Then ' Rekursiver Aufruf von FindSub Call FindSub(strStart & arrFindDir(i) & "\", strFindWhat) ChDir (strStart) End If Next End Sub ' ermittelt alle gesuchten Dateien im momentan aktuellen Verzeichnis ' und gibt die gefundenen Dateien mit Pfad in eine Listenfeld (lstFiles)aus. ' determines all looked for files in the momentarily current listing ' and gives the found files with path in list field (lstFiles)aus. Sub DirSub(strFindWhat, strStart) Dim strFindfile As String strFindfile = Dir(strFindWhat, vbNormal) Do While strFindfile <> "" VersionTest strStart & strFindfile '.lstFiles.AddItem strStart & strFindfile strFindfile = Dir() Loop End Sub Charlotte Foust wrote: >We need to examine a datafile in code and convert it if it is in 2002 >format. Our users don't see the menu to do this, and we couldn't safely >leave it to them anyhow. There are no constants except >acCmdConvertDatabase, and the only code I've seen used SendKeys to run >that in A2k. Since 2002 has 3 formats for conversion and we wouldn't be >running this in the current database, it becomes problematic. > >Charlotte Foust > > >-----Original Message----- >From: Arthur Fuller [mailto:artful at rogers.com] >Sent: Thursday, July 22, 2004 2:03 PM >To: 'Access Developers discussion and problem solving' >Subject: RE: [AccessD] Database Conversion in VBA > > >Is there something wrong with doing it in the menu? Do you need to do it >programmatically? If so, there must be constants that you can pass in to >DoCmd that will achieve same. Never had the need to do it yet but what's >wrong with the menu options themselves? > >Just asking > >Arthur > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte >Foust >Sent: Thursday, July 22, 2004 4:59 PM >To: AccessD at databaseadvisors.com >Subject: [AccessD] Database Conversion in VBA > > >Has anyone succeeded in converting a database from 2002 to 2000 format >in code? No matter what I try, I only trigger the conversion dialog >without successfully passing in the arguments it needs. What I'm >looking for is 2002 code that will specify a database file and convert >that file to 2000 format. > >Charlotte Foust > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 24 16:29:24 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 24 Jul 2004 14:29:24 -0700 Subject: [AccessD] Database Conversion in VBA References: <4101C12F.4000503@shaw.ca> <1822827285.20040724100905@cactus.dk> Message-ID: <4102D4B4.60202@shaw.ca> Oops. In Versio test routine should be this line to open mdb as shared and readonly Set db = DBEngine.OpenDatabase(strpath, False, True) rather than Set db = DBEngine.OpenDatabase(strpath) Gustav Brock wrote: >Hi Marty > >Just curious - where will the code fail for read-only mdbs? > >/gustav > > > > >>This code will not be able to get at mdb's that are read only versions >>or those opened exclusively. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From Subscriptions at servicexp.com Sat Jul 24 19:05:27 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sat, 24 Jul 2004 20:05:27 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <4102D4B4.60202@shaw.ca> Message-ID: A2k Is it possible to detect external references made on an .mde from within the mde? Robert Gracie From joeget at vgernet.net Sun Jul 25 05:17:44 2004 From: joeget at vgernet.net (John Eget) Date: Sun, 25 Jul 2004 06:17:44 -0400 Subject: [AccessD] format access graph displayed data table Message-ID: <000a01c47230$a41bab90$11c2f63f@Desktop> I have a graph on a report with the data table showing. The numbers are standard however the displayed data table numbers are missing the 1000 separator. Does anyone know how to get the data table to display the separator? John From gustav at cactus.dk Sun Jul 25 06:31:43 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 13:31:43 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <93600443.20040725133143@cactus.dk> Hi Robert You can list them but, as far as I know, not change them - that's one of the limitations of an mde. /gustav > A2k > Is it possible to detect external references made on an .mde from > within the mde? From gustav at cactus.dk Sun Jul 25 07:00:59 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 14:00:59 +0200 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> Message-ID: <842356989.20040725140059@cactus.dk> Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried > compact/repair and jetcomp.exe. Can anyone help us get our form and code back? From gustav at cactus.dk Sun Jul 25 07:08:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 14:08:08 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <40FC0CB3.8060807@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> Message-ID: <1042785495.20040725140808@cactus.dk> Hi Marty > you can try to use the undocumented SaveAsText and LoadFromText, may > help if an object is corrupted or otherwise behaving weirdly. > At the debug/immediate window type: > Application.SaveAsText acForm,"MyForm","c:\form.txt > or depending on Access version > SaveAsText acForm,"MyForm","c:\form.txt > You can then load the file into a new MDB. > Application.LoadFromText acForm,"MyForm","c:\from.txt" This is very handy! Thanks for that tip. This way you can easily include a small form and other objects in a message like this without attachments. Have you more small gems like this? /gustav From Subscriptions at servicexp.com Sun Jul 25 08:20:24 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 09:20:24 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <93600443.20040725133143@cactus.dk> Message-ID: How can I list them?, I know how to get the reference collection for the "internal" references, but I have no idea how to find any external (other databases or programs connected (Referenced) to the mde) references. Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 7:32 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert You can list them but, as far as I know, not change them - that's one of the limitations of an mde. /gustav > A2k > Is it possible to detect external references made on an .mde from > within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Sun Jul 25 08:26:10 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Sun, 25 Jul 2004 09:26:10 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. One of the forms in our A2K app (the main form naturally) will not load and we cannot access the code-behind. We've tried > compact/repair and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com *********************************************************************************** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From gustav at cactus.dk Sun Jul 25 08:42:37 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 15:42:37 +0200 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? In-Reply-To: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> References: <22F1CCD5171D17419CB37FEEE09D5F99030FECAE@TTNEXCHSRV1.hshhp.com> Message-ID: <1938454126.20040725154237@cactus.dk> Hi Jim > .. there was a disturbing article at M$KB that said when the code > module disappears it cannot be recovered. It gave no explaination > for this condition and no solution. Sounds scarry. I'm glad I have a nightly backup for each day of the week from our Novell server. (Reminds me: Where is William these days? Lost in some Windows Server profiles again? Or is his energy left on the OT list?) /gustav From gustav at cactus.dk Sun Jul 25 09:07:09 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 16:07:09 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <769926102.20040725160709@cactus.dk> Hi Robert > How can I list them?, I know how to get the reference collection for the > "internal" references, but I have no idea how to find any external (other > databases or programs connected (Referenced) to the mde) references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? From Subscriptions at servicexp.com Sun Jul 25 12:11:42 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 13:11:42 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <769926102.20040725160709@cactus.dk> Message-ID: Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for the > "internal" references, but I have no idea how to find any external (other > databases or programs connected (Referenced) to the mde) references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Sun Jul 25 12:29:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 19:29:20 +0200 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: References: Message-ID: <184772410.20040725192920@cactus.dk> Hi Robert Sorry, missed that fine detail. No, I have no idea. If so, it should be recorded in the registry or somewhere else. Of course (dont't know how to do that?), you could ask your mde to record - whenever a database app references it - in the registry the name of that database. Not a very reliable method. Or in a table of its own. And that would not indicate the present use of the mde, only historical references. /gustav > Yea, that lists the reference made from within the database, but what I > need is to "Detect" references (external connections) to the mde. > Does this make any sense? > Robert Gracie > www.servicexp.com > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Sunday, July 25, 2004 10:07 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Detecting External References From With-In an > MDE? > Hi Robert >> How can I list them?, I know how to get the reference collection for the >> "internal" references, but I have no idea how to find any external (other >> databases or programs connected (Referenced) to the mde) references. From martyconnelly at shaw.ca Sun Jul 25 13:30:48 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sun, 25 Jul 2004 11:30:48 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> Message-ID: <4103FC58.9080201@shaw.ca> hmm.. I never thought of attaching form code to a newsgroup message this way. It would show the design quite easily However you might find this useful as it uses same method. Here is the method to dump everything in an mdb to text files in temp directory via saveastext--loadfromtext method into a new mdb and then compile it. Code is very busy and concise.. I borrowed it from an Lyle Fairfield, access newsgroup posting a long time ago. I have never seen GetObject used this way to startup a second version of Access. He was in charge of Dallas Fort Worth PC or Access UserGroup at one time. Maybe Drew has come across him. If you remove the kill txt statement, all your code will be available from the temporary text files in temp directory. This code is useful to try and recover clobbered or corrupted mdb files, if you can open the mdb. '=================================== 'code provided by Lyle Fairfield Sub BackUpThisTextFiles() Dim a(1 To 5) As String Dim bck As String Dim con As Container Dim doc As Document Dim objAccess As Access.Application Dim Ref As Reference Dim txt As String Dim zip As String Dim z As Long a(1) = "Tables" a(2) = "Forms" a(3) = "Reports" a(4) = "Scripts" a(5) = "Modules" bck = DBEngine(0)(0).Name bck = Left(bck, Len(bck) - 4) & "_BackUp.mdb" Do While Forms.Count > 0 DoCmd.Close acForm, Forms(0).Name Loop Do While Reports.Count > 0 DoCmd.Close acReport, Reports(0).Name Loop Do txt = Environ("temp") & "\" & CStr(Fix(Timer)) & ".txt" Loop Until Len(Dir$(txt)) = 0 SaveAsText 6, "", bck Set objAccess = GetObject(bck) On Error Resume Next With objAccess For Each Ref In .References .References.Remove Ref Next Ref End With For Each Ref In References With Ref If Not .BuiltIn Then objAccess.References.AddFromFile Ref.FullPath End With Next Ref Set Ref = Nothing For z = 1 To 5 Set con = DBEngine(0)(0).Containers(a(z)) With con For Each doc In .Documents With doc On Error Resume Next SaveAsText z, .Name, txt objAccess.Application.LoadFromText z, .Name, txt On Error GoTo 0 End With Next doc End With Next z Kill txt Set doc = Nothing Set con = Nothing With objAccess .DoCmd.OpenModule _ (.DBEngine(0)(0).Containers("Modules").Documents(0).Name) .DoCmd.RunCommand acCmdCompileAndSaveAllModules .Application.Quit End With Set objAccess = Nothing Shell SysCmd(acSysCmdAccessDir) & "MsAccess.Exe " & _ """" & bck & """" & "/compact" On Error Resume Next zip = bck FileName zip zip = "d:\" & Format(Now(), "yyyymmddhhnnss") & zip FileCopy bck, zip MsgBox "All Done Creating " & bck End Sub '=================================== Private Sub FileName(ByRef sIn As String) Dim pos As Long Dim posForwardSlash As Long pos = InStr(sIn, "\") posForwardSlash = InStr(sIn, "/") If pos = 0 Then pos = posForwardSlash If pos Then sIn = Mid(sIn, pos + 1) FileName sIn End If End Sub '=================================== Gustav Brock wrote: >Hi Marty > > > >>you can try to use the undocumented SaveAsText and LoadFromText, may >>help if an object is corrupted or otherwise behaving weirdly. >>At the debug/immediate window type: >>Application.SaveAsText acForm,"MyForm","c:\form.txt >>or depending on Access version >>SaveAsText acForm,"MyForm","c:\form.txt >>You can then load the file into a new MDB. >>Application.LoadFromText acForm,"MyForm","c:\from.txt" >> >> > >This is very handy! Thanks for that tip. >This way you can easily include a small form and other objects in a >message like this without attachments. > >Have you more small gems like this? > >/gustav > > > -- Marty Connelly Victoria, B.C. Canada From gustav at cactus.dk Sun Jul 25 13:50:01 2004 From: gustav at cactus.dk (Gustav Brock) Date: Sun, 25 Jul 2004 20:50:01 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <4103FC58.9080201@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> Message-ID: <435613561.20040725205001@cactus.dk> Great Marty! But are you sure it will save everything? If I try acTable it won't - error 2487, object type is empty or invalid for this method or action. /gustav > hmm.. I never thought of attaching form code to a newsgroup message > this way. > It would show the design quite easily > However you might find this useful as it uses same method. > Here is the method to dump everything in an mdb to text files in temp > directory via saveastext--loadfromtext method into a new mdb and then > compile it. From jwcolby at colbyconsulting.com Sun Jul 25 13:53:35 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 14:53:35 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: Message-ID: <000001c47278$b0bc7800$80b3fea9@ColbyM6805> Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Subscriptions at servicexp.com Sun Jul 25 14:14:10 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Sun, 25 Jul 2004 15:14:10 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: <000001c47278$b0bc7800$80b3fea9@ColbyM6805> Message-ID: My thought was to protect the "use" of the mde. The front end of one of my apps is an .mdb, and because of certain needs will need to remain as such. All of the "work" code is stored in an .mde. The problem is, that one can reference the .mde and pretty much use the code with-in the mde. I was first going to pass some encryption keys between the .mdb and the .mde to authenticate that it's the correct .mdb using the .mde. But I soon realized that would not work, as if the key was stripped from the .mdb then it would be useless. There must be a way to do this.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Detecting External References From With-In an MDE? Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 15:43:36 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 15:43:36 -0500 Subject: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB19D@main2.marlow.com> You're welcome. Just remember that my post was just a sketch. You would need to plan and build the system. There are a lot of variables that are too complex to try and incorporate into one post (or even several). Holler if you have more particular questions. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 5:00 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Thank you Drew! This is a whole area I don't know about, and your example looks like a great example to learn from. Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:49 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) As an addition to the email below, if you go this method, you can really save on form creation time, if you build your form one table at a time. Set the datasource of the form to the table. Put the fields on the table. then run code like this: Dim ctrl As Control Dim strCode As String Dim f As Long For Each ctrl In Me.Controls If TypeOf ctrl Is TextBox Or typeofctrl Is ComboBox Or typeofctrl Is CheckBox Then ctrl.Name = Me.RecordSource & "." & ctrl.ControlSource ctrl.ControlSource = "" ctrl.AfterUpdate = "[Event Procedure]" strCode = strCode & vbCrLf & "Private Sub " & Replace(ctrl.Name, ".", "_") & "_AfterUpdate()" & _ vbCrLf & "dim dp As DataPoint" & vbCrLf & "Set dp=dps.DataPointInfoByName(""" & _ ctrl.Name & """)" & vbCrLf & "dp.Value=Me(" & ctrl.Name & ")" & vbCrLf & _ "Set dp=Nothing" & vbCrLf & "End Sub" & vbCrLf End If Next f = FreeFile Open "C:\" & Me.RecordSource & "Code.txt" For Binary Access Write As f Put f, , strCode Close f Which would change the control names to Table.FieldName and build a little text file that you can just copy and paste into the code module behind the form, to handle the AfterUpdate events for those controls. Run that code every time you set a new table as the recordsource for the form, and it should drastically reduce development time. You may need to tweak that code, if you plan on putting in other events, etc. Also, the code is only looking for textboxes, comboboxes and checkboxes, you'd need to add any other controls that you may want to have 'unbound' data connected to them. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 3:28 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Yeah, build a class like this: Public Field1A Public Field2A Public Field1B Public Field2B Dim intID as Long Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter dim rs as adodb.recordset dim strSQL as string strSQL="SELECT * FROM tblA WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rs.EOF=True and rs.BOF=True then 'This catches anything where the key doesn't exist. rs.close set rs=nothing exit property end if Field1A=rs.fields(1).value Field2A=rs.fields(2).value rs.close set rs=nothing strSQL="SELECT * FROM tblB WHERE ID=" & intID Set rs=new adodb.recordset rs.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Field1B=rs.fields(1).value Field2B=rs.fields(2).value rs.close set rs=nothing End Property The above would work for an example, but quite frankly, I think a better approach, if you are looking at an ever expanding set of fields, instead of creating a property to hold the specific value, create a property that retrieves it's value from it's name. In other words, build a Class Like This: Public FieldName As String Public TableName as String Public Value as Variant Then, build a table, that lists the tables 'involved', along with their ID field. Have your 'Main' Class look like this: (Assume the above class is DataPoint) Dim DPs As Collection dim intID as Long Property Get DataPointCount() As Long DataPointCount=DPs.Count End Property Property Get DataPointInfoByName(strEnter as string) As DataPoint Set DataPointInfoByName=DPs(strEnter) End Property Property Get ID() As Long ID=intID End Property Property Let ID(intEnter as Long) intID=intEnter Dim rsTBLS As ADODB.Recordset Dim rsData As ADODB.Recordset Dim strSQL as String dim dp as DataPoint dim i as Long strSQL="SELECT TableName, IDField FROM tblMultiTables" set rsTBLS=new ADODB.Recordset rsTBLS.open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly Set DPs=New Collection If rsTBLS.EOF=False then rsTBLS.MoveFirst Do Until rsTBLS.EOF=True set rsDATA=New ADODB.Recordset strSQL="SELECT * FROM " & rsTBLS.Fields("TableName").Value & _ " WHERE " & rsTBLS.Fields("IDField").Value & "=" & intID rsDATA.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockReadOnly If rsDATA.EOF=False then rsDATA.MoveFirst For i=0 to rsDATA.Fields.Count-1 set dp=new DataPoint dp.TableName=rsTBLS("TableName").Value dp.FieldName=rsDATA.Fields(i).Name dp.Value=rsDATA.Fields(i).Value DPs.Add dp,dp.TableName & "." & dp.FieldName set dp=nothing Next i End if rsData.Close set rsDATA=Nothing rsTBLS.MoveNext Loop End if rsTBLS.Close set rsTBLS=Nothing End Sub Now, that would retrieve all of the data, and to retrieve a value, you would save the above Class As DataPoints, and use the Following code: dim dps as DataPoints dim dp as DataPoint set dps=new DataPoints dps.ID=1 set dp=dps.DataPointInfoByName("TableA.Field1") Now you have dp, that has a value property representing that field (along with that fields name, and table. Changing dp's value property, is going to change what's in the collection. So if you allow for changing of the data, you can then reverse the process, for a 'Save' function in the DataPoints class module, so that it saves the new values to the tables. Actually, before digging into this too far, if you do take this approach, try to map out what your real objectives are. There are things you can do that would take a little more time at the start, but save tons of time in the future. For example, if you really want the data to save on the fly, in the DataPoint class, put in a boolean, that on the initialization, the value is False, then, instead of a public statement to set the property directly to a variable, build get and let statements, and on the let statement, look to see if the boolean is False. If it is, the value is being set for the first time, so do nothing. (It's being set by the DataPoints class). If it isn't, then the value is being changed by the user, so write something like this: dim strSQL As String strSQL="UPDATE " & TableName & " SET [" & FieldName & "]=" & Value & " WHERE " & IDField & "=" & KeyID CurrentProject.Connection.Execute strSQL And bing, you just updated that value in the table. Now, in the code above, you would need to add the IDField and KeyID properties to the DataPoint Class (and set them when you're filling the collection in the DataPoints class). But technically speaking, I don't really think you're users would be able to actually perform data entry faster then what it would take for Access to update each field on the fly like that. Of course, you loose the 'restore' capability, or 'undo', but that is also something you could build into the DataPoint class (setting an internal oldvalue), that could be restored with a user event. That's what I mean about planning it out. Classes are extremely easy to use, the biggest obstacle is to do a little planning ahead, so as you are building the components, the right capabilities are built into the right components. Just something to munch on. Drew P.S.--I wrote every above in Outlook, so I didn't have a VBE correcting any types, or using intellisense, so the code above may have mistypes in it. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 2:04 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Now that is fascinating! When you say multiple recordsets, do you mean one from Table A, one from Table B, and so on? Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Friday, July 23, 2004 1:39 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Go with an unbound form. There is no limit to how many properties a Class can have, so build a class to represent a 'record', and fill it with multiple recordsets. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 1:23 PM To: Database Advisors Subject: FW: [AccessD] Need more than 255 fields! (was - Hit the Wall?) Any other ideas on ways to resolve this issue? Thanks! Dan Waters -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Thursday, July 22, 2004 8:45 PM To: Database Advisors Subject: [AccessD] Hit the Wall? In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From michael at ddisolutions.com.au Sun Jul 25 19:09:39 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Mon, 26 Jul 2004 10:09:39 +1000 Subject: [AccessD] Hit the Wall? Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AB5@ddi-pdc.ddisolutions.ddisolutions.com.au> Dan, We gave them a choice, we limit the # of columns or upgrade to SQL. They chose to limit the # of columns. I'm pretty sure my colleague tried joining multiple tables (1-1) but the query still choked on the 8K limit which makes sense as a query is just a virtual table. Boolean fields are 2 bytes so you should be OK regards Michael M Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 20:44:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 20:44:37 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1A0@main2.marlow.com> Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jul 25 21:11:17 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 22:11:17 -0400 Subject: [AccessD] Hit the Wall? In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1A0@main2.marlow.com> Message-ID: <000101c472b5$d9a59110$80b3fea9@ColbyM6805> I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Sun Jul 25 21:19:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Sun, 25 Jul 2004 21:19:00 -0500 Subject: [AccessD] Hit the Wall? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1A1@main2.marlow.com> maybe, I always thought yes/no were 1 byte on the disk......hmmmmm. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 9:11 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Sun Jul 25 21:51:00 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Sun, 25 Jul 2004 22:51:00 -0400 Subject: [AccessD] Hit the Wall? In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1A1@main2.marlow.com> Message-ID: <000201c472bb$65a4b380$80b3fea9@ColbyM6805> Either way, the savings are substantial, both in storage and in speed. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 10:19 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? maybe, I always thought yes/no were 1 byte on the disk......hmmmmm. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 9:11 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? I second that! If you have a lot of booleans, store them in a long, 31 booleans / long integer (avoid the math fun!). With a small module to handle the setting / clearing / reading of a bit you are off and running. MUCH less storage that using actual booleans (which I always thought were stored in one bit of a 16 bit value). JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 9:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew From bis at albury.net.au Mon Jul 26 02:10:59 2004 From: bis at albury.net.au (John Harris) Date: Mon, 26 Jul 2004 17:10:59 +1000 Subject: [AccessD] Drag & Drop Utility Message-ID: <000201c4730e$1b3dd530$0100a8c0@bis001> Greetings from Australia!! I have just downloaded a copy of your D & D utility. Just what I need. One question though: I assume (perhaps incorrectly) that one purpose of the utility is to allow controls to be moved when in form view. This would allow users for example to define their own form layout (at least for the items that were D&D enabled). On this basis, I assumed that if I move controls with D&D when in form view, I would still be asked to save the changes on exit - this does not happen. Am I misinterpreting the purpose of this utility. From jimdettman at earthlink.net Mon Jul 26 08:31:00 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 09:31:00 -0400 Subject: [AccessD] Detecting External References From With-In an MDE? In-Reply-To: Message-ID: Robert, << There must be a way to do this....>> What is it that you allow your users to do within the MDB FE? There should be some way that the MDE upon first run code "finger print" the MDB file. Or turn that around a bit; how about fingerprinting the machine it's installed on? Jim (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 3:14 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? My thought was to protect the "use" of the mde. The front end of one of my apps is an .mdb, and because of certain needs will need to remain as such. All of the "work" code is stored in an .mde. The problem is, that one can reference the .mde and pretty much use the code with-in the mde. I was first going to pass some encryption keys between the .mdb and the .mde to authenticate that it's the correct .mdb using the .mde. But I soon realized that would not work, as if the key was stripped from the .mdb then it would be useless. There must be a way to do this.... Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Sunday, July 25, 2004 2:54 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Detecting External References From With-In an MDE? Robert, I doubt it seriously. That would require code to run inside the db triggered by a reference being set to the db. An mde is just a library of code and is not supposed to run code "on its own". JWC -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Robert Gracie Sent: Sunday, July 25, 2004 1:12 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Detecting External References From With-In an MDE? Yea, that lists the reference made from within the database, but what I need is to "Detect" references (external connections) to the mde. Does this make any sense? Robert Gracie www.servicexp.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Sunday, July 25, 2004 10:07 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Detecting External References From With-In an MDE? Hi Robert > How can I list them?, I know how to get the reference collection for > the "internal" references, but I have no idea how to find any external > (other databases or programs connected (Referenced) to the mde) > references. Here is one method, filling a table: Option Compare Database Option Explicit ' Declarations and functions for creating and storing ' a list (table) of the current References. ' ' 2001-08-20. Cactus Data ApS, CPH. ' Length of GUID string per definition. Private Const clngGUID As Long = 38 Type GuidDefinition Guid As String * clngGUID Major As Integer Minor As Integer End Type ' Minimum Guid version. Private Const cintMajorMinVersion As Integer = 1 Private Const cintMinorMinVersion As Integer = 0 Private Const cstrReferencesTableName As String = "USysReferences" Private Const cintLocalTable As Integer = 1 Public Function CreateTableReferences() As Boolean Dim strSQL As String On Error Resume Next ' Create, without using DAO, table cstrReferencesTableName. strSQL = vbNullString & _ "CREATE TABLE " & cstrReferencesTableName & " " & _ "(" & _ "GuidString TEXT(38), " & _ "Major SMALLINT, " & _ "Minor SMALLINT, " & _ "Name TEXT(255) NOT NULL, " & _ "FullPath TEXT(255), " & _ "MajorMin SMALLINT, " & _ "MinorMin SMALLINT, " & _ "CONSTRAINT idxGuid PRIMARY KEY (GuidString)" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) CreateTableReferences = (Err = 0) End Function Public Function PopulateTableReferences( _ Optional ByVal booDisableLowerGuidVersions As Boolean) _ As Boolean Dim ref As Reference Dim strSQL As String ' If booDisableLowerGuidVersions is True, minimum values for Guid version ' will be set equal to current Guid version. ' If booDisableLowerGuidVersions is False, minimum values for Guid version ' will be set as defined by the global variables: ' cintMajorMinVersion ' cintMinorMinVersion On Error Resume Next ' Empty, without using DAO, table cstrReferencesTableName. strSQL = "DELETE * FROM " & cstrReferencesTableName & ";" DBEngine(0)(0).Execute (strSQL) ' Populate, without using DAO, table cstrReferencesTableName. For Each ref In References With ref strSQL = vbNullString & _ "INSERT INTO " & cstrReferencesTableName & " " & _ "VALUES(" & _ "'" & .Guid & "', " & _ "" & .Major & ", " & _ "" & .Minor & ", " & _ "'" & .Name & "', " & _ "'" & .FullPath & "', " & _ "" & IIf(booDisableLowerGuidVersions, .Major, cintMajorMinVersion) & ", " & _ "" & IIf(booDisableLowerGuidVersions, .Minor, cintMinorMinVersion) & "" & _ ")" & _ ";" DBEngine(0)(0).Execute (strSQL) End With Next Set ref = Nothing PopulateTableReferences = (Err = 0) End Function You can easily reduce it to just run a Debug.Print list if you wish. /gustav > You can list them but, as far as I know, not change them - that's one > of the limitations of an mde. > /gustav >> A2k >> Is it possible to detect external references made on an .mde from >> within the mde? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd 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 Jul 26 10:30:55 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jul 2004 08:30:55 -0700 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: Do you have SR-3 loaded on O2k? If not, and if you have any 2002 apps on your machine, or if you're exhanging files between a O2k and an OXP machine, you may have run into the problem caused by the VBE6.DLL installed by OXP breaking your 2000 code. That causes the problem you are seeing, and it can irreparably toast your code containers. In that case, a backup is your only solution. Loading SR-3 patches the Access executable so that it can deal with the "updated" vbe6.dll, but it won't recover one of those damaged mdbs. I don't have the MSKB article reference at hand, but it has been discussed before and should be in the archives. Charlotte Foust -----Original Message----- From: Jim DeMarco [mailto:Jdemarco at hudsonhealthplan.org] Sent: Sunday, July 25, 2004 5:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. > One of the forms in our A2K app (the main form naturally) will not > load and we cannot access the code-behind. We've tried compact/repair > and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ************************************************************************ *********** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". ************************************************************************ *********** -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Jdemarco at hudsonhealthplan.org Mon Jul 26 10:43:32 2004 From: Jdemarco at hudsonhealthplan.org (Jim DeMarco) Date: Mon, 26 Jul 2004 11:43:32 -0400 Subject: [AccessD] URGENT!! A2K - form won't load; is code lost?? Message-ID: <22F1CCD5171D17419CB37FEEE09D5F9903740B18@TTNEXCHSRV1.hshhp.com> Good points Charlotte. I thought he was using 2002 for development but it turns out its 2000 with SR-1. Maybe this will help. Thanks, Jim DeMarco -----Original Message----- From: Charlotte Foust [mailto:cfoust at infostatsystems.com] Sent: Monday, July 26, 2004 11:31 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Do you have SR-3 loaded on O2k? If not, and if you have any 2002 apps on your machine, or if you're exhanging files between a O2k and an OXP machine, you may have run into the problem caused by the VBE6.DLL installed by OXP breaking your 2000 code. That causes the problem you are seeing, and it can irreparably toast your code containers. In that case, a backup is your only solution. Loading SR-3 patches the Access executable so that it can deal with the "updated" vbe6.dll, but it won't recover one of those damaged mdbs. I don't have the MSKB article reference at hand, but it has been discussed before and should be in the archives. Charlotte Foust -----Original Message----- From: Jim DeMarco [mailto:Jdemarco at hudsonhealthplan.org] Sent: Sunday, July 25, 2004 5:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] URGENT!! A2K - form won't load; is code lost?? Yes but that did not work (the code was not present and the form would not load). We ended up recovering most of the code from a backup but there was a disturbing article at M$KB that said when the code module disappears it cannot be recovered. It gave no explaination for this condition and no solution. Thanks, Jim DeMarco -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Sunday, July 25, 2004 8:01 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] URGENT!! A2K - form won't load; is code lost?? Hi Jim I noticed your message today ... I guess you have tried to import it in a new database? /gustav > I've got an extremely urgent matter I hope someone can help me with. > One of the forms in our A2K app (the main form naturally) will not > load and we cannot access the code-behind. We've tried compact/repair > and jetcomp.exe. Can anyone help us get our form and code back? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ************************************************************************ *********** "This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". ************************************************************************ *********** -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/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 electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited. If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message. Thank You". *********************************************************************************** From Mark.Mitsules at ngc.com Mon Jul 26 13:38:14 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 14:38:14 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark From markamatte at hotmail.com Mon Jul 26 14:34:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Mon, 26 Jul 2004 19:34:58 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ From jimdettman at earthlink.net Mon Jul 26 14:54:22 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 15:54:22 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 26 14:58:15 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 26 Jul 2004 12:58:15 -0700 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark select * from myTable where myFieldName like *Mark* The previous sql should return all matches, from table myTable where the word 'Mark' is anywhere in the field myFieldName. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 11:38 AM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From accessd at shaw.ca Mon Jul 26 15:04:02 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Mon, 26 Jul 2004 13:04:02 -0700 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: Hi Mark: If you want to update anything in a table you have to use the 'Update' sql string. Just go into the query form and select query type Update. It should be easy to proceed from there. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 12:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 26 15:19:23 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 26 Jul 2004 16:19:23 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <001901c4734d$db144030$80b3fea9@ColbyM6805> Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Mon Jul 26 15:29:52 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Mon, 26 Jul 2004 16:29:52 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <001901c4734d$db144030$80b3fea9@ColbyM6805> Message-ID: John, <> Your right; I just double checked. Was always under the impression that it did. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jul 26 15:34:11 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 16:34:11 -0400 Subject: [AccessD] Multiple Table Search Message-ID: >>My take was that he wanted to find DATA from a record inside any of 100 tables.<< Correct. >>AFAIK Find and replace will not find data<< I'd like to confirm this before downloading or installing these products. Thanks, Mark -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Mon Jul 26 15:37:35 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Mon, 26 Jul 2004 16:37:35 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Jim, Thanks for the reply. How about where myTable can be any of 70+ tables and myFieldName can be any field within those 70+ tables? Mark -----Original Message----- From: Jim Lawrence (AccessD) [mailto:accessd at shaw.ca] Sent: Monday, July 26, 2004 3:58 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark select * from myTable where myFieldName like *Mark* The previous sql should return all matches, from table myTable where the word 'Mark' is anywhere in the field myFieldName. HTH Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 11:38 AM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jul 26 15:53:18 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 15:53:18 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AB@main2.marlow.com> Hang on, working on a solution right now. Should have it done in about 20 minutes (after I go have a cigarette). I was just about finished, and had to have an impromptu meeting. Just got done, so don't buy anything yet, I'm gonna have a VBA method for you. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 1:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Mon Jul 26 16:51:58 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Mon, 26 Jul 2004 17:51:58 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <001c01c4735a$c968dc80$80b3fea9@ColbyM6805> Mark, These products are both excellent but are aimed at finding OBJECTS in a database, things like discovering where fields of a table are used in queries, forms and reports. Where references to forms are used in code or in queries etc. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 4:34 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search >>My take was that he wanted to find DATA from a record inside any of >>100 tables.<< Correct. >>AFAIK Find and replace will not find data<< I'd like to confirm this before downloading or installing these products. Thanks, Mark -----Original Message----- From: John W. Colby [mailto:jwcolby at colbyconsulting.com] Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Mon Jul 26 17:05:27 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 17:05:27 -0500 Subject: [AccessD] Query giving different results each time Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AC@main2.marlow.com> Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 Mon Jul 26 18:33:45 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Mon, 26 Jul 2004 16:33:45 -0700 Subject: [AccessD] Multiple Table Search Message-ID: You can search for values with SpeedFerret, but I haven't actually used that feature. Charlotte -----Original Message----- From: Jim Dettman [mailto:jimdettman at earthlink.net] Sent: Monday, July 26, 2004 12:30 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search John, <> Your right; I just double checked. Was always under the impression that it did. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Mon Jul 26 20:09:23 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 11:09:23 +1000 Subject: [AccessD] Drag & Drop Utility References: <000201c4730e$1b3dd530$0100a8c0@bis001> Message-ID: <005a01c47376$5b07a7a0$48619a89@DDICK> Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From markamatte at hotmail.com Mon Jul 26 20:45:34 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 01:45:34 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, Thanks for the feedback...but I'm still a little confused...If I am running the same SQL against the same table...back to back...why am I getting different results? Thanks, Mark >From: DWUTKA at marlow.com >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time >Date: Mon, 26 Jul 2004 17:05:27 -0500 > >Okay, here ya go. I built this into a form, because it uses a lot of >'techniques' to get things done. (Class modules, collections, callback >functions (for the list box)), along with all of the associated properties >that need to be set to get things done. So instead of trying to explain >how >to build the form, I'm just posting a link to download it. Right now, my >DSL is down (in case anyone wondered why the archives on my site weren't >there.....), it will be back up Thursday...so within a few days of that, I >will try to remember to put this file on my website. >(http://www.wolfwares.com) > >Until then, I put it on my company's website, for download. > >http://www.marlow.com/FindAllData.zip > >The zipped database has a form, query, and class module. Just import all >three into whatever database you want. Open the form, enter the search >criteria, and click the button. All applicable hits will be displayed in >the listbox. You can then double click the listbox to display either the >particular record (if a primary key for that table exists), or for all of >the results off of that table. > >Boy, that was actually fun to build! > >Drew > >FYI: This code only searches for text, in text and memo fields. It also >automatically puts astericks around the search criteria, so if you want to >put astericks inside the criteria, go ahead, but they're not necessary on >the outside. If you want to search number fields, the code could be >modified to do that. Actually, if there is enough of a request for it, I >could modify the search form to have different search boxes (text, >currency, >date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The >sample I built is in 97, which has DAO set by default, but if you use A2k, >make sure you have DAO selected. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Monday, July 26, 2004 2:35 PM >To: accessd at databaseadvisors.com >Subject: [AccessD] Query giving different results each time > > >Hello All, > >In A97 I am running a local query...I couldn't get the results I >wanted...so > >I kept treaking my criteria...but then I realized...that if I didn'tchange >anything...I would get slightly different results...each time I ran it. It >would omit 1-5 rows...but not the same ones. > >Desperately confused...any insight? > >Thanks, > >Mark A. Matte > >SQL: > >SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, >tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, >tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone >FROM tblPRS_Pending_PHONE >WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt >FROM tblPRS_Pending_PHONE A >WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND >((tblPRS_Pending_PHONE.primary_ind)="y")); > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From itsame2000 at sbcglobal.net Mon Jul 26 20:59:47 2004 From: itsame2000 at sbcglobal.net (Jeremy Toves) Date: Mon, 26 Jul 2004 18:59:47 -0700 (PDT) Subject: [AccessD] Drag & Drop Utility In-Reply-To: <005a01c47376$5b07a7a0$48619a89@DDICK> Message-ID: <20040727015947.27971.qmail@web81506.mail.yahoo.com> I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? Thanks! Darren DICK wrote:Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 26 20:55:16 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 26 Jul 2004 18:55:16 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> Message-ID: <4105B604.3030508@shaw.ca> I had a closer look at the code This doesn't seem to work with tables. SaveAsText 0,"Products","C:\Program Files\Microsoft Office\Office\Samples\Northwind_BackUp.mdb" This doesn't seem to work with certain queries if you are scanning through all the document names. SaveAsText 1,"Products","C:\Program Files\Microsoft Office\Office\Samples\Northwind_BackUp.mdb" However this method below entering the table name by grabbing it from document containers from within NorthWind works. It must have something to do with LPSTR or BSTR strings, I tried fiddling with various methods to get it to accept a C like null terminated string, nothing seemed to work This piece of code copies the queries but it fails with the on error resume statement so it skips the garbled table names. Sub testit() Dim con As Container Dim doc As Document Set con = DBEngine(0)(0).Containers("Tables") With con For Each doc In .Documents With doc On Error Resume Next SaveAsText 1, .Name, "C:\Program Files\Microsoft Office\Office\Samples\TextDump_" &.name & ".txt" Debug.Print "*" & .Name & "*" On Error GoTo 0 End With Next doc End With End Sub Where the tables and relationships are copied is; in this even deeper undocumented call in the code SaveAsText 6, "", bck Which stand alone would look like this. SaveAsText 6,"", "C:\Program Files\Microsoft Office\Office\Samples\TextDump2.mdb" LoadFromText/SaveAsText are undocumented methods used by VSS integration. The "6" param copies the "ACB" portion that is checked in.... it includes project refs, tables, relationships, commandbars, and import specs. Gustav Brock wrote: >Great Marty! > >But are you sure it will save everything? > >If I try acTable it won't - error 2487, object type is empty or >invalid for this method or action. > >/gustav > > > > >>hmm.. I never thought of attaching form code to a newsgroup message >>this way. >>It would show the design quite easily >> >> > > > >>However you might find this useful as it uses same method. >> >> > > > >> Here is the method to dump everything in an mdb to text files in temp >>directory via saveastext--loadfromtext method into a new mdb and then >>compile it. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From d.dick at uws.edu.au Mon Jul 26 21:15:22 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 12:15:22 +1000 Subject: [AccessD] Drag & Drop Utility References: <20040727015947.27971.qmail@web81506.mail.yahoo.com> Message-ID: <009f01c4737f$9254fa60$48619a89@DDICK> It's free go to the Database Advisors website Have a look at the downloads section www.databaseadvisors.com ----- Original Message ----- From: "Jeremy Toves" To: "Access Developers discussion and problem solving" Sent: Tuesday, July 27, 2004 11:59 AM Subject: Re: [AccessD] Drag & Drop Utility > I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? > > Thanks! > > > > Darren DICK wrote:Hi John > Yes the drag and drop just gives you the ability to 'move' things on the screen > It is up to you to specify how you store 'the new coordinates' > In my 'in use' application I have fields in a table that hold the > Top, Left, Height, Width for each control on my 'ID Card' design area. > So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but > hold the new coordinates for each move. On the mouse up I record where the 'Drop' > finished and I put those 'coordinates' straight into the table. > When the ID Card design form is opened I get those coordinates and 'move' > all the controls to where they were last dropped. > > But there would be a myriad of ways to achieve this much more cleverly than what I am doing > > Make sense? > > Hope this helps > > Darren > > > > > ----- Original Message ----- > From: "John Harris" > To: > Sent: Monday, July 26, 2004 5:10 PM > Subject: [AccessD] Drag & Drop Utility > > > > Greetings from Australia!! > > > > I have just downloaded a copy of your D & D utility. Just what I need. > > > > One question though: I assume (perhaps incorrectly) that one purpose > > of the utility is to allow controls to be moved when in form view. > > This would allow users for example to define their own form layout (at > > least for the items that were D&D enabled). On this basis, I assumed > > that if I move controls with D&D when in form view, I would still be > > asked to save the changes on exit - this does not happen. > > > > Am I misinterpreting the purpose of this utility. > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > 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 Jul 26 21:36:08 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Mon, 26 Jul 2004 21:36:08 -0500 Subject: [AccessD] Drag & Drop Utility Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1AE@main2.marlow.com> It's in the downloads section of http://databaseadvisors.com . And it's free. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Jeremy Toves Sent: Monday, July 26, 2004 9:00 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Drag & Drop Utility I don't know if it was mentioned on a previous email. Where can a person get the drag and drop download? What is the cost? Thanks! Darren DICK wrote:Hi John Yes the drag and drop just gives you the ability to 'move' things on the screen It is up to you to specify how you store 'the new coordinates' In my 'in use' application I have fields in a table that hold the Top, Left, Height, Width for each control on my 'ID Card' design area. So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but hold the new coordinates for each move. On the mouse up I record where the 'Drop' finished and I put those 'coordinates' straight into the table. When the ID Card design form is opened I get those coordinates and 'move' all the controls to where they were last dropped. But there would be a myriad of ways to achieve this much more cleverly than what I am doing Make sense? Hope this helps Darren ----- Original Message ----- From: "John Harris" To: Sent: Monday, July 26, 2004 5:10 PM Subject: [AccessD] Drag & Drop Utility > Greetings from Australia!! > > I have just downloaded a copy of your D & D utility. Just what I need. > > One question though: I assume (perhaps incorrectly) that one purpose > of the utility is to allow controls to be moved when in form view. > This would allow users for example to define their own form layout (at > least for the items that were D&D enabled). On this basis, I assumed > that if I move controls with D&D when in form view, I would still be > asked to save the changes on exit - this does not happen. > > Am I misinterpreting the purpose of this utility. > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Mon Jul 26 22:28:09 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Mon, 26 Jul 2004 20:28:09 -0700 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> Message-ID: <4105CBC9.3090804@shaw.ca> But this odd command leads to something more interesting. You could use this saveastext 6,"","some.mdb" command to do regular unattended backups of your backend on some hourly basis. Even when the backend is in use. This seems to work, regardless of the state of the db, that is, tables can be open, but it copies them anyway, including data entered during the current open state, but it doesn't copy changed or new data in a dirty record. In your backend mdb you have this code You could put this in a module in your back-end data file and have it conditionally execute based on a what you pass it in the /cmd argument of the command line you use to open it. If Command = "Backup" Then BackTest End If Sub BackTemp() Dim a As New Access.Application Set a = New Access.Application With a .OpenCurrentDatabase "C:\Documents and Settings\Some User\My Documents\db2.mdb", False,True .SaveAsText 6, "", "C:\Documents and Settings\Some User\My Documents\db2Backup.mdb" .Quit acQuitSaveNone End With Set a = Nothing End Sub Then you'd open the back end with this command line: "C:\Program Files\Microsoft Office\Office\MSAccess.exe" "[data file path/name]" /cmd "Backup" You could have this command line executed on your server at a scheduled time. Of course, there could be problems there, as in some circumstances, applications with a UI won't run properly when invoked when there is no one logged into the server console. There is no real way to do this without opening the actual data file in the Access UI, because SaveAsText operates only on the MDB currently open in the Access user interface. Gustav Brock wrote: >Great Marty! > >But are you sure it will save everything? > >If I try acTable it won't - error 2487, object type is empty or >invalid for this method or action. > >/gustav > > > > >>hmm.. I never thought of attaching form code to a newsgroup message >>this way. >>It would show the design quite easily >> >> > > > >>However you might find this useful as it uses same method. >> >> > > > >> Here is the method to dump everything in an mdb to text files in temp >>directory via saveastext--loadfromtext method into a new mdb and then >>compile it. >> >> > > > -- Marty Connelly Victoria, B.C. Canada From stuart at lexacorp.com.pg Mon Jul 26 23:01:07 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 14:01:07 +1000 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <41066023.19756.4869A4B@lexacorp.com.pg> On 27 Jul 2004 at 1:45, Mark A Matte wrote: > Hello All, > > Thanks for the feedback...but I'm still a little confused...If I am running > the same SQL against the same table...back to back...why am I getting > different results? > > A corrupt index? Have you tried a compact and repair? -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From d.dick at uws.edu.au Mon Jul 26 23:29:44 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 14:29:44 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <00f001c47392$57fb6850$48619a89@DDICK> Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren From stuart at lexacorp.com.pg Mon Jul 26 23:41:06 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 14:41:06 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <00f001c47392$57fb6850$48619a89@DDICK> Message-ID: <41066982.28886.4AB3265@lexacorp.com.pg> > > So I thought I would just launch the app from the users desktop with a BATCH file. > The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > IIRC, in Win9X, you need to specify the application in batch files (and in scheduled tasks?) so you will need something like: "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program Files\Truman\Truman.mdb" -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From d.dick at uws.edu.au Mon Jul 26 23:49:09 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Tue, 27 Jul 2004 14:49:09 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <41066982.28886.4AB3265@lexacorp.com.pg> Message-ID: <010a01c47395$0e0d23c0$48619a89@DDICK> Thanks Stuart That sounds about right Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Tuesday, July 27, 2004 2:41 PM Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > So I thought I would just launch the app from the users desktop with a BATCH file. > > The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, > > all from within the batch file Simple - on XP and WIN2000 at least > > > > Here is the batch file............... > > REM START BATCH FILE########################################### > > echo Updating your system to the latest Version of TruMan... > > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > c:\Progra~1\Truman\Truman.mdb > > REM END BATCH FILE ########################################### > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... > > 1 file(s) copied (Great it copied the file) > > Bad command or file name (Bugger it doesn't spark up the app) > > > > The S drive location of the new app is valid. The destination folder in Program files and the existence > > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > > > The on the Win 98 machine if I copy the line " > > c:\Progra~1\Truman\Truman.mdb" from the batch file and > > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app > > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > > > I'm stumped - any suggestions? > > > > IIRC, in Win9X, you need to specify the application in batch files (and in > scheduled tasks?) so you will need something like: > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > Files\Truman\Truman.mdb" > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Tue Jul 27 01:38:23 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Tue, 27 Jul 2004 07:38:23 +0100 Subject: [AccessD] Multiple Table Search In-Reply-To: <001c01c4735a$c968dc80$80b3fea9@ColbyM6805> Message-ID: <000b01c473a4$50b75740$b274d0d5@minster33c3r25> Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From mgauk at btconnect.com Tue Jul 27 02:48:14 2004 From: mgauk at btconnect.com (MG) Date: Tue, 27 Jul 2004 08:48:14 +0100 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <00f001c47392$57fb6850$48619a89@DDICK> Message-ID: <200407270749.i6R7nhQ20268@databaseadvisors.com> Here is the code that I use. I put in each person's c:\ root and then call it in their startup menu. Adjust to suit. Max Sherman CODE: ' Max Sherman Jan 2004 ' Program to run (1) from Startup and (2) from User Desktop ' copies over the version on the Server to the user's PC - It does not check for dates as per Version 1. ' It also synchonises times on all machine to agree with that on Server. Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, fOnServerPC, fOnLocalPC Dim strUser,objShell,objNetwork Set FSO = CreateObject("Scripting.FileSystemObject") Set objShell = wscript.createobject("WScript.shell") Set objNetwork = wscript.createobject("WScript.Network") strUser = objnetwork.userdomain ' wscript.echo struser objShell.run("NET TIME \\Server /SET /YES") if strUser = "MAX" then ' wscript.Echo "Skipped" else fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" wscript.Echo ("Checking For MCM File Updates: Please Click OK and then wait until the messagebox re-appears") ' Server File If (FSO.FileExists(fOnServerPC)) Then Set fServer = FSO.GetFile(fOnServerPC) FSO.CopyFile fOnServerPC , fOnLocalPC wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now been copied onto your computer") Else wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is missing from the Server. Please Report This Immediately") End If End if Set FSO = nothing set objShell = nothing set objNetworkl = nothing -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: 27 July 2004 05:30 To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From mgauk at btconnect.com Tue Jul 27 02:57:21 2004 From: mgauk at btconnect.com (MG) Date: Tue, 27 Jul 2004 08:57:21 +0100 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <200407270757.i6R7vKQ29697@databaseadvisors.com> Sorry, I should have said that the filename for the vbs code I just posted, must end in .vbs so that your operating system can find it. Don't know if it will run on 98 machines though. Max Sherman -----Original Message----- From: MG [mailto:mgauk at btconnect.com] Sent: 27 July 2004 08:48 To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy Here is the code that I use. I put in each person's c:\ root and then call it in their startup menu. Adjust to suit. Max Sherman CODE: ' Max Sherman Jan 2004 ' Program to run (1) from Startup and (2) from User Desktop ' copies over the version on the Server to the user's PC - It does not check for dates as per Version 1. ' It also synchonises times on all machine to agree with that on Server. Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, fOnServerPC, fOnLocalPC Dim strUser,objShell,objNetwork Set FSO = CreateObject("Scripting.FileSystemObject") Set objShell = wscript.createobject("WScript.shell") Set objNetwork = wscript.createobject("WScript.Network") strUser = objnetwork.userdomain ' wscript.echo struser objShell.run("NET TIME \\Server /SET /YES") if strUser = "MAX" then ' wscript.Echo "Skipped" else fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" wscript.Echo ("Checking For MCM File Updates: Please Click OK and then wait until the messagebox re-appears") ' Server File If (FSO.FileExists(fOnServerPC)) Then Set fServer = FSO.GetFile(fOnServerPC) FSO.CopyFile fOnServerPC , fOnLocalPC wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now been copied onto your computer") Else wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is missing from the Server. Please Report This Immediately") End If End if Set FSO = nothing set objShell = nothing set objNetworkl = nothing -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: 27 July 2004 05:30 To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From gustav at cactus.dk Tue Jul 27 02:59:08 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 09:59:08 +0200 Subject: [AccessD] SaveAsText, LoadFromText (was: URGENT!! A2K - form won't load; is code lost??) In-Reply-To: <4105CBC9.3090804@shaw.ca> References: <22F1CCD5171D17419CB37FEEE09D5F9903740A43@TTNEXCHSRV1.hshhp.com> <40FC0CB3.8060807@shaw.ca> <1042785495.20040725140808@cactus.dk> <4103FC58.9080201@shaw.ca> <435613561.20040725205001@cactus.dk> <4105CBC9.3090804@shaw.ca> Message-ID: <1077409394.20040727095908@cactus.dk> Hi Marty Oh, that was lot of stuff! Thanks. I'll have a look at it later (having some real work to do right now). /gustav > But this odd command leads to something more interesting. > You could use this > saveastext 6,"","some.mdb" > command to do regular unattended backups of your backend on some hourly > basis. > Even when the backend is in use. From gustav at cactus.dk Tue Jul 27 03:49:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 10:49:20 +0200 Subject: [AccessD] Drag & Drop Utility In-Reply-To: <005a01c47376$5b07a7a0$48619a89@DDICK> References: <000201c4730e$1b3dd530$0100a8c0@bis001> <005a01c47376$5b07a7a0$48619a89@DDICK> Message-ID: <3910421415.20040727104920@cactus.dk> Hi Darren I haven't paid this util much notice ... but wouldn't it be possible to build a poor man's (= user safe) report "designer" this way - without having the user have access to reports in design mode. A form could simulate the report layout. Then the user could move the controls around and resize and change fonts etc. All it does is saving the positions and a few other properties in a table which you read at report open? Drew? 20 minutes and a cigarette. Much more needed? /gustav > Hi John > Yes the drag and drop just gives you the ability to 'move' things on the screen > It is up to you to specify how you store 'the new coordinates' > In my 'in use' application I have fields in a table that hold the > Top, Left, Height, Width for each control on my 'ID Card' design area. > So I have 8 controls on my ID card so I have 32 fields in my table that do nothing but > hold the new coordinates for each move. On the mouse up I record where the 'Drop' > finished and I put those 'coordinates' straight into the table. > When the ID Card design form is opened I get those coordinates and 'move' > all the controls to where they were last dropped. > But there would be a myriad of ways to achieve this much more cleverly than what I am doing > Make sense? > Hope this helps > Darren > ----- Original Message ----- > From: "John Harris" > To: > Sent: Monday, July 26, 2004 5:10 PM > Subject: [AccessD] Drag & Drop Utility >> Greetings from Australia!! >> >> I have just downloaded a copy of your D & D utility. Just what I need. >> >> One question though: I assume (perhaps incorrectly) that one purpose >> of the utility is to allow controls to be moved when in form view. >> This would allow users for example to define their own form layout (at >> least for the items that were D&D enabled). On this basis, I assumed >> that if I move controls with D&D when in form view, I would still be >> asked to save the changes on exit - this does not happen. >> >> Am I misinterpreting the purpose of this utility. From carbonnb at sympatico.ca Tue Jul 27 04:27:01 2004 From: carbonnb at sympatico.ca (Bryan Carbonnell) Date: Tue, 27 Jul 2004 05:27:01 -0400 Subject: [AccessD] Drag & Drop Utility In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1AE@main2.marlow.com> Message-ID: <4105E7A5.6004.16A2EF@localhost> On 26 Jul 2004 at 21:36, DWUTKA at marlow.com wrote: > It's in the downloads section of http://databaseadvisors.com . And > it's free. Actually its on http://www.databaseadvisors.com http://databaseadvisors.com is a different server. -- Bryan Carbonnell - carbonnb at sympatico.ca I've learned.... That having a child fall asleep in your arms is one of the most peaceful feelings in the world. From dwilliams_78704 at yahoo.com Tue Jul 27 06:44:33 2004 From: dwilliams_78704 at yahoo.com (dan williams) Date: Tue, 27 Jul 2004 04:44:33 -0700 (PDT) Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: <20040727114433.59081.qmail@web50809.mail.yahoo.com> probably are looking for a union - this looks thru different table with a prompt for a last name select [BoardCommLastName], [BoardCommFirstName], [BoardCommCommissionTitleName],[BoardCommDateAppointed], [BoardCommDateOfExpiration], [BoardCommDateOfCommission], [BoardCommDateOfOath] from [tblBoards&Commission] WHERE ((([tblBoards&Commission].BoardCommLastName) Like [Type the last name followed by *:])) UNION select [BranchPilotsLastName], [BranchPilotsFirstName], [BranchPilotsPort],[BranchPilotsDateOfAppointment], [BranchPilotsDateOfExpiration], [BranchPilotsDateOfCommission], [BranchPilotsDateOfOath] from [tblBranchPilots] WHERE ((([tblBranchPilots].BranchPilotsLastName) Like [Type the last name followed by *:])) UNION select [DistrictAttorneyLastName], [DistrictAttorneyFirstName], [DistrictAttorneyTitle], [DistrictAttorneyDateOfAppointment], [DistrictAttorneyDateOfExpiration], [DistrictAttorneyDateOfCommission], [DistrictAttorneyDateOfOath] from [tblDistrictAttorneys] WHERE ((([tblDistrictAttorneys].DistrictAttorneyLastName) Like [Type the last name followed by *:])) UNION select [DistrictJudgesLastName], [DistrictJudgesFirstName], [DistrictJudgesFormOfAddress], [DistrictJudgesDateOfAppointment], [DistrictJudgesDateOfExpiration], [DistrictJudgesDateOfCommission], [DistrictJudgesDateOfOath] from [tblDistrictJudges] WHERE ((([tblDistrictJudges].DistrictJudgesLastName) Like [Type the last name followed by *:])) UNION select [ElectedOfficialsLastName], [ElectedOfficialsFirstName], [ElectedOfficialsTitle], [ElectedOfficialsDateElected], [ElectedOfficialsDateOfExpiration], [ElectedOfficialsDateOfCommission], [ElectedOfficialsDateOfOath] from [tblElectedStateOfficials] WHERE ((([tblElectedStateOfficials].ElectedOfficialsLastName) Like [Type the last name followed by *:])) UNION select [HigherCourtLastName], [HigherCourtFirstName], [HigherCourtFormOfAddress], [HigherCourtDateOfAppointment], [HigherCourtDateOfExpiration], [HigherCourtDateOfCommission], [HigherCourtDateOfOath] from [tblHigherCourts] WHERE ((([tblHigherCourts].HigherCourtLastName) Like [Type the last name followed by *:])) UNION select [SpecialJudgesAppointedJudge], [SpecialJudgesAppointedJudge], [SpecialJudgesFormOfAddress], [SpecialJudgesDateOfAppointment], [SpecialJudgesDateOfCommission], [SpecialJudgesDateOfCommission], [SpecialJudgesDateOfCommission] from [tblSpecialCountyJudges] WHERE ((([tblSpecialCountyJudges].SpecialJudgesAppointedJudge) Like [Type the last name followed by *:])) UNION select [TaskForceLastName], [TaskForceFirstName], [TaskForceName], [TaskForceDateOfAppointment], [TaskForceDateOfExpiration], [TaskForceDateOfCommission], [TaskForceDateOfOath] from [tblTaskForce] WHERE ((([tblTaskForce].TaskForceLastName) Like [Type the last name followed by *:])) ORDER BY 1; --- "Mitsules, Mark S. (Newport News)" wrote: > Jim, > > Thanks for the reply. How about where myTable can > be any of 70+ tables and > myFieldName can be any field within those 70+ > tables? > > Mark > > > > -----Original Message----- > From: Jim Lawrence (AccessD) > [mailto:accessd at shaw.ca] > Sent: Monday, July 26, 2004 3:58 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark > > select * from myTable where myFieldName like *Mark* > > The previous sql should return all matches, from > table myTable where the > word 'Mark' is anywhere in the field myFieldName. > > HTH > Jim > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Mitsules, Mark > S. (Newport News) > Sent: Monday, July 26, 2004 11:38 AM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am > not familiar enough > with the data to do an educated search. What is > the simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > __________________________________ Do you Yahoo!? Yahoo! Mail - You care about security. So do we. http://promotions.yahoo.com/new_mail From Mark.Mitsules at ngc.com Tue Jul 27 06:46:45 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 27 Jul 2004 07:46:45 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Thanks Andy! I was disappointed when I came in this morning and saw no reply from Drew. I was looking forward to seeing Drew's suggestion and was single-mindedly oblivious to all other posts. Mark -----Original Message----- From: Andy Lacey [mailto:andy at minstersystems.co.uk] Sent: Tuesday, July 27, 2004 2:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Tue Jul 27 07:12:50 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Tue, 27 Jul 2004 22:12:50 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <200407270757.i6R7vKQ29697@databaseadvisors.com> Message-ID: <4106D362.1138.648C323@localhost> > Sorry, I should have said that the filename for the vbs code I just posted, > must end in .vbs so that your operating system can find it. Don't > know if it will run on 98 machines though. > It also requires the Windows Scripting Host to be enabled. Many PCs have it turned off for security reasons. WSH is a primary vector for viruses/malicious code. -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From mikedorism at adelphia.net Tue Jul 27 07:15:19 2004 From: mikedorism at adelphia.net (Mike & Doris Manning) Date: Tue, 27 Jul 2004 08:15:19 -0400 Subject: [AccessD] Offsite Developer needed immediately Message-ID: <000001c473d3$628df260$cc0aa845@hargrove.internal> I recently took on what I thought was going to be a simple project for a company in Louisville, Kentucky. The project scope has mushroomed and due to life commitments (my only sister is due to give birth to nephew/niece #3 any day now), I can't give them the attention they deserve. Rather than leave them hanging, I'd like to find them someone with the right skill set and immediately available time to take over. Knowledge needed: Great Plains/Dynamics and Crystal Reports. Project scope: 1) Build a Crystal Report version of the Dynamics Invoice. 2) Create a tool (using Access Runtime or Visual Basic) which will let them triage incoming orders into invoice batches. 3) Track all invoices to make sure they are filled and reprint any that are not. Please note that there current website volume is about 1500+ orders per day and rising so this is something that they need done very quickly. If interested, email me offline. Doris Manning mikedorism at adelphia.net From Mark.Mitsules at ngc.com Tue Jul 27 07:18:12 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Tue, 27 Jul 2004 08:18:12 -0400 Subject: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Message-ID: Thanks Drew. Meetings seem to be taking over my day so I will get back to you ASAP with any feedback. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, July 26, 2004 6:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 bheid at appdevgrp.com Tue Jul 27 07:33:43 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 08:33:43 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B088@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby From bheid at appdevgrp.com Tue Jul 27 07:49:37 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 08:49:37 -0400 Subject: [AccessD] Weird query execution problem. UPDATED INFO. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B0E5@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CE@ADGSERVER> Sorry, I forgot specifics. Access XP sp2 Win2K sp3 The queries are update queries. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Tue Jul 27 07:56:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Tue, 27 Jul 2004 14:56:47 +0200 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> References: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Message-ID: <4525268514.20040727145647@cactus.dk> Hi Bobby I would try stopping the code (by a msgbox) before and in-between the three queries. Perhaps it is only one of the queries that causes trouble. Also, try running the code when the database is stored locally. Networks and wrong settings on file servers can cause errors. /gustav > Hi all, > Me again with another problem. > I have these three queries that normally run fine on most BEs that I throw > at it. These databases have between 1500-50000 payroll records. I have a > large database with 193000 payroll records. I am running the queries from > code using db.execute "queryname",dbfailonerror. > When processing the large database, Access appears to stop running. It runs > up to the offending queries and stops. I show 0% cpu for access when this > happens. I have let it go for over an hour before and still no go. > So yesterday, I stopped the program right before the queries. I then went > to the query list and double-clicked each of the three queries and they ran > fine. > Anyone have any ideas as to what may be going on? I am going to try running > them in code using a querydef. > Thanks, > Bobby From bheid at appdevgrp.com Tue Jul 27 08:39:04 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 09:39:04 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B0F9@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6CF@ADGSERVER> Hey Gustav, The databases are local. I have stopped the code at the queries. It is at least the first two. There are many other queries (this is a conversion from and earlier version) around these. These queries run fine on other databases. I also just tried to run the first query using a querydef and got the same results. Thanks, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Tuesday, July 27, 2004 8:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Weird query execution problem. Hi Bobby I would try stopping the code (by a msgbox) before and in-between the three queries. Perhaps it is only one of the queries that causes trouble. Also, try running the code when the database is stored locally. Networks and wrong settings on file servers can cause errors. /gustav > Hi all, > Me again with another problem. > I have these three queries that normally run fine on most BEs that I > throw at it. These databases have between 1500-50000 payroll records. > I have a large database with 193000 payroll records. I am running the > queries from code using db.execute "queryname",dbfailonerror. > When processing the large database, Access appears to stop running. > It runs up to the offending queries and stops. I show 0% cpu for > access when this happens. I have let it go for over an hour before and still no go. > So yesterday, I stopped the program right before the queries. I then > went to the query list and double-clicked each of the three queries > and they ran fine. > Anyone have any ideas as to what may be going on? I am going to try > running them in code using a querydef. > Thanks, > Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jul 27 09:17:32 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 27 Jul 2004 10:17:32 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA305BB6CD@ADGSERVER> Message-ID: Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Tue Jul 27 09:52:07 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Tue, 27 Jul 2004 10:52:07 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: Message-ID: Mark, Sorry for the mis-information on Find and Replace. I see Drew's already come up with a more through solution, but for those who are interested, below is a down and dirty DAO based sub to do what you want. You could easily extend to save the results in a table, search multiple databases, etc. Jim Dettman (315) 699-3443 jimdettman at earthlink.net Option Compare Database Option Explicit Public Sub FindItem(strSearchFor As String) Dim curDB As DAO.Database Dim rs As DAO.Recordset Dim intK As Integer Dim intI As Integer Dim lngCount As Long Set curDB = CurrentDb() ' Table loop For intK = 0 To curDB.TableDefs.Count - 1 Set rs = curDB.OpenRecordset(curDB.TableDefs(intK).Name, dbOpenForwardOnly) lngCount = 1 Do While rs.EOF = False ' Loop for fields For intI = 0 To rs.Fields.Count - 1 If InStr(1, rs(intI), strSearchFor) > 0 Then Debug.Print "Table: "; curDB.TableDefs(intK).Name; " Record: "; lngCount; " Field: "; rs(intI).Name End If Next intI rs.MoveNext lngCount = lngCount + 1 Loop Next intK Debug.Print "Complete" End Sub -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bheid at appdevgrp.com Tue Jul 27 10:13:26 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Tue, 27 Jul 2004 11:13:26 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B13A@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6D2@ADGSERVER> Hi Jim, That did not work either. I think that I'll pass parameters to the queries so that I can process the data in chunks. Thanks for trying, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Tuesday, July 27, 2004 10:18 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Weird query execution problem. Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. 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 DWUTKA at marlow.com Tue Jul 27 10:13:00 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 10:13:00 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B0@main2.marlow.com> Whoops, I did, didn't I. Apparently I was a little out of it yesterday. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Andy Lacey Sent: Tuesday, July 27, 2004 1:38 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Just reading this thread and thought I'd mention that Drew has accidentally posted his solution to this thread under another heading. So if you want it see Drew's post under "RE: [AccessD] Query giving different results each time" -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > John W. Colby > Sent: 26 July 2004 22:52 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > These products are both excellent but are aimed at finding > OBJECTS in a database, things like discovering where fields > of a table are used in queries, forms and reports. Where > references to forms are used in code or in queries etc. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 4:34 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > >>My take was that he wanted to find DATA from a record inside any of > >>100 > tables.<< > Correct. > > >>AFAIK Find and replace will not find data<< > I'd like to confirm this before downloading or installing > these products. > > > Thanks, > > Mark > > > > -----Original Message----- > From: John W. Colby [mailto:jwcolby at colbyconsulting.com] > Sent: Monday, July 26, 2004 4:19 PM > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Multiple Table Search > > > Jim, > > My take was that he wanted to find DATA from a record inside > any of 100 tables. AFAIK Find and replace will not find data. > > John W. Colby > www.ColbyConsulting.com > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman > Sent: Monday, July 26, 2004 3:54 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Multiple Table Search > > > Mark, > > Speed Ferret or Rick Fisher's Find and Replace. > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mitsules, Mark S. (Newport News) > Sent: Monday, July 26, 2004 2:38 PM > To: [AccessD] > Subject: [AccessD] Multiple Table Search > > > Group, > > Strange request, but I've been handed this db and am not > familiar enough > with the data to do an educated search. What is the > simplest method to > find an instance of data amongst 70+ tables. > > Mark > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Tue Jul 27 10:18:58 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 15:18:58 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Yes I tried the compact and repair. It didn't seem to help. Each time I run the query...I get different results...is there something about the sub-query I am missing? Thanks, Mark A. Matte >From: "Stuart McLachlan" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and >problemsolving >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:01:07 +1000 > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > Hello All, > > > > Thanks for the feedback...but I'm still a little confused...If I am >running > > the same SQL against the same table...back to back...why am I getting > > different results? > > > > >A corrupt index? Have you tried a compact and repair? > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System Support. > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee? Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From DWUTKA at marlow.com Tue Jul 27 10:33:14 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 10:33:14 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B3@main2.marlow.com> (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. From cfoust at infostatsystems.com Tue Jul 27 10:56:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Tue, 27 Jul 2004 08:56:24 -0700 Subject: [AccessD] Query giving different results each time Message-ID: I missed the part of thread where you mentioned a sub-query. Have you posted the SQL for this query/subquery? Charlotte Foust -----Original Message----- From: Mark A Matte [mailto:markamatte at hotmail.com] Sent: Tuesday, July 27, 2004 7:19 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Yes I tried the compact and repair. It didn't seem to help. Each time I run the query...I get different results...is there something about the sub-query I am missing? Thanks, Mark A. Matte >From: "Stuart McLachlan" >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and >problemsolving >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:01:07 +1000 > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > Hello All, > > > > Thanks for the feedback...but I'm still a little confused...If I am >running > > the same SQL against the same table...back to back...why am I > > getting different results? > > > > >A corrupt index? Have you tried a compact and repair? > >-- >Lexacorp Ltd >http://www.lexacorp.com.pg >Information Technology Consultancy, Software Development,System >Support. > > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee(r) Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 27 11:03:50 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 27 Jul 2004 09:03:50 -0700 Subject: [AccessD] Error List Message-ID: <00c501c473f3$4ecf6b80$6601a8c0@HAL9002> Does anyone have a link to a list of VBA error? MTIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com From markamatte at hotmail.com Tue Jul 27 11:10:37 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Tue, 27 Jul 2004 16:10:37 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I >run the query...I get different results...is there something about the >sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee? Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 From clh at christopherhawkins.com Tue Jul 27 11:11:25 2004 From: clh at christopherhawkins.com (Christopher Hawkins) Date: Tue, 27 Jul 2004 10:11:25 -0600 Subject: [AccessD] FaceID master reference for CommandBars? Message-ID: <191280-220047227161125890@christopherhawkins.com> God, how I hate CommandBars. ;) Can anyone point me to a resource that lists the FaceID of each icon available for use on an Access Command Bar Button? -Christopher- From Lambert.Heenan at AIG.com Tue Jul 27 11:12:33 2004 From: Lambert.Heenan at AIG.com (Heenan, Lambert) Date: Tue, 27 Jul 2004 12:12:33 -0400 Subject: [AccessD] Error List Message-ID: <1D7828CDB8350747AFE9D69E0E90DA1F1CA11F@xlivmbx21.aig.com> This code will create tables for you containing the error codes and descriptions... Option Compare Database Option Explicit Sub CreateErrorsTable() Dim dbs As Database, tdf As TableDef, fld As Field Dim rst As Recordset, lngCode As Long Const conAppObjectError = "Application-defined or object-defined error" ' Create Errors table with ErrorNumber and ErrorDescription fields. Set dbs = CurrentDb Set tdf = dbs.CreateTableDef("Errors") Set fld = tdf.CreateField("ErrorCode", dbLong) tdf.Fields.Append fld Set fld = tdf.CreateField("ErrorString", dbText, 255) tdf.Fields.Append fld dbs.TableDefs.Append tdf ' Open recordset on Errors table. Set rst = dbs.OpenRecordset("Errors") ' Loop through first 1000 Visual Basic error codes. For lngCode = 1 To 1000 On Error Resume Next ' Raise each error. Err.Raise lngCode DoCmd.Hourglass True ' Skip error codes that generate application or object-defined errors. If Err.Description <> conAppObjectError Then ' Add each error code and string to Errors table. rst.AddNew rst!ErrorCode = Err.Number rst!ErrorString = Err.Description rst.Update End If ' Clear Err object. Err.Clear Next lngCode ' Close recordset. rst.Close DoCmd.Hourglass False MsgBox "Errors table created." End Sub Function AccessAndJetErrorsTable() As Boolean Dim dbs As Database, tdf As TableDef, fld As Field Dim rst As Recordset, lngCode As Long Dim strAccessErr As String Const conAppObjectError = "Application-defined or object-defined error" On Error GoTo Error_AccessAndJetErrorsTable ' Create Errors table with ErrorNumber and ErrorDescription fields. Set dbs = CurrentDb Set tdf = dbs.CreateTableDef("AccessAndJetErrors") Set fld = tdf.CreateField("ErrorCode", dbLong) tdf.Fields.Append fld Set fld = tdf.CreateField("ErrorString", dbMemo) tdf.Fields.Append fld dbs.TableDefs.Append tdf ' Open recordset on Errors table. Set rst = dbs.OpenRecordset("AccessAndJetErrors") ' Loop through error codes. For lngCode = 0 To 3500 On Error Resume Next ' Raise each error. strAccessErr = AccessError(lngCode) DoCmd.Hourglass True ' Skip error numbers without associated strings. If strAccessErr <> "" Then ' Skip codes that generate application or object-defined errors. If strAccessErr <> conAppObjectError Then ' Add each error code and string to Errors table. rst.AddNew rst!ErrorCode = lngCode ' Append string to memo field. rst!ErrorString.AppendChunk strAccessErr rst.Update End If End If Next lngCode ' Close recordset. rst.Close DoCmd.Hourglass False RefreshDatabaseWindow MsgBox "Access and Jet errors table created." AccessAndJetErrorsTable = True Exit_AccessAndJetErrorsTable: Exit Function Error_AccessAndJetErrorsTable: MsgBox Err & ": " & Err.Description AccessAndJetErrorsTable = False Resume Exit_AccessAndJetErrorsTable End Function HTH Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - Beach Access Software Sent: Tuesday, July 27, 2004 12:04 PM To: AccessD at databaseadvisors.com Subject: [AccessD] Error List Does anyone have a link to a list of VBA error? MTIA Rocky Smolin Beach Access Software http://www.e-z-mrp.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Tue Jul 27 11:37:05 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Tue, 27 Jul 2004 12:37:05 -0400 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010a01c47395$0e0d23c0$48619a89@DDICK> Message-ID: <002701c473f7$f6f0d070$0201a8c0@COA3> How about changing: c:\Progra~1\Truman\Truman.mdb To: START c:\Progra~1\Truman\Truman.mdb Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 12:49 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy Thanks Stuart That sounds about right Many thanks Darren ----- Original Message ----- From: "Stuart McLachlan" To: "Access Developers discussion and problemsolving" Sent: Tuesday, July 27, 2004 2:41 PM Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > So I thought I would just launch the app from the users desktop with > > a BATCH file. The batch file copies the new version each and every > > time (whether it's new or not) then sparks up the app, all from > > within the batch file Simple - on XP and WIN2000 at least > > > > Here is the batch file............... > > REM START BATCH FILE########################################### > > echo Updating your system to the latest Version of TruMan... copy > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > ########################################### > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > command or file name (Bugger it doesn't spark up the app) > > > > The S drive location of the new app is valid. The destination folder > > in Program files and the existence > > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > > > The on the Win 98 machine if I copy the line " > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > app as desired. So it works from Start|Run but not a > > batchfile?????!!!!!!! > > > > I'm stumped - any suggestions? > > > > IIRC, in Win9X, you need to specify the application in batch files > (and in > scheduled tasks?) so you will need something like: > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > Files\Truman\Truman.mdb" > > -- > Lexacorp Ltd > http://www.lexacorp.com.pg > Information Technology Consultancy, Software Development,System Support. > > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From bchacc at san.rr.com Tue Jul 27 12:16:57 2004 From: bchacc at san.rr.com (Rocky Smolin - Beach Access Software) Date: Tue, 27 Jul 2004 10:16:57 -0700 Subject: [AccessD] Error List References: <1D7828CDB8350747AFE9D69E0E90DA1F1CA11F@xlivmbx21.aig.com> Message-ID: <017501c473fd$8586ca60$6601a8c0@HAL9002> Heenan: Thanx. That did it! Regards, Rocky Smolin Beach Access Software http://www.e-z-mrp.com ----- Original Message ----- From: "Heenan, Lambert" To: "'Access Developers discussion and problem solving'" Sent: Tuesday, July 27, 2004 9:12 AM Subject: RE: [AccessD] Error List > This code will create tables for you containing the error codes and > descriptions... > > Option Compare Database > Option Explicit > > Sub CreateErrorsTable() > Dim dbs As Database, tdf As TableDef, fld As Field > Dim rst As Recordset, lngCode As Long > Const conAppObjectError = "Application-defined or object-defined error" > > ' Create Errors table with ErrorNumber and ErrorDescription fields. > Set dbs = CurrentDb > Set tdf = dbs.CreateTableDef("Errors") > Set fld = tdf.CreateField("ErrorCode", dbLong) > tdf.Fields.Append fld > Set fld = tdf.CreateField("ErrorString", dbText, 255) > tdf.Fields.Append fld > > dbs.TableDefs.Append tdf > ' Open recordset on Errors table. > Set rst = dbs.OpenRecordset("Errors") > ' Loop through first 1000 Visual Basic error codes. > For lngCode = 1 To 1000 > On Error Resume Next > ' Raise each error. > Err.Raise lngCode > DoCmd.Hourglass True > ' Skip error codes that generate application or object-defined > errors. > If Err.Description <> conAppObjectError Then > ' Add each error code and string to Errors table. > rst.AddNew > > rst!ErrorCode = Err.Number > rst!ErrorString = Err.Description > rst.Update > End If > ' Clear Err object. > Err.Clear > Next lngCode > ' Close recordset. > rst.Close > DoCmd.Hourglass False > MsgBox "Errors table created." > End Sub > > Function AccessAndJetErrorsTable() As Boolean > Dim dbs As Database, tdf As TableDef, fld As Field > Dim rst As Recordset, lngCode As Long > Dim strAccessErr As String > Const conAppObjectError = "Application-defined or object-defined error" > > On Error GoTo Error_AccessAndJetErrorsTable > ' Create Errors table with ErrorNumber and ErrorDescription fields. > Set dbs = CurrentDb > Set tdf = dbs.CreateTableDef("AccessAndJetErrors") > Set fld = tdf.CreateField("ErrorCode", dbLong) > > tdf.Fields.Append fld > Set fld = tdf.CreateField("ErrorString", dbMemo) > tdf.Fields.Append fld > > dbs.TableDefs.Append tdf > ' Open recordset on Errors table. > Set rst = dbs.OpenRecordset("AccessAndJetErrors") > ' Loop through error codes. > For lngCode = 0 To 3500 > On Error Resume Next > ' Raise each error. > strAccessErr = AccessError(lngCode) > DoCmd.Hourglass True > ' Skip error numbers without associated strings. > If strAccessErr <> "" Then > > ' Skip codes that generate application or object-defined errors. > If strAccessErr <> conAppObjectError Then > ' Add each error code and string to Errors table. > rst.AddNew > rst!ErrorCode = lngCode > ' Append string to memo field. > rst!ErrorString.AppendChunk strAccessErr > rst.Update > End If > End If > Next lngCode > ' Close recordset. > rst.Close > DoCmd.Hourglass False > RefreshDatabaseWindow > MsgBox "Access and Jet errors table created." > > AccessAndJetErrorsTable = True > > Exit_AccessAndJetErrorsTable: > Exit Function > > Error_AccessAndJetErrorsTable: > MsgBox Err & ": " & Err.Description > AccessAndJetErrorsTable = False > Resume Exit_AccessAndJetErrorsTable > End Function > > HTH > > Lambert > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky Smolin - > Beach Access Software > Sent: Tuesday, July 27, 2004 12:04 PM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Error List > > > Does anyone have a link to a list of VBA error? > > MTIA > > Rocky Smolin > Beach Access Software > http://www.e-z-mrp.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From michael.mattys at adelphia.net Tue Jul 27 12:26:01 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 27 Jul 2004 13:26:01 -0400 Subject: [AccessD] FaceID master reference for CommandBars? References: <191280-220047227161125890@christopherhawkins.com> Message-ID: <012701c473fe$cd21d350$6401a8c0@default> Christopher, Office CommandBars Enumeration on http://www.mainsoft.fr/freeware_en.htm ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Tuesday, July 27, 2004 12:11 PM Subject: [AccessD] FaceID master reference for CommandBars? > God, how I hate CommandBars. ;) > > Can anyone point me to a resource that lists the FaceID of each icon > available for use on an Access Command Bar Button? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From michael.mattys at adelphia.net Tue Jul 27 12:29:41 2004 From: michael.mattys at adelphia.net (Michael R Mattys) Date: Tue, 27 Jul 2004 13:29:41 -0400 Subject: [AccessD] FaceID master reference for CommandBars? References: <191280-220047227161125890@christopherhawkins.com> Message-ID: <012b01c473ff$50738820$6401a8c0@default> Display the available icons (FaceIds) for office commandbars Submitted By Andrew Baker The following code will create several toolbars containing all the icons available for use in office toolbars. 'Creates toolbars with 300 faces icons on each. Sub ShowAllToolbarIcons() Const clMaxFaceId As Long = 3900, clButtonsPerBar As Long = 300, clMaxToolbar As Long = 13 Dim lThisBar As Long, lFirstId As Long, lLastId As Long Dim lThisId As Long, oThisCtrl As CommandBarButton Dim oCmdBar As CommandBar, oClipIcon As StdPicture On Error GoTo ErrMaxID For lThisBar = 0 To clMaxToolbar 'Put 300 buttons on each bar lFirstId = lThisBar * clButtonsPerBar lLastId = lFirstId + clButtonsPerBar - 1 Set oCmdBar = CommandBars.Add For lThisId = lFirstId To lLastId Set oThisCtrl = oCmdBar.Controls.Add oThisCtrl.FaceId = lThisId oThisCtrl.TooltipText = "FaceId = " & lThisId Next oCmdBar.Name = ("Buttons with FaceIds " & CStr(lFirstId) & " to " & CStr(lLastId)) oCmdBar.Width = 591 oCmdBar.Visible = True Next Exit Sub 'Delete the button that caused the error and set toolbar name ErrMaxID: oThisCtrl.Delete oCmdBar.Name = ("Faces " & CStr(lFirstId) & " to " & CStr(lThisId - 1)) oCmdBar.Width = 591 oCmdBar.Visible = True End Sub ---- Michael R. Mattys Mattys MapLib for Microsoft MapPoint http://www.mattysconsulting.com ----- Original Message ----- From: "Christopher Hawkins" To: Sent: Tuesday, July 27, 2004 12:11 PM Subject: [AccessD] FaceID master reference for CommandBars? > God, how I hate CommandBars. ;) > > Can anyone point me to a resource that lists the FaceID of each icon > available for use on an Access Command Bar Button? > > -Christopher- > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From jmoss111 at bellsouth.net Tue Jul 27 12:36:26 2004 From: jmoss111 at bellsouth.net (jmoss111 at bellsouth.net) Date: Tue, 27 Jul 2004 13:36:26 -0400 Subject: [AccessD] Updating subform with query value Message-ID: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the query values to display on the subforms? Thanks in advance for any assistance. Jim From DWUTKA at marlow.com Tue Jul 27 12:44:21 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 12:44:21 -0500 Subject: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B7@main2.marlow.com> No problem. By the way, if anyone has downloaded that link already, download it again. I just tweaked the code a little bit. I tried it on a reporting db we have, which has mainly ODBC linked tables to a massive Oracle database. It failed for two reasons, one, the table names had underscores in them, and a lot of tables had WAY too many text fields, so it was kicking back that the query was too complex. I fixed the code to wrap the table names with brackets, and now it only uses 5 OR statements per where clause (so you could have more then one SQL statement being run against a table, just with different where statements). With the fixes, it worked fine. Took about 30 minutes to run on that database. Not bad, earlier attempts to scan that thing before took hours, or longer. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Tuesday, July 27, 2004 7:18 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Was => RE: [AccessD] Query giving different results each time Thanks Drew. Meetings seem to be taking over my day so I will get back to you ASAP with any feedback. Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Monday, July 26, 2004 6:05 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Monday, July 26, 2004 2:35 PM To: accessd at databaseadvisors.com Subject: [AccessD] Query giving different results each time Hello All, In A97 I am running a local query...I couldn't get the results I wanted...so I kept treaking my criteria...but then I realized...that if I didn'tchange anything...I would get slightly different results...each time I ran it. It would omit 1-5 rows...but not the same ones. Desperately confused...any insight? Thanks, Mark A. Matte SQL: SELECT tblPRS_Pending_PHONE.case_id, tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/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 DWUTKA at marlow.com Tue Jul 27 12:47:26 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 12:47:26 -0500 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1B8@main2.marlow.com> Just perusing this thread. Darren, didn't I send you my VB Front End updater? Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Monday, July 26, 2004 11:30 PM To: AccessD List Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Hello all I have some code that looks to the Back end of the app to determine if there is a 'new' version of the app. If there is a 'new' version then the app looks to a predefined place on the server where the 'new' version is sitting and it copies the 'new' version to the local machine. So for the current session the user is using the 'old' version but next time they spark up the app they are automatically using the 'new' version Excellent. - on XP and WIN2000 at least Win 98 machines are not doing this. I am getting Permission denied errors. Of course this is because the destination where I am copying the 'new' file to is in use. Obviously XP and WIN2000 open each dB in its own memory space and thus you can copy underneath but WIN98 does not. OK whatever.... So I thought I would just launch the app from the users desktop with a BATCH file. The batch file copies the new version each and every time (whether it's new or not) then sparks up the app, all from within the batch file Simple - on XP and WIN2000 at least Here is the batch file............... REM START BATCH FILE########################################### echo Updating your system to the latest Version of TruMan... copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE ########################################### on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I get... 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger it doesn't spark up the app) The S drive location of the new app is valid. The destination folder in Program files and the existence of the 'old' version is valid. (Remember this works on XP and WIN2000) The on the Win 98 machine if I copy the line " c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it works from Start|Run but not a batchfile?????!!!!!!! I'm stumped - any suggestions? Many thanks Darren -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 27 13:12:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jul 2004 14:12:56 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1B3@main2.marlow.com> Message-ID: <000201c47405$5bb9d3a0$80b3fea9@ColbyM6805> >Boy, that was actually fun to build! You GOTTA get a life! ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 13:26:06 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 13:26:06 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1BA@main2.marlow.com> Sure do. Unfortunately, I find it easier to deal with computers then people sometimes! LOL Just kidding. Actually, since I've moved to Dallas (after my separation), I've had a much more active social life. But you have to admit, there are always those little projects that are just plain COOL to write. Know what I mean? That feeling of wrapping your mind around a problem and wringing a solution out.....just can't beat it! Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John W. Colby Sent: Tuesday, July 27, 2004 1:13 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search >Boy, that was actually fun to build! You GOTTA get a life! ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Tue Jul 27 13:43:19 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Tue, 27 Jul 2004 14:43:19 -0400 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <20040727184318.ORJY1721.imf20aec.mail.bellsouth.net@SUSANONE> What kind of data's in effdt? Susan H. Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I run the query...I get different results...is there something about >the sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I > > > am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfeeR Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Tue Jul 27 13:56:39 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 27 Jul 2004 14:56:39 -0400 Subject: [AccessD] Replication Message-ID: I have an Access97 backend that I would like to replicate with an SQL server once per hour. Is this possible? Would you do this differently? Any help will be much appreciated. Some details... 1) The back-end is on a win95 laptop. The hardware is too old to upgrade any software. 2) We like the idea of keeping the back-end local because the network can be flakey at times. This application needs to run 24x7 with no down-time. 3) Currently, there are six of these machines that synchronize with a master copy on the network, once per hour. 4) I want to upsize the master to SQL Server so that a maintenance module can be written using ASP.NET. I know that you can open the network copy of the mdb in ASP.NET via ADO, I just prefer upsizing to SQL Server. 5) Eventually (could be years or sooner if the above goes well) these win95 laptops will be replaced and those front ends will be rewritten (probably ASP.NET if that is the technology we stick with). 6) I'm fairly familiar with replication at the mdb level, but not SQL Server level. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 From marcus at tsstech.com Tue Jul 27 14:08:40 2004 From: marcus at tsstech.com (Scott Marcus) Date: Tue, 27 Jul 2004 15:08:40 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 Mark, You WHERE clause is probably giving you some trouble because 'tblPRS_Pending_PHONE.bo_id = A.bo_id' are the same instance therefore giving random values. Try the following.... SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (((B.effdt)=(SELECT Max(A.effdt) FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id and B.profile_cm_seq = A.profile_cm_seq;)) AND ((B.primary_ind)="y")); -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Tuesday, July 27, 2004 12:11 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Charlotte, The original post had the SQL...but here is what I am currently using...but with the same inconsistant results. Any ideas would be greatly appreciated. Thanks, Mark SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND ((tblPRS_Pending_PHONE.primary_ind)="y")); >From: "Charlotte Foust" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 08:56:24 -0700 > >I missed the part of thread where you mentioned a sub-query. Have you >posted the SQL for this query/subquery? > >Charlotte Foust > > >-----Original Message----- >From: Mark A Matte [mailto:markamatte at hotmail.com] >Sent: Tuesday, July 27, 2004 7:19 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Yes I tried the compact and repair. It didn't seem to help. Each time >I >run the query...I get different results...is there something about the >sub-query I am missing? > >Thanks, > >Mark A. Matte > > > >From: "Stuart McLachlan" > >Reply-To: Access Developers discussion and problem > >solving > >To: Access Developers discussion and > >problemsolving > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > Hello All, > > > > > > Thanks for the feedback...but I'm still a little confused...If I am > >running > > > the same SQL against the same table...back to back...why am I > > > getting different results? > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > >-- > >Lexacorp Ltd > >http://www.lexacorp.com.pg > >Information Technology Consultancy, Software Development,System > >Support. > > > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from >McAfee(r) >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Is your PC infected? Get a FREE online computer virus scan from McAfee(r) Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Tue Jul 27 16:22:25 2004 From: dwaters at usinternet.com (Dan Waters) Date: Tue, 27 Jul 2004 16:22:25 -0500 Subject: [AccessD] Hit the Wall? (Solved) In-Reply-To: <12346249.1090806732279.JavaMail.root@sniper8.usinternet.com> Message-ID: <003c01c4741f$d0bef440$de1811d8@danwaters> Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 16:41:07 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 16:41:07 -0500 Subject: [AccessD] Hit the Wall? (Solved) Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1BE@main2.marlow.com> LOL. No problem. Just an FYI, drop the single integer to a Byte field. It won't change your code, or the values, but single integers are two bytes, so you'll be dropping an extra byte per field, per record. Bit comparison has it's advantages, but it also has disadvantages (a little more difficult to query, because an individual value isn't going to be indexed well, since it 1, 3, 7 all have the 1 bit turned on, but an index would see those as three different values, also it limits the viewing to a developed GUI, it would be a nightmare to try and explain how bits in a byte work to a user, so they could look directly at a querry's datasheet view! LOL). Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Tuesday, July 27, 2004 4:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? (Solved) Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 17:54:28 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 08:54:28 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <2F8793082E00D4119A1700B0D0216BF8031BB1B8@main2.marlow.com> Message-ID: <006f01c4742c$abf5eb20$48619a89@DDICK> nope would love a copy of it I was about to write something in VB myself Yours would definitely be better DD ----- Original Message ----- From: To: Sent: Wednesday, July 28, 2004 3:47 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Just perusing this thread. Darren, didn't I send you my VB Front End > updater? > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Monday, July 26, 2004 11:30 PM > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting > and it copies the 'new' version to the local machine. So for the current > session the user is using the 'old' version > but next time they spark up the app they are automatically using the 'new' > version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath > but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Tue Jul 27 18:27:51 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Tue, 27 Jul 2004 18:27:51 -0500 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1C3@main2.marlow.com> Sent it to you off list. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 5:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy nope would love a copy of it I was about to write something in VB myself Yours would definitely be better DD ----- Original Message ----- From: To: Sent: Wednesday, July 28, 2004 3:47 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Just perusing this thread. Darren, didn't I send you my VB Front End > updater? > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Darren DICK > Sent: Monday, July 26, 2004 11:30 PM > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting > and it copies the 'new' version to the local machine. So for the current > session the user is using the 'old' version > but next time they spark up the app they are automatically using the 'new' > version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath > but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, > all from within the batch file Simple - on XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb > REM END BATCH FILE ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) > Bad command or file name (Bugger it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence > of the 'old' version is valid. (Remember this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and > clickon Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > app > as desired. So it works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Tue Jul 27 18:38:47 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Tue, 27 Jul 2004 19:38:47 -0400 Subject: [AccessD] Hit the Wall? (Solved) In-Reply-To: <003c01c4741f$d0bef440$de1811d8@danwaters> Message-ID: <000901c47432$e0c992b0$80b3fea9@ColbyM6805> Dan, If speed is not critical, always go for the minimum data size necessary for to hold the data. A byte will hold that data quite nicely and double the number of such fields you can fit in a given amount of memory. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Dan Waters Sent: Tuesday, July 27, 2004 5:22 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? (Solved) Drew - whatever you get paid - charge more! This would be pretty slick. Might be interesting even if I wasn't dealing with a full table. Anyway - my customer wants to go to SQL pretty soon, so for now I did a cheap solution. Each pair of checkboxes stood for Approved, Disapproved, or if both were blank then it meant no approval yet. So, I'm now using a single integer field where 0 means not yet, 1 means approved, and 2 means disapproved. This got me 35 more fields so I should be good to go for a while. Thanks to everyone for all your inventive ideas! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of DWUTKA at marlow.com Sent: Sunday, July 25, 2004 8:45 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Hit the Wall? Dan, if you have a lot of yes no fields, you may be able to stick with just one table! Instead if using yes/no fields (which take a byte each), I would go with merging the yes/no fields into a long, or byte field. With a byte field, you can get 8 yes/no fields in one field. With a Long, you can get 31 (32, if you want to have a little math fun). Use bit comparison for the yes/no fields. ie, if a field has 3 as a value, that means that 1 and 2 are turned on, and nothing else. So whatever 'value' is represented by 1 can be checked with: rs.("MyField").value AND 1 Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Dan Waters Sent: Friday, July 23, 2004 6:54 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Hit the Wall? Michael, How did you split the table up and apply limits to the width of the query? Did your form change sources as the users moved from one area to another? Unfortunately, there is no normalization I can do that would make any sense, and wouldn't hurt the app. I didn't know that queries has an 8K limit, but I hope I won't hit that. Most of the fields are short text fields, or yes/no checkboxes. Thanks! Dan -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Michael Maddison Sent: Friday, July 23, 2004 12:41 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Hit the Wall? No, We hit this same problem and had to split the table up and apply limits to the width of the query. Be careful with the 8K row limit as well, you will likely run out of row space well before 255 columns. Our client insisted they wanted to scroll sideways over 5 years of data, displayed monthly with 6 columns per month. Our prototype had vertical scrolling but no no no we want it like Excel ;-))) cheers Michael M In an Access app w/FE and BE, I need a table that has about 270 fields. A single form will be bound to the table. (This is a business process management application.) If I upsize this to a project (never done this), I can have up to 1024 fields in a table. I tried creating a query to join two smaller tables, but queries are also limited to 255 columns. Is there a way around this so I can still use an Access BE? Thanks! Dan Waters -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 19:17:16 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 10:17:16 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <200407270757.i6R7vKQ29697@databaseadvisors.com> Message-ID: <00f701c47438$3d06c160$48619a89@DDICK> Way cool many thanks Max I've been wanting to play with Vb scripts here we go Many thanks Darren ----- Original Message ----- From: "MG" To: ; "'Access Developers discussion and problem solving'" Sent: Tuesday, July 27, 2004 5:57 PM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > Sorry, I should have said that the filename for the vbs code I just posted, > must end in .vbs so that your operating system can find it. Don't > know if it will run on 98 machines though. > > Max Sherman > > -----Original Message----- > From: MG [mailto:mgauk at btconnect.com] > Sent: 27 July 2004 08:48 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > > Here is the code that I use. I put in each person's c:\ root and then call > it in their startup menu. Adjust to suit. > Max Sherman > CODE: > ' Max Sherman Jan 2004 > ' Program to run (1) from Startup and (2) from User Desktop ' copies over > the version on the Server to the user's PC - It does not check for dates as > per Version 1. > ' It also synchonises times on all machine to agree with that on Server. > > Dim FSO, fServer, fLocal, fServerDateLastModified, fLocalDateLastModified, > fOnServerPC, fOnLocalPC > Dim strUser,objShell,objNetwork > > Set FSO = CreateObject("Scripting.FileSystemObject") > Set objShell = wscript.createobject("WScript.shell") > Set objNetwork = wscript.createobject("WScript.Network") > > strUser = objnetwork.userdomain > ' wscript.echo struser > > objShell.run("NET TIME \\Server /SET /YES") > > if strUser = "MAX" then > ' wscript.Echo "Skipped" > else > fOnServerPC = "\\Server\Svr-c\_MCM\MCMFrontEnd.mdb" > fOnLocalPC = "C:\_MCM\MCMFrontEnd.mdb" > wscript.Echo ("Checking For MCM File Updates: Please Click OK and > then wait until the messagebox re-appears") > > ' Server File > If (FSO.FileExists(fOnServerPC)) Then > Set fServer = FSO.GetFile(fOnServerPC) > FSO.CopyFile fOnServerPC , fOnLocalPC > wscript.Echo ("The Server Copy of the MCM Database (FrontEnd) has now > been copied onto your computer") > Else > wscript.Echo ("WARNING: The MCM Database file (" & fOnServerPC & ") is > missing from the Server. Please Report This Immediately") > End If > End if > > Set FSO = nothing > set objShell = nothing > set objNetworkl = nothing > > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: 27 July 2004 05:30 > To: AccessD List > Subject: [AccessD] A2K: WIN 98 machines are driving me crazy > > Hello all > I have some code that looks to the Back end of the app to determine if there > is a 'new' version of the app. > If there is a 'new' version then the app looks to a predefined place on the > server where the 'new' version is sitting and it copies the 'new' version to > the local machine. So for the current session the user is using the 'old' > version but next time they spark up the app they are automatically using the > 'new' version Excellent. - on XP and WIN2000 at least > > Win 98 machines are not doing this. I am getting Permission denied errors. > Of course this is because the destination where I am copying the 'new' file > to is in use. > Obviously XP and WIN2000 open each dB in its own memory space and thus you > can copy underneath but WIN98 does not. OK whatever.... > > So I thought I would just launch the app from the users desktop with a BATCH > file. > The batch file copies the new version each and every time (whether it's new > or not) then sparks up the app, all from within the batch file Simple - on > XP and WIN2000 at least > > Here is the batch file............... > REM START BATCH FILE########################################### > echo Updating your system to the latest Version of TruMan... > copy S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > ########################################### > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 machine I > get... > 1 file(s) copied (Great it copied the file) Bad command or file name (Bugger > it doesn't spark up the app) > > The S drive location of the new app is valid. The destination folder in > Program files and the existence of the 'old' version is valid. (Remember > this works on XP and WIN2000) > > The on the Win 98 machine if I copy the line " > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon Start|Run and > paste c:\Progra~1\Truman\Truman.mdb it sparks up the app as desired. So it > works from Start|Run but not a batchfile?????!!!!!!! > > I'm stumped - any suggestions? > > Many thanks > > Darren > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > --- > Incoming mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From d.dick at uws.edu.au Tue Jul 27 19:28:21 2004 From: d.dick at uws.edu.au (Darren DICK) Date: Wed, 28 Jul 2004 10:28:21 +1000 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy References: <002701c473f7$f6f0d070$0201a8c0@COA3> Message-ID: <010f01c47439$c96fc600$48619a89@DDICK> Steve may thanks that works great Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? ----- Original Message ----- From: "Steve Conklin (Developer at UltraDNT)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 28, 2004 2:37 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > How about changing: > c:\Progra~1\Truman\Truman.mdb > To: > START c:\Progra~1\Truman\Truman.mdb > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Tuesday, July 27, 2004 12:49 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Thanks Stuart > That sounds about right > Many thanks > > Darren > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problemsolving" > > Sent: Tuesday, July 27, 2004 2:41 PM > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > > > > > So I thought I would just launch the app from the users desktop with > > > > a BATCH file. The batch file copies the new version each and every > > > time (whether it's new or not) then sparks up the app, all from > > > within the batch file Simple - on XP and WIN2000 at least > > > > > > Here is the batch file............... > > > REM START BATCH FILE########################################### > > > echo Updating your system to the latest Version of TruMan... copy > > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > > ########################################### > > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > > command or file name (Bugger it doesn't spark up the app) > > > > > > The S drive location of the new app is valid. The destination folder > > > > in Program files and the existence > > > of the 'old' version is valid. (Remember this works on XP and > WIN2000) > > > > > > The on the Win 98 machine if I copy the line " > > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > > app as desired. So it works from Start|Run but not a > > > batchfile?????!!!!!!! > > > > > > I'm stumped - any suggestions? > > > > > > > IIRC, in Win9X, you need to specify the application in batch files > > (and in > > scheduled tasks?) so you will need something like: > > > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > > Files\Truman\Truman.mdb" > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Tue Jul 27 23:54:58 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Wed, 28 Jul 2004 00:54:58 -0400 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010f01c47439$c96fc600$48619a89@DDICK> Message-ID: <000501c4745f$0b78d580$0201a8c0@COA3> If you can sit at the 98 machine, right-click the batch file, click Properties, and then check "Close On Exit." ... If you can't visit each 98 machine personally, I know I used do this via login script ...IIRC (this was a while ago!), I would click that property on from my workstation... Doing that would generate a .PIF (or .LNK ?) file. I would use the login script send that file to each users' C:\WINDOWS\COMMAND folder ... Then when they ran that particular batch, those PIF settings would kick in. Hth Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK Sent: Tuesday, July 27, 2004 8:28 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy Steve may thanks that works great Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? ----- Original Message ----- From: "Steve Conklin (Developer at UltraDNT)" To: "'Access Developers discussion and problem solving'" Sent: Wednesday, July 28, 2004 2:37 AM Subject: RE: [AccessD] A2K: WIN 98 machines are driving me crazy > How about changing: > c:\Progra~1\Truman\Truman.mdb > To: > START c:\Progra~1\Truman\Truman.mdb > > Hth > Steve > > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK > Sent: Tuesday, July 27, 2004 12:49 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > Thanks Stuart > That sounds about right > Many thanks > > Darren > > ----- Original Message ----- > From: "Stuart McLachlan" > To: "Access Developers discussion and problemsolving" > > Sent: Tuesday, July 27, 2004 2:41 PM > Subject: Re: [AccessD] A2K: WIN 98 machines are driving me crazy > > > > > > > > So I thought I would just launch the app from the users desktop > > > with > > > > a BATCH file. The batch file copies the new version each and every > > > time (whether it's new or not) then sparks up the app, all from > > > within the batch file Simple - on XP and WIN2000 at least > > > > > > Here is the batch file............... > > > REM START BATCH FILE########################################### > > > echo Updating your system to the latest Version of TruMan... copy > > > S:\Truman\Update\TRUMAN.MDB c:\Progra~1\Truman\Truman.mdb > > > c:\Progra~1\Truman\Truman.mdb REM END BATCH FILE > > > ########################################### > > > on XP and WIN2000 No Problem But when I run the BATCH file on a 98 > > > machine I get... 1 file(s) copied (Great it copied the file) Bad > > > command or file name (Bugger it doesn't spark up the app) > > > > > > The S drive location of the new app is valid. The destination > > > folder > > > > in Program files and the existence > > > of the 'old' version is valid. (Remember this works on XP and > WIN2000) > > > > > > The on the Win 98 machine if I copy the line " > > > c:\Progra~1\Truman\Truman.mdb" from the batch file and clickon > > > Start|Run and paste c:\Progra~1\Truman\Truman.mdb it sparks up the > > > app as desired. So it works from Start|Run but not a > > > batchfile?????!!!!!!! > > > > > > I'm stumped - any suggestions? > > > > > > > IIRC, in Win9X, you need to specify the application in batch files > > (and in > > scheduled tasks?) so you will need something like: > > > > "C:\Program Files\MSOffice\Office\MSAccess.exe" "C:\Program > > Files\Truman\Truman.mdb" > > > > -- > > Lexacorp Ltd > > http://www.lexacorp.com.pg > > Information Technology Consultancy, Software Development,System > Support. > > > > > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Wed Jul 28 02:52:27 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Wed, 28 Jul 2004 08:52:27 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Dear Experts I can divide in Access the days from a date() into years with a simple /365, but is there a way to have months and days ... so I have years, months and days, please? Cheers paul From gustav at cactus.dk Wed Jul 28 05:35:19 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:35:19 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <1509725644.20040728123519@cactus.dk> Hi Mark I would split it in two queries and test that. /gustav > SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, > tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, > tblPRS_Pending_PHONE.phone > FROM tblPRS_Pending_PHONE > WHERE (((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt > FROM tblPRS_Pending_PHONE A > WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and > tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND > ((tblPRS_Pending_PHONE.primary_ind)="y")); From gustav at cactus.dk Wed Jul 28 05:41:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:41:20 +0200 Subject: [AccessD] Updating subform with query value In-Reply-To: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> References: <20040727173626.TEDH1721.imf16aec.mail.bellsouth.net@mail.bellsouth.net> Message-ID: <1410085912.20040728124120@cactus.dk> Hi Jim The easy route would be to move the parameters into the LinkMasterFields and LinkChildFields of the subform control. /gustav > In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the > query values to display on the subforms? From gustav at cactus.dk Wed Jul 28 05:38:17 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:38:17 +0200 Subject: [AccessD] A2K: WIN 98 machines are driving me crazy In-Reply-To: <010f01c47439$c96fc600$48619a89@DDICK> References: <002701c473f7$f6f0d070$0201a8c0@COA3> <010f01c47439$c96fc600$48619a89@DDICK> Message-ID: <699903220.20040728123817@cactus.dk> Hi Darren > Steve may thanks > that works great > Any way of forcing the 'BATCH' window shut after it has run on WIN 98 machines? Try: START /b c:\Progra~1\Truman\Truman.mdb /gustav From gustav at cactus.dk Wed Jul 28 05:56:25 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 12:56:25 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: References: Message-ID: <11810991404.20040728125625@cactus.dk> Hi Paul > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? That depends. For days, use DateDiff("d", datFrom, Date()) For banking months, these always have a day count of 30, and /365 is not reliable when including leap years. For calendar months and years it is slightly more complicated as "a month" is not always the same thing. We use these functions: Public Function Months( _ ByVal datDate1 As Date, _ ByVal datDate2 As Date) _ As Integer ' Returns the difference in full months between datDate1 and datDate2. ' ' Calculates correctly for: ' negative differences ' leap years ' dates of 29. February ' date/time values with embedded time values ' negative date/time values (prior to 1899-12-29) ' ' Gustav Brock, Cactus Data ApS. ' 2000-12-20. Dim intDay1 As Integer Dim intDay2 As Integer Dim intMonths As Integer Dim intDaysDiff As Integer Dim intReversed As Integer ' No special error handling. On Error Resume Next intMonths = DateDiff("m", datDate1, datDate2) If intMonths = 0 Then ' Both dates fall within the same month. Else intDay1 = Day(datDate1) intDay2 = Day(datDate2) If Month(datDate1) < Month(DateAdd("d", 1, datDate1)) Then ' Date datDate1 is ultimo. ' Decrease date datDate2 if day of datDate2 it is higher. If intDay2 > intDay1 Then datDate2 = DateAdd("d", intDay1 - intDay2, datDate2) intDay2 = Day(datDate2) End If End If If Month(datDate2) < Month(DateAdd("d", 1, datDate2)) Then ' Date datDate2 is ultimo. ' Decrease date datDate1 if day of datDate1 it is higher. If intDay1 > intDay2 Then datDate1 = DateAdd("d", intDay2 - intDay1, datDate1) intDay1 = Day(datDate1) End If End If ' Calculate day difference. intDaysDiff = intDay1 - intDay2 intReversed = Sgn(intMonths) ' Decrease count of months by one if dates are closer than one month. intMonths = intMonths - (intReversed * Abs((intReversed * intDaysDiff) > 0)) End If Months = intMonths End Function Public Function Years( _ ByVal datDate1 As Date, _ ByVal datDate2 As Date) _ As Integer ' Returns the difference in full years between datDate1 and datDate2. ' ' Calculates correctly for: ' negative differences ' leap years ' dates of 29. February ' date/time values with embedded time values ' negative date/time values (prior to 1899-12-29) ' ' Gustav Brock, Cactus Data ApS. ' 2000-11-03. ' 2000-12-16. Leap year correction modified to be symmetrical. ' Calculation of intDaysDiff simplified. ' Renamed from YearsDiff() to Years(). ' 2000-12-18. Added cbytMonthDaysMax. ' Constants for leap year calculation. Last normal date of February. Const cbytFebMonth As Byte = 2 Const cbytFebLastDay As Byte = 28 ' Maximum number of days in a month. Const cbytMonthDaysMax As Byte = 31 Dim intYears As Integer Dim intDaysDiff As Integer Dim intReversed As Integer ' No special error handling. On Error Resume Next intYears = DateDiff("yyyy", datDate1, datDate2) If intYears = 0 Then ' Both dates fall within the same year. Else ' Check for ultimo February and leap years. If (Month(datDate1) = cbytFebMonth) And (Month(datDate2) = cbytFebMonth) Then ' Both dates fall in February. ' Check if dates are at ultimo February. If (Day(datDate1) >= cbytFebLastDay) And (Day(datDate2) >= cbytFebLastDay) Then ' Both dates are at ultimo February. ' Check if the dates fall in leap years. If Day(DateSerial(Year(datDate1), cbytFebMonth + 1, 0)) = cbytFebLastDay Xor _ Day(DateSerial(Year(datDate2), cbytFebMonth + 1, 0)) = cbytFebLastDay Then ' Only one date falls within a leap year. ' Adjust both dates to day 28 of February. datDate1 = DateAdd("d", cbytFebLastDay - Day(datDate1), datDate1) datDate2 = DateAdd("d", cbytFebLastDay - Day(datDate2), datDate2) Else ' Both dates fall either in leap years or non leap years. ' No adjustment needed. End If End If End If ' Calculate day difference using months and days as Days() will fail when ' comparing leap years with non leap years for dates after February. intDaysDiff = (Month(datDate1) * cbytMonthDaysMax + Day(datDate1)) - (Month(datDate2) * cbytMonthDaysMax + Day(datDate2)) intReversed = Sgn(intYears) ' Decrease count of years by one if dates are closer than one year. intYears = intYears + (intReversed * ((intReversed * intDaysDiff) > 0)) End If Years = intYears End Function /gustav From andy at minstersystems.co.uk Wed Jul 28 06:10:05 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 12:10:05 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: <20040728111013.3569E2577C2@smtp.nildram.co.uk> Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > 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 jmoss111 at bellsouth.net Wed Jul 28 06:11:41 2004 From: jmoss111 at bellsouth.net (JMoss) Date: Wed, 28 Jul 2004 06:11:41 -0500 Subject: [AccessD] Updating subform with query value In-Reply-To: <1410085912.20040728124120@cactus.dk> Message-ID: Gustav, Thanks for the answer. I worked this out last night and what I did was hide the subforms on load and then did a .requery and .visible on the subforms in the text box AfterUpdate event. I didnt think that I could use a text box as master to the childs query column, but it appears that I could. Once again, thanks for your help. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 5:41 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Updating subform with query value Hi Jim The easy route would be to move the parameters into the LinkMasterFields and LinkChildFields of the subform control. /gustav > In Access 2002 I have a form with a text box for entry of a parameter value and two subforms that have their recordsource set to queries with the parameter from the main form. How do I get the > query values to display on the subforms? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 06:15:39 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 07:15:39 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: You said you already have days and years(Years is (days/365)). That leaves months and weeks. Months should be (days/365)*12. Weeks should be (days/365)*52. Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Rodgers Sent: Wednesday, July 28, 2004 3:52 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Dear Experts I can divide in Access the days from a date() into years with a simple /365, but is there a way to have months and days ... so I have years, months and days, please? Cheers paul -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 06:26:44 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 07:26:44 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: Andy, The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. Years would be DateDiff("d",begindate,enddate)/365 Months would be (DateDiff("d",begindate,enddate)/365)*12 Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 Days would be DateDiff("d",begindate,enddate) Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, July 28, 2004 7:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Wed Jul 28 06:44:45 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 07:44:45 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <001901c4734d$db144030$80b3fea9@ColbyM6805> Message-ID: <00cc01c47498$47ec8370$6601a8c0@rock> Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From stuart at lexacorp.com.pg Wed Jul 28 06:53:56 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Wed, 28 Jul 2004 21:53:56 +1000 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: <41082074.20199.19EB930@lexacorp.com.pg> On 28 Jul 2004 at 8:52, Paul Rodgers wrote: > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, No you can't because Leap Years don't have 365 days :-( > but is there a way to have months and days ... so I have years, months > and days, please? > First, you need to determine what answers you want. Take 28 Feb 03 to 1 Apr 03 as an example: Is that 1 month and 1 day (end of Feb to end of Mar + 1 day) or 1 month and 4 days (28 Feb to 28 Mar + 4 days) You will need to develop functions based on which interpretation you want. Here's one I've just knocked up that will return the second answer. I'll leave it to you to work out a method if you want the first answer. BTW, I've just copyrighted the word monthiversary :-) Function YMDDiff(Date1 As Date, Date2 As Date) As String Dim years As Long Dim months As Long Dim days As Long Dim monthiversary As Date months = DateDiff("m", Date1, Date2) years = Int(months / 12) monthiversary = DateAdd("m", months, Date1) If Date2 - monthiversary < 0 Then months = months - 1 days = Date2 - DateAdd("m", -1, monthiversary) Else days = Date2 - monthiversary End If months = months - (years * 12) YMDDiff = years & " years, " & months & " months" & " and " & days & " days" End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From marcus at tsstech.com Wed Jul 28 07:09:54 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 08:09:54 -0400 Subject: [AccessD] Dividing days into years and months Message-ID: Here is a function that is approximate. You will need to add code for leap years... Public Function YMD(ByVal startdate As Date, ByVal enddate As Date) Dim intYears As Integer Dim intMonths As Integer Dim intDays As Integer intDays = DateDiff("d", startdate, enddate) intYears = intDays / 365 intMonths = (intDays / 365) * 12 - (intYears * 12) intDays = intDays - (intYears * 365) - ((intMonths / 12) * 365) YMD = "Years:" & intYears & " Months:" & intMonths & " Days:" & intDays End Function From doug at starntech.com Wed Jul 28 07:50:48 2004 From: doug at starntech.com (Douglas Barnes) Date: Wed, 28 Jul 2004 08:50:48 -0400 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: Try looking at the DATESERIAL function Function Age(Date1 As Date, Date2 As Date) As String Dim Y As Integer Dim M As Integer Dim D As Integer Dim Temp1 As Date Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) D = Day(Date2) - Day(Date1) If D < 0 Then M = M - 1 D = Day(DateSerial(Year(date2), Month(date2), 0)) + D End If Age = Y & " years " & M & " months " & D & " days" End Function Douglas Barnes Starn Technical Services P. O. 1172 Meadville, PA 16335 814.724.1045 doug at starntech.com www.starntech.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Scott Marcus Sent: July 28, 2004 8:10 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Here is a function that is approximate. You will need to add code for leap years... Public Function YMD(ByVal startdate As Date, ByVal enddate As Date) Dim intYears As Integer Dim intMonths As Integer Dim intDays As Integer intDays = DateDiff("d", startdate, enddate) intYears = intDays / 365 intMonths = (intDays / 365) * 12 - (intYears * 12) intDays = intDays - (intYears * 365) - ((intMonths / 12) * 365) YMD = "Years:" & intYears & " Months:" & intMonths & " Days:" & intDays End Function -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 08:02:12 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:02:12 +0000 Subject: [AccessD] Query giving different results each time Message-ID: It is a date...this app uses what they call "Effective Dating"...where the max of is the record that is currently active. Thanks, Mark >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Query giving different results each time >Date: Tue, 27 Jul 2004 14:43:19 -0400 > >What kind of data's in effdt? > >Susan H. > > >Charlotte, > >The original post had the SQL...but here is what I am currently using...but >with the same inconsistant results. Any ideas would be greatly >appreciated. > >Thanks, > >Mark > >SELECT tblPRS_Pending_PHONE.profile_cm_seq, tblPRS_Pending_PHONE.effdt, >tblPRS_Pending_PHONE.bo_id, tblPRS_Pending_PHONE.primary_ind, >tblPRS_Pending_PHONE.phone FROM tblPRS_Pending_PHONE WHERE >(((tblPRS_Pending_PHONE.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM >tblPRS_Pending_PHONE A WHERE tblPRS_Pending_PHONE.bo_id = A.bo_id and >tblPRS_Pending_PHONE.profile_cm_seq = A.profile_cm_seq;)) AND >((tblPRS_Pending_PHONE.primary_ind)="y")); > > > >From: "Charlotte Foust" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Tue, 27 Jul 2004 08:56:24 -0700 > > > >I missed the part of thread where you mentioned a sub-query. Have you > >posted the SQL for this query/subquery? > > > >Charlotte Foust > > > > > >-----Original Message----- > >From: Mark A Matte [mailto:markamatte at hotmail.com] > >Sent: Tuesday, July 27, 2004 7:19 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Yes I tried the compact and repair. It didn't seem to help. Each time > >I run the query...I get different results...is there something about > >the sub-query I am missing? > > > >Thanks, > > > >Mark A. Matte > > > > > > >From: "Stuart McLachlan" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: Access Developers discussion and > > >problemsolving > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Tue, 27 Jul 2004 14:01:07 +1000 > > > > > >On 27 Jul 2004 at 1:45, Mark A Matte wrote: > > > > > > > Hello All, > > > > > > > > Thanks for the feedback...but I'm still a little confused...If I > > > > am > > >running > > > > the same SQL against the same table...back to back...why am I > > > > getting different results? > > > > > > > > > > >A corrupt index? Have you tried a compact and repair? > > > > > >-- > > >Lexacorp Ltd > > >http://www.lexacorp.com.pg > > >Information Technology Consultancy, Software Development,System > > >Support. > > > > > > > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Is your PC infected? Get a FREE online computer virus scan from > >McAfee(r) > >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Is your PC infected? Get a FREE online computer virus scan from McAfeeR >Security. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ MSN Toolbar provides one-click access to Hotmail from any Web page ? FREE download! http://toolbar.msn.click-url.com/go/onm00200413ave/direct/01/ From gustav at cactus.dk Wed Jul 28 08:09:47 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 15:09:47 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <2818993401.20040728150947@cactus.dk> Hi Mark Does this "date" contain a time component? Or is it a clean date? /gustav > It is a date...this app uses what they call "Effective Dating"...where the > max of is the record that is currently active. From marcus at tsstech.com Wed Jul 28 08:12:00 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 09:12:00 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Do you try the following to see if it fixes your problem? SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.effdt=(SELECT Max(A.effdt) FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id AND B.profile_cm_seq = A.profile_cm_seq)) AND B.primary_ind="y"; Scott Marcus From markamatte at hotmail.com Wed Jul 28 08:26:52 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:26:52 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Scott, Thanks for the feedback...but the results of this sql are also inconsistant...I ran it 3 times...and got 3 different results...the reslults are typically close...for the last 3 tries...it returned 2365, 2369 and 2375...without changing anything...just re-running the sql??? I fell very confused...lol Any ideas? Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:12:00 -0400 > >Mark, > >Do you try the following to see if it fixes your problem? > >SELECT B.profile_cm_seq, > B.effdt, > B.bo_id, > B.primary_ind, > B.phone >FROM tblPRS_Pending_PHONE B >WHERE (B.effdt=(SELECT Max(A.effdt) > FROM tblPRS_Pending_PHONE A > WHERE B.bo_id = A.bo_id > AND > B.profile_cm_seq = A.profile_cm_seq)) > AND > B.primary_ind="y"; > > >Scott Marcus > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From markamatte at hotmail.com Wed Jul 28 08:27:32 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 13:27:32 +0000 Subject: [AccessD] Query giving different results each time Message-ID: It is just the date. Thanks, Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 15:09:47 +0200 > >Hi Mark > >Does this "date" contain a time component? Or is it a clean date? > >/gustav > > > > It is a date...this app uses what they call "Effective Dating"...where >the > > max of is the record that is currently active. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From gustav at cactus.dk Wed Jul 28 08:30:05 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 15:30:05 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: References: Message-ID: <18220211272.20040728153005@cactus.dk> Hi Douglas > Function Age(Date1 As Date, Date2 As Date) As String > Dim Y As Integer > Dim M As Integer > Dim D As Integer > Dim Temp1 As Date > Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) > Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) > M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) > D = Day(Date2) - Day(Date1) > If D < 0 Then > M = M - 1 > D = Day(DateSerial(Year(date2), Month(date2), 0)) + D > End If > Age = Y & " years " & M & " months " & D & " days" > End Function Just for the records - this Age() as well as quite a few other Age-functions will fail for those born on 29. Feb. Look up in the archive "Age Calc - How much have I forgotten" to see a reliable method. /gustav From marcus at tsstech.com Wed Jul 28 08:35:47 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 09:35:47 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Lets try a different route. Please explain what you have and what result you want. Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 9:27 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time Scott, Thanks for the feedback...but the results of this sql are also inconsistant...I ran it 3 times...and got 3 different results...the reslults are typically close...for the last 3 tries...it returned 2365, 2369 and 2375...without changing anything...just re-running the sql??? I fell very confused...lol Any ideas? Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:12:00 -0400 > >Mark, > >Do you try the following to see if it fixes your problem? > >SELECT B.profile_cm_seq, > B.effdt, > B.bo_id, > B.primary_ind, > B.phone >FROM tblPRS_Pending_PHONE B >WHERE (B.effdt=(SELECT Max(A.effdt) > FROM tblPRS_Pending_PHONE A > WHERE B.bo_id = A.bo_id > AND > B.profile_cm_seq = A.profile_cm_seq)) > AND > B.primary_ind="y"; > > >Scott Marcus > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 09:34:36 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 14:34:36 +0000 Subject: [AccessD] Query giving different results each time Message-ID: I'll do my best... The table in question uses the following fields: bo_id...unique number string for each customer profile_cm_seq...unique number string for each phone number primary_ind...yes/no filed indicating primary Effdt...date row is active Phone...phone number Each time a phone number is added...or changed...multiple rows are added. If you have the following row bo pro_cm_seq Primary effdt phone 10 86547 Y 5/21/2004 888/555/1212 and you add a new PRIMARY number336/555/2222 today...the following rows will be added: bo pro_cm_seq Primary effdt phone 10 86547 N 7/28/2004 888/555/1212 10 11235 Y 7/28/2004 336/555/2222 So now...I need the most current PRIMARY Phone number...but I have 2 records that show as PRIMARY with 2 different numbers... I can't just do a max on the date because the phone numbers are different. I even went as far as islolating some of the records that showed in one pull but not the next...if I run the sql for just that bo_id...it pulls correctly everytime. The table only has 2967 records in it. All fields mentioned are TEXT except for the effdt...which is a date field. If I could not get the right number of rows in my output...I would just keep tweaking the sql...my concern is why the same sql keeps giving me different results. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:35:47 -0400 > >Lets try a different route. Please explain what you have and what result >you want. > >Scott Marcus > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 9:27 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Scott, > >Thanks for the feedback...but the results of this sql are also >inconsistant...I ran it 3 times...and got 3 different results...the >reslults >are typically close...for the last 3 tries...it returned 2365, 2369 and >2375...without changing anything...just re-running the sql??? > >I fell very confused...lol > >Any ideas? > >Thanks, > >Mark > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > >Mark, > > > >Do you try the following to see if it fixes your problem? > > > >SELECT B.profile_cm_seq, > > B.effdt, > > B.bo_id, > > B.primary_ind, > > B.phone > >FROM tblPRS_Pending_PHONE B > >WHERE (B.effdt=(SELECT Max(A.effdt) > > FROM tblPRS_Pending_PHONE A > > WHERE B.bo_id = A.bo_id > > AND > > B.profile_cm_seq = A.profile_cm_seq)) > > AND > > B.primary_ind="y"; > > > > > >Scott Marcus > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ From andy at minstersystems.co.uk Wed Jul 28 09:36:18 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 15:36:18 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: <20040728143614.C99A925DE14@smtp.nildram.co.uk> True. Sorry. Should engage brain before fingers. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Date: 28/07/04 11:26 > > Andy, > > The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. > > Years would be DateDiff("d",begindate,enddate)/365 > Months would be (DateDiff("d",begindate,enddate)/365)*12 > Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 > Days would be DateDiff("d",begindate,enddate) > > Scott Marcus > TSS Technologies, Inc. > marcus at tsstech.com > (513) 772-7000 > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Wednesday, July 28, 2004 7:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Dividing days into years and months > > Hi Paul > > I'm guessing here but it sounds like you're talking about the number of > years etc between two dates. If that's true then check out the DateDiff > function and DateAdd functions. What you could do then is calc the DateDiff > in years, use DateAdd to add that number of years back onto your first date > then get the DateDiff between the new date and the original last date in > Months, then repeat to get the remaining number of days. > > If I've misinterpreted what you want I'm sorry. If I'm right but you need > more help let me/us know. > > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > <accessd at databaseadvisors.com> > To: 'Access Developers discussion and problem solving' > <accessd at databaseadvisors.com> > Subject: [AccessD] Dividing days into years and months > Date: 28/07/04 07:55 > > > > > Dear Experts > > > > I can divide in Access the days from a date() into years with a simple > > /365, but is there a way to have months and days ... so I have years, > months > > and days, please? > > > > Cheers paul > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > -- > _______________________________________________ > 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 marcus at tsstech.com Wed Jul 28 10:05:07 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:05:07 -0400 Subject: [AccessD] Query giving different results each time Message-ID: I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated records. Here they are... qry1: SELECT tblTest.bo_id, tblTest.pro_cm_seq, Count(tblTest.bo_id) AS CountOfbo_id FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); qry2: SELECT tblTest.bo_id, tblTest.pro_cm_seq, tblTest.Primary, tblTest.effdt, tblTest.Phone FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 10:35 AM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time I'll do my best... The table in question uses the following fields: bo_id...unique number string for each customer profile_cm_seq...unique number string for each phone number primary_ind...yes/no filed indicating primary Effdt...date row is active Phone...phone number Each time a phone number is added...or changed...multiple rows are added. If you have the following row bo pro_cm_seq Primary effdt phone 10 86547 Y 5/21/2004 888/555/1212 and you add a new PRIMARY number336/555/2222 today...the following rows will be added: bo pro_cm_seq Primary effdt phone 10 86547 N 7/28/2004 888/555/1212 10 11235 Y 7/28/2004 336/555/2222 So now...I need the most current PRIMARY Phone number...but I have 2 records that show as PRIMARY with 2 different numbers... I can't just do a max on the date because the phone numbers are different. I even went as far as islolating some of the records that showed in one pull but not the next...if I run the sql for just that bo_id...it pulls correctly everytime. The table only has 2967 records in it. All fields mentioned are TEXT except for the effdt...which is a date field. If I could not get the right number of rows in my output...I would just keep tweaking the sql...my concern is why the same sql keeps giving me different results. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 09:35:47 -0400 > >Lets try a different route. Please explain what you have and what result >you want. > >Scott Marcus > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 9:27 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >Scott, > >Thanks for the feedback...but the results of this sql are also >inconsistant...I ran it 3 times...and got 3 different results...the >reslults >are typically close...for the last 3 tries...it returned 2365, 2369 and >2375...without changing anything...just re-running the sql??? > >I fell very confused...lol > >Any ideas? > >Thanks, > >Mark > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > >Mark, > > > >Do you try the following to see if it fixes your problem? > > > >SELECT B.profile_cm_seq, > > B.effdt, > > B.bo_id, > > B.primary_ind, > > B.phone > >FROM tblPRS_Pending_PHONE B > >WHERE (B.effdt=(SELECT Max(A.effdt) > > FROM tblPRS_Pending_PHONE A > > WHERE B.bo_id = A.bo_id > > AND > > B.profile_cm_seq = A.profile_cm_seq)) > > AND > > B.primary_ind="y"; > > > > > >Scott Marcus > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Express yourself instantly with MSN Messenger! Download today - it's FREE! http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 10:07:07 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 11:07:07 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, You want to select the record where the PRIMARY_IND = Y for EACH BO ? Correct? SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.bo_id,B.effdt) IN(SELECT a.bo_id, Max(a.effdt) FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) AND B.primary_ind="Y" ---- If the backend is Access 97 you may have to split this into 2 queries HTH Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > > I'll do my best... > > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary Effdt...date > row is active Phone...phone number > > Each time a phone number is added...or changed...multiple > rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > > and you add a new PRIMARY number336/555/2222 today...the > following rows will be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > > > So now...I need the most current PRIMARY Phone number...but I > have 2 records > that show as PRIMARY with 2 different numbers... I can't just > do a max on > the date because the phone numbers are different. > > I even went as far as islolating some of the records that > showed in one pull > but not the next...if I run the sql for just that bo_id...it > pulls correctly > everytime. > > The table only has 2967 records in it. All fields mentioned > are TEXT except > for the effdt...which is a date field. > > If I could not get the right number of rows in my output...I > would just keep > tweaking the sql...my concern is why the same sql keeps > giving me different > results. > > Thanks, > > Mark > From gustav at cactus.dk Wed Jul 28 10:13:20 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 17:13:20 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <1126406520.20040728171320@cactus.dk> Hi Mark I vote for qry1. It is probably the fastest and it could even be reduced to: SELECT tblTest.bo_id, tblTest.pro_cm_seq, FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); /gustav > I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated > records. > Here they are... > qry1: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > qry2: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > I'll do my best... > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. > If I could not get the right number of rows in my output...I would just keep > tweaking the sql...my concern is why the same sql keeps giving me different > results. > Thanks, > Mark From markamatte at hotmail.com Wed Jul 28 10:20:23 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 15:20:23 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Scott, This does not filter the correct records. I only need 1 primary number for each bo_id...it gave me primary and non primary...and sometimes more than 1 number for the bo_id...I can create multiple tables/queries to get to the data I need...but I'm still curious as to why/what access is interpretting different each time it executes this sql. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From marcus at tsstech.com Wed Jul 28 10:23:00 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:23:00 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, This doen't give you the Phone Number so a second query is needed. I have however found a solution in one query... SELECT tblTest.bo_id, tblTest.Primary, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, Last(tblTest.effdt) DESC; -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 11:13 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query giving different results each time Hi Mark I vote for qry1. It is probably the fastest and it could even be reduced to: SELECT tblTest.bo_id, tblTest.pro_cm_seq, FROM tblTest GROUP BY tblTest.bo_id, tblTest.pro_cm_seq HAVING (((Count(tblTest.bo_id))=1)); /gustav > I have two queries that working together may give you the result you want. Just run qry2. They work as predicted on my machine. It is an alternate method that assumes matching pairs for outdated > records. > Here they are... > qry1: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > qry2: > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > Sent: Wednesday, July 28, 2004 10:35 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > I'll do my best... > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. > If I could not get the right number of rows in my output...I would just keep > tweaking the sql...my concern is why the same sql keeps giving me different > results. > Thanks, > Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 10:26:28 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:26:28 -0400 Subject: [AccessD] Query giving different results each time Message-ID: <From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don't just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 10:28:45 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 11:28:45 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Be Careful using LAST it will not always give you what you expect. It will give you the last one it encounters which may not be the MAX date !!! See help files and knowledge base Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Scott Marcus > Sent: Wednesday, July 28, 2004 11:23 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Query giving different results each time > > Gustav, > > This doen't give you the Phone Number so a second query is needed. > > I have however found a solution in one query... > > SELECT tblTest.bo_id, > tblTest.Primary, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest > GROUP BY tblTest.bo_id, tblTest.Primary HAVING > (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, > Last(tblTest.effdt) DESC; > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock > Sent: Wednesday, July 28, 2004 11:13 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Query giving different results each time > > > Hi Mark > > I vote for qry1. > It is probably the fastest and it could even be reduced to: > > SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > FROM tblTest > GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq > HAVING (((Count(tblTest.bo_id))=1)); > > /gustav > > > > I have two queries that working together may give you the > result you > > want. Just run qry2. They work as predicted on my machine. > It is an alternate method that assumes matching pairs for > outdated records. > > > Here they are... > > > qry1: > > SELECT tblTest.bo_id, > > tblTest.pro_cm_seq, > > Count(tblTest.bo_id) AS CountOfbo_id FROM tblTest GROUP BY > > tblTest.bo_id, > > tblTest.pro_cm_seq > > HAVING (((Count(tblTest.bo_id))=1)); > > > qry2: > > SELECT tblTest.bo_id, > > tblTest.pro_cm_seq, > > tblTest.Primary, > > tblTest.effdt, > > tblTest.Phone > > FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = > qry1.pro_cm_seq; > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > Mark A Matte > > Sent: Wednesday, July 28, 2004 10:35 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Query giving different results each time > > > > I'll do my best... > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > profile_cm_seq...unique > > number string for each phone number primary_ind...yes/no filed > > indicating primary Effdt...date row is active Phone...phone number > > > Each time a phone number is added...or changed...multiple > rows are added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows will be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but > I have 2 > > records that show as PRIMARY with 2 different numbers... I > can't just > > do a max on the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one pull but not the next...if I run the sql for just that > bo_id...it > > pulls correctly everytime. > > > The table only has 2967 records in it. All fields > mentioned are TEXT > > except for the effdt...which is a date field. > > > If I could not get the right number of rows in my output...I would > > just keep tweaking the sql...my concern is why the same sql keeps > > giving me different results. > > > Thanks, > > > Mark > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From marcus at tsstech.com Wed Jul 28 10:30:53 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:30:53 -0400 Subject: [AccessD] Query giving different results each time Message-ID: You can shorten it to... SELECT tblTest.bo_id, tblTest.Primary, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Scott Marcus Sent: Wednesday, July 28, 2004 11:26 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Query giving different results each time <From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:05:07 -0400 > >I have two queries that working together may give you the result you want. >Just run qry2. They work as predicted on my machine. It is an alternate >method that assumes matching pairs for outdated records. > >Here they are... > >qry1: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > Count(tblTest.bo_id) AS CountOfbo_id >FROM tblTest >GROUP BY tblTest.bo_id, > tblTest.pro_cm_seq >HAVING (((Count(tblTest.bo_id))=1)); > >qry2: >SELECT tblTest.bo_id, > tblTest.pro_cm_seq, > tblTest.Primary, > tblTest.effdt, > tblTest.Phone >FROM tblTest INNER JOIN qry1 ON tblTest.pro_cm_seq = qry1.pro_cm_seq; > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte >Sent: Wednesday, July 28, 2004 10:35 AM >To: accessd at databaseadvisors.com >Subject: RE: [AccessD] Query giving different results each time > > >I'll do my best... > >The table in question uses the following fields: >bo_id...unique number string for each customer >profile_cm_seq...unique number string for each phone number >primary_ind...yes/no filed indicating primary >Effdt...date row is active >Phone...phone number > >Each time a phone number is added...or changed...multiple rows are added. >If you have the following row >bo pro_cm_seq Primary effdt phone >10 86547 Y 5/21/2004 888/555/1212 > >and you add a new PRIMARY number336/555/2222 today...the following rows >will >be added: >bo pro_cm_seq Primary effdt phone >10 86547 N 7/28/2004 888/555/1212 >10 11235 Y 7/28/2004 336/555/2222 > > >So now...I need the most current PRIMARY Phone number...but I have 2 >records >that show as PRIMARY with 2 different numbers... I can't just do a max on >the date because the phone numbers are different. > >I even went as far as islolating some of the records that showed in one >pull >but not the next...if I run the sql for just that bo_id...it pulls >correctly >everytime. > >The table only has 2967 records in it. All fields mentioned are TEXT >except >for the effdt...which is a date field. > >If I could not get the right number of rows in my output...I would just >keep >tweaking the sql...my concern is why the same sql keeps giving me different >results. > >Thanks, > >Mark > > > > > > >From: "Scott Marcus" > >Reply-To: Access Developers discussion and problem > >solving > >To: "Access Developers discussion and problem > >solving" > >Subject: RE: [AccessD] Query giving different results each time > >Date: Wed, 28 Jul 2004 09:35:47 -0400 > > > >Lets try a different route. Please explain what you have and what result > >you want. > > > >Scott Marcus > > > >-----Original Message----- > >From: accessd-bounces at databaseadvisors.com > >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte > >Sent: Wednesday, July 28, 2004 9:27 AM > >To: accessd at databaseadvisors.com > >Subject: RE: [AccessD] Query giving different results each time > > > > > >Scott, > > > >Thanks for the feedback...but the results of this sql are also > >inconsistant...I ran it 3 times...and got 3 different results...the > >reslults > >are typically close...for the last 3 tries...it returned 2365, 2369 and > >2375...without changing anything...just re-running the sql??? > > > >I fell very confused...lol > > > >Any ideas? > > > >Thanks, > > > >Mark > > > > > > >From: "Scott Marcus" > > >Reply-To: Access Developers discussion and problem > > >solving > > >To: "Access Developers discussion and problem > > >solving" > > >Subject: RE: [AccessD] Query giving different results each time > > >Date: Wed, 28 Jul 2004 09:12:00 -0400 > > > > > >Mark, > > > > > >Do you try the following to see if it fixes your problem? > > > > > >SELECT B.profile_cm_seq, > > > B.effdt, > > > B.bo_id, > > > B.primary_ind, > > > B.phone > > >FROM tblPRS_Pending_PHONE B > > >WHERE (B.effdt=(SELECT Max(A.effdt) > > > FROM tblPRS_Pending_PHONE A > > > WHERE B.bo_id = A.bo_id > > > AND > > > B.profile_cm_seq = A.profile_cm_seq)) > > > AND > > > B.primary_ind="y"; > > > > > > > > >Scott Marcus > > > > > >-- > > >_______________________________________________ > > >AccessD mailing list > > >AccessD at databaseadvisors.com > > >http://databaseadvisors.com/mailman/listinfo/accessd > > >Website: http://www.databaseadvisors.com > > > >_________________________________________________________________ > >Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > >_________________________________________________________________ >Express yourself instantly with MSN Messenger! Download today - it's FREE! >http://messenger.msn.click-url.com/go/onm00200471ave/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 _________________________________________________________________ Don't just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/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 marcus at tsstech.com Wed Jul 28 10:34:41 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 11:34:41 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Ok. I'll be more careful... SELECT tblTest.bo_id, Last(tblTest.pro_cm_seq) AS SEQ, Last(tblTest.Phone) AS PHONE_NUMBER, Last(tblTest.effdt) AS EFFECTIVE_DATE FROM tblTest GROUP BY tblTest.bo_id, tblTest.Primary HAVING (((tblTest.Primary)=True)) ORDER BY tblTest.bo_id, Last(tblTest.effdt); -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, Patricia (OTDA) Sent: Wednesday, July 28, 2004 11:29 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Query giving different results each time Be Careful using LAST it will not always give you what you expect. It will give you the last one it encounters which may not be the MAX date !!! See help files and knowledge base Patti From gustav at cactus.dk Wed Jul 28 10:57:27 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 17:57:27 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <10529053516.20040728175727@cactus.dk> Hi Mark and Scott Maybe I'm dense but - given your example data - this gives you exactly what you are asking for: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING Count(pro_cm_seq)=1; /gustav > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. From KIsmert at TexasSystems.com Wed Jul 28 10:59:44 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Wed, 28 Jul 2004 10:59:44 -0500 Subject: [AccessD] Early and Late-Binding Redux Message-ID: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm From marcus at tsstech.com Wed Jul 28 11:12:26 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 12:12:26 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, That works unless you want more of the fields in the query. If he wants only the phone number...yes. Maybe I'm being dense(it won't be the first time...or the last). -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock Sent: Wednesday, July 28, 2004 11:57 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Query giving different results each time Hi Mark and Scott Maybe I'm dense but - given your example data - this gives you exactly what you are asking for: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING Count(pro_cm_seq)=1; /gustav > The table in question uses the following fields: > bo_id...unique number string for each customer > profile_cm_seq...unique number string for each phone number > primary_ind...yes/no filed indicating primary > Effdt...date row is active > Phone...phone number > Each time a phone number is added...or changed...multiple rows are added. > If you have the following row > bo pro_cm_seq Primary effdt phone > 10 86547 Y 5/21/2004 888/555/1212 > and you add a new PRIMARY number336/555/2222 today...the following rows will > be added: > bo pro_cm_seq Primary effdt phone > 10 86547 N 7/28/2004 888/555/1212 > 10 11235 Y 7/28/2004 336/555/2222 > So now...I need the most current PRIMARY Phone number...but I have 2 records > that show as PRIMARY with 2 different numbers... I can't just do a max on > the date because the phone numbers are different. > I even went as far as islolating some of the records that showed in one pull > but not the next...if I run the sql for just that bo_id...it pulls correctly > everytime. > The table only has 2967 records in it. All fields mentioned are TEXT except > for the effdt...which is a date field. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 11:11:02 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:11:02 +0000 Subject: [AccessD] Query giving different results each time Message-ID: wow...ok...I still don't understand why I would get different results from the same sql...but I'm ok with that for now... Scott, the sql below and the 2 query approach did give different results(about 300 difference). The sql below did give the number I expected...but as Patricia pointed out...it did not always give the max of the date...although it provided the correct number of records...they were not always the correct ones...So I tried to change the 'last' on the effdt to 'max'...but the results do vary...I get the last phone number...but the max date...with this approach the date and phone don't necessarily correspond anymore. So close...I can feel it. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:34:41 -0400 > >Ok. I'll be more careful... > >SELECT tblTest.bo_id, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE >FROM tblTest >GROUP BY tblTest.bo_id, tblTest.Primary >HAVING (((tblTest.Primary)=True)) >ORDER BY tblTest.bo_id, Last(tblTest.effdt); > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, >Patricia (OTDA) >Sent: Wednesday, July 28, 2004 11:29 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Query giving different results each time > > >Be Careful using LAST it will not always give you what you expect. It >will give you the last one it encounters which may not be the MAX date >!!! > >See help files and knowledge base > >Patti > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From markamatte at hotmail.com Wed Jul 28 11:17:01 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:17:01 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > > profile_cm_seq...unique number string for each phone number > > primary_ind...yes/no filed indicating primary > > Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From markamatte at hotmail.com Wed Jul 28 11:18:31 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 16:18:31 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Just the bo and phone would be fine...I pulled in the date just to verify I was getting the correct record. >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 12:12:26 -0400 > >Gustav, > >That works unless you want more of the fields in the query. If he wants >only the phone number...yes. > >Maybe I'm being dense(it won't be the first time...or the last). > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Gustav Brock >Sent: Wednesday, July 28, 2004 11:57 AM >To: Access Developers discussion and problem solving >Subject: Re: [AccessD] Query giving different results each time > > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: > > bo_id...unique number string for each customer > > profile_cm_seq...unique number string for each phone number > > primary_ind...yes/no filed indicating primary > > Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From artful at rogers.com Wed Jul 28 11:27:54 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 12:27:54 -0400 Subject: [AccessD] Dividing days into years and months In-Reply-To: Message-ID: <011d01c474bf$d60df130$6601a8c0@rock> While on this subject, I'd like to poll the readers for their clients' typical definition of a month. In my case, all clients interpret a month to mean "increment the month number while preserving the day number; if the month is 12, go to 1 and increase the year number". However, some of my clients break this rule when the day in question is EoM(): in that case they want to go to the next EoM(); i.e., the next date following Feb 29, 2004 is March 31, 2004; and conversely, the next date after Jan 31, 2004 is Feb 29, 2004. Any other non-logical variants? Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Scott Marcus Sent: Wednesday, July 28, 2004 7:27 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Dividing days into years and months Andy, The problem with DateDiff is that DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. Years would be DateDiff("d",begindate,enddate)/365 Months would be (DateDiff("d",begindate,enddate)/365)*12 Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or DateDiff("d",begindate,enddate)/7 Days would be DateDiff("d",begindate,enddate) Scott Marcus TSS Technologies, Inc. marcus at tsstech.com (513) 772-7000 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey Sent: Wednesday, July 28, 2004 7:10 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Paul I'm guessing here but it sounds like you're talking about the number of years etc between two dates. If that's true then check out the DateDiff function and DateAdd functions. What you could do then is calc the DateDiff in years, use DateAdd to add that number of years back onto your first date then get the DateDiff between the new date and the original last date in Months, then repeat to get the remaining number of days. If I've misinterpreted what you want I'm sorry. If I'm right but you need more help let me/us know. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: 'Access Developers discussion and problem solving' Subject: [AccessD] Dividing days into years and months Date: 28/07/04 07:55 > > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, but is there a way to have months and days ... so I have years, months > and days, please? > > Cheers paul > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > > > > ________________________________________________ Message sent using UebiMiau 2.7.2 -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From artful at rogers.com Wed Jul 28 11:29:18 2004 From: artful at rogers.com (Arthur Fuller) Date: Wed, 28 Jul 2004 12:29:18 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <00cc01c47498$47ec8370$6601a8c0@rock> Message-ID: <011e01c474c0$084eeeb0$6601a8c0@rock> Oops. I'm wrong. Sorry about that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 7:45 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Wed Jul 28 11:30:12 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 18:30:12 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <18331018802.20040728183012@cactus.dk> OK Mark, but it is a bit difficult if we only get bits and pieces. How about a "true" sample of data - to stop guessing? As for this new information this will do: SELECT bo, phone FROM tblPhone GROUP BY bo, phone HAVING (Count(pro_cm_seq) MOD 2) = 1; /gustav > Gustav, > This does not give the results I need. I believe it is because this does > not take into consideration a phone number being made primary...a second > time...There may be a number of rows for the same pro_cm_seq...and the last > one is now set to primary. > Sorry for the confusion... > Thanks, > Mark > P.S...This is something the company bought...It's not my monster...just > something I was handed...lol >>From: Gustav Brock >>Reply-To: Access Developers discussion and problem >>solving >>To: Access Developers discussion and problem >>solving >>Subject: Re: [AccessD] Query giving different results each time >>Date: Wed, 28 Jul 2004 17:57:27 +0200 >> >>Hi Mark and Scott >> >>Maybe I'm dense but - given your example data - this gives you exactly >>what you are asking for: >> >> SELECT >> bo, >> phone >> FROM >> tblPhone >> GROUP BY >> bo, >> phone >> HAVING Count(pro_cm_seq)=1; >> >>/gustav >> >> >> > The table in question uses the following fields: >> > bo_id...unique number string for each customer >> > profile_cm_seq...unique number string for each phone number >> > primary_ind...yes/no filed indicating primary >> > Effdt...date row is active >> > Phone...phone number >> >> > Each time a phone number is added...or changed...multiple rows are >>added. >> > If you have the following row >> > bo pro_cm_seq Primary effdt phone >> > 10 86547 Y 5/21/2004 888/555/1212 >> >> > and you add a new PRIMARY number336/555/2222 today...the following rows >>will >> > be added: >> > bo pro_cm_seq Primary effdt phone >> > 10 86547 N 7/28/2004 888/555/1212 >> > 10 11235 Y 7/28/2004 336/555/2222 >> >> >> > So now...I need the most current PRIMARY Phone number...but I >> > have 2 records that show as PRIMARY with 2 different numbers... I >> > can't just do a max on the date because the phone numbers are >> > different. >> >> > I even went as far as islolating some of the records that showed >> > in one pull but not the next...if I run the sql for just that >> > bo_id...it pulls correctly everytime. >> >> > The table only has 2967 records in it. All fields mentioned are >> > TEXT except for the effdt...which is a date field. From marcus at tsstech.com Wed Jul 28 11:32:27 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 12:32:27 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Any possibility on sending that table to me? If so, zip it up. Scott -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Wednesday, July 28, 2004 12:11 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Query giving different results each time wow...ok...I still don't understand why I would get different results from the same sql...but I'm ok with that for now... Scott, the sql below and the 2 query approach did give different results(about 300 difference). The sql below did give the number I expected...but as Patricia pointed out...it did not always give the max of the date...although it provided the correct number of records...they were not always the correct ones...So I tried to change the 'last' on the effdt to 'max'...but the results do vary...I get the last phone number...but the max date...with this approach the date and phone don't necessarily correspond anymore. So close...I can feel it. Thanks, Mark >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 11:34:41 -0400 > >Ok. I'll be more careful... > >SELECT tblTest.bo_id, > Last(tblTest.pro_cm_seq) AS SEQ, > Last(tblTest.Phone) AS PHONE_NUMBER, > Last(tblTest.effdt) AS EFFECTIVE_DATE >FROM tblTest >GROUP BY tblTest.bo_id, tblTest.Primary >HAVING (((tblTest.Primary)=True)) >ORDER BY tblTest.bo_id, Last(tblTest.effdt); > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of O'Connor, >Patricia (OTDA) >Sent: Wednesday, July 28, 2004 11:29 AM >To: Access Developers discussion and problem solving >Subject: RE: [AccessD] Query giving different results each time > > >Be Careful using LAST it will not always give you what you expect. It >will give you the last one it encounters which may not be the MAX date >!!! > >See help files and knowledge base > >Patti > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lists at theopg.com Wed Jul 28 11:31:40 2004 From: lists at theopg.com (MarkH) Date: Wed, 28 Jul 2004 17:31:40 +0100 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <001301c474c0$5c7682f0$560b6bd5@netboxxp> Have you tried using sub-selects...? mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: 28 July 2004 17:17 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Query giving different results each time Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: bo_id...unique > > number string for each customer profile_cm_seq...unique number > > string for each phone number primary_ind...yes/no filed indicating > > primary Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a > > max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are > > TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From lists at theopg.com Wed Jul 28 11:31:47 2004 From: lists at theopg.com (MarkH) Date: Wed, 28 Jul 2004 17:31:47 +0100 Subject: [AccessD] Query giving different results each time In-Reply-To: Message-ID: <001401c474c0$608d1ca0$560b6bd5@netboxxp> Have you tried using sub-selects...? mark -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: 28 July 2004 17:17 To: accessd at databaseadvisors.com Subject: Re: [AccessD] Query giving different results each time Gustav, This does not give the results I need. I believe it is because this does not take into consideration a phone number being made primary...a second time...There may be a number of rows for the same pro_cm_seq...and the last one is now set to primary. Sorry for the confusion... Thanks, Mark P.S...This is something the company bought...It's not my monster...just something I was handed...lol >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 17:57:27 +0200 > >Hi Mark and Scott > >Maybe I'm dense but - given your example data - this gives you exactly >what you are asking for: > > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING Count(pro_cm_seq)=1; > >/gustav > > > > The table in question uses the following fields: bo_id...unique > > number string for each customer profile_cm_seq...unique number > > string for each phone number primary_ind...yes/no filed indicating > > primary Effdt...date row is active > > Phone...phone number > > > Each time a phone number is added...or changed...multiple rows are >added. > > If you have the following row > > bo pro_cm_seq Primary effdt phone > > 10 86547 Y 5/21/2004 888/555/1212 > > > and you add a new PRIMARY number336/555/2222 today...the following > > rows >will > > be added: > > bo pro_cm_seq Primary effdt phone > > 10 86547 N 7/28/2004 888/555/1212 > > 10 11235 Y 7/28/2004 336/555/2222 > > > > So now...I need the most current PRIMARY Phone number...but I have 2 >records > > that show as PRIMARY with 2 different numbers... I can't just do a > > max >on > > the date because the phone numbers are different. > > > I even went as far as islolating some of the records that showed in > > one >pull > > but not the next...if I run the sql for just that bo_id...it pulls >correctly > > everytime. > > > The table only has 2967 records in it. All fields mentioned are > > TEXT >except > > for the effdt...which is a date field. > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com --- Incoming mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.726 / Virus Database: 481 - Release Date: 22/07/2004 From gustav at cactus.dk Wed Jul 28 11:42:23 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 18:42:23 +0200 Subject: [AccessD] Dividing days into years and months In-Reply-To: <011d01c474bf$d60df130$6601a8c0@rock> References: <011d01c474bf$d60df130$6601a8c0@rock> Message-ID: <7831749773.20040728184223@cactus.dk> Hi Arthur That's the definition we stick to. Even when you say "30 days" it means "a month" because in general terms it means a banking month which counts as 30 days always, giving 360 "days" a year. The major difference comes when talking about, say, four weeks or 28 days; that is taking literally. /gustav > While on this subject, I'd like to poll the readers for their clients' > typical definition of a month. In my case, all clients interpret a month > to mean "increment the month number while preserving the day number; if > the month is 12, go to 1 and increase the year number". However, some of > my clients break this rule when the day in question is EoM(): in that > case they want to go to the next EoM(); i.e., the next date following > Feb 29, 2004 is March 31, 2004; and conversely, the next date after Jan > 31, 2004 is Feb 29, 2004. > Any other non-logical variants? > Arthur From gustav at cactus.dk Wed Jul 28 12:09:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 19:09:55 +0200 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> References: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <2933401669.20040728190955@cactus.dk> Thanks Ken! Very useful. It is this kind of work you often wish to do but seldom find the time for (not speaking for Drew of course). /gustav > After reading with interest the thread "More on early versus late binding", > the questions posed by the various responders prompted me to do some > research. This rather long post is the result. I have divided this post into > two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM > Binding. > -Ken From gustav at cactus.dk Wed Jul 28 12:14:54 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 19:14:54 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <18033700739.20040728191454@cactus.dk> Hi Mark > This does not give the results I need. I believe it is because this does > not take into consideration a phone number being made primary...a second > time...There may be a number of rows for the same pro_cm_seq...and the last > one is now set to primary. Hmmm, by second thought I should have figured that out myself ... busy day here. /gustav From jwcolby at colbyconsulting.com Wed Jul 28 12:21:05 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jul 2004 13:21:05 -0400 Subject: [AccessD] Multiple Table Search In-Reply-To: <011e01c474c0$084eeeb0$6601a8c0@rock> Message-ID: <004601c474c7$471a33f0$80b3fea9@ColbyM6805> Don't make it a habit. We are paid these exorbitant rates to be right. ;-) John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 12:29 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Oops. I'm wrong. Sorry about that. Arthur -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller Sent: Wednesday, July 28, 2004 7:45 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Sure it will, JC. You just select the "Tables" button in the "where to look" column. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John W. Colby Sent: Monday, July 26, 2004 4:19 PM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Jim, My take was that he wanted to find DATA from a record inside any of 100 tables. AFAIK Find and replace will not find data. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Monday, July 26, 2004 3:54 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Multiple Table Search Mark, Speed Ferret or Rick Fisher's Find and Replace. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Monday, July 26, 2004 2:38 PM To: [AccessD] Subject: [AccessD] Multiple Table Search Group, Strange request, but I've been handed this db and am not familiar enough with the data to do an educated search. What is the simplest method to find an instance of data amongst 70+ tables. Mark -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jwcolby at colbyconsulting.com Wed Jul 28 12:35:56 2004 From: jwcolby at colbyconsulting.com (John W. Colby) Date: Wed, 28 Jul 2004 13:35:56 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: <004701c474c9$59c07490$80b3fea9@ColbyM6805> Wow. Could you expand on all this just a little? ;-) Are you publishing this in an ezine? In any case, good job. And I shall be reading the online references. Thanks for taking the time to write this up. John W. Colby www.ColbyConsulting.com -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Wed Jul 28 12:46:53 2004 From: marcus at tsstech.com (Scott Marcus) Date: Wed, 28 Jul 2004 13:46:53 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, Is this any closer(I'm just taking stabs now)? Save both queries and run the second one. qry1: SELECT tblPRS_Pending_PHONE.bo_id, Max(tblPRS_Pending_PHONE.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE WHERE tblPRS_Pending_PHONE.Primary=True GROUP BY tblPRS_Pending_PHONE.bo_id; qry2: SELECT tblPRS_Pending_PHONE.bo_id, Last(tblPRS_Pending_PHONE.Phone) AS Phone_Number FROM tblTest INNER JOIN Query4 ON (tblPRS_Pending_PHONE.effdt = qry1.MaxOfeffdt) AND (tblPRS_Pending_PHONE.bo_id = qry1.bo_id) WHERE tblPRS_Pending_PHONE.Primary=True GROUP BY tblPRS_Pending_PHONE.bo_id; Until I have a copy of the data, I cannot be sure this is 100% correct. Scott From Patricia.O'Connor at dfa.state.ny.us Wed Jul 28 13:00:01 2004 From: Patricia.O'Connor at dfa.state.ny.us (O'Connor, Patricia (OTDA)) Date: Wed, 28 Jul 2004 14:00:01 -0400 Subject: [AccessD] Query giving different results each time Message-ID: Mark, If the backend is Access, you are going to have to do 2 queries because Access does not allow multiple fields in a subselect. I am not sure whether SQL SERVER Will allow multiple. In ORACLE the following will give you what you want - I have to do something similar every day SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B WHERE (B.bo_id,B.effdt) IN(SELECT a.bo_id, Max(a.effdt) FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) AND B.primary_ind="Y" --- With Access QUERY 1: SELECT a.bo_id, Max(a.effdt) as MAX_DT FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id QUERY 2: SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE as B INNER JOIN QUERY1 as Q1 on B.bo_id = q1.BO_ID AND b.EffDt = q1.MAX_DT WHERE b.PRIMARY_IND = "Y" ---- Another ORACLE OPTION SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE B, (SELECT a.bo_id, Max(a.effdt) MaxDt FROM tblPRS_Pending_PHONE a WHERE a.primary_ind="Y" GROUP BY a.bo_id) Q1 WHERE (B.bo_id = q1.BO_ID AND b.effdt = q1.MAX_DT) AND B.primary_ind = "Y" ---- Hope this helps Patti > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Mark A Matte > Sent: Wednesday, July 28, 2004 12:11 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Query giving different results each time > > wow...ok...I still don't understand why I would get different > results from the same sql...but I'm ok with that for now... > > Scott, the sql below and the 2 query approach did give > different results(about 300 difference). > > The sql below did give the number I expected...but as > Patricia pointed out...it did not always give the max of the > date...although it provided the correct number of > records...they were not always the correct ones...So I tried > to change the 'last' on the effdt to 'max'...but the results > do vary...I get the last phone number...but the max > date...with this approach the date and phone don't > necessarily correspond anymore. > > So close...I can feel it. > > Thanks, > > Mark > > > > From accessd at shaw.ca Wed Jul 28 13:15:19 2004 From: accessd at shaw.ca (Jim Lawrence (AccessD)) Date: Wed, 28 Jul 2004 11:15:19 -0700 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Hi Ken: Great research. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 9:00 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Wed Jul 28 13:18:42 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Wed, 28 Jul 2004 14:18:42 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Ken, You should forward this one of the Access Newsletter. Might get it published. Nice work. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Wed Jul 28 13:26:41 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 18:26:41 +0000 Subject: [AccessD] Query giving different results each time Message-ID: Hello All, Thanks for all of the feedback...some of the more recent suggestions where actually where my post began...I was trying to use a sub query to get to the data I wanted...my problem wasn't that I couldn't get the data that I wanted...I would run the same sql againts a small, local table in an A97 db(no BE or links just 1 db)...and each time I ran the sql...I would get a different number of records back. My question was why...I tried all of the single and multiple queries suggested...but I could already get to the data with multiple queries...and the single queries suggested did not provide the correct data. Here is the sql that would give different counts each time: SELECT B.profile_cm_seq, B.effdt, B.bo_id, B.primary_ind, B.phone FROM tblPRS_Pending_PHONE AS B WHERE (((B.effdt)=(SELECT Max(A.effdt) AS MaxOfeffdt FROM tblPRS_Pending_PHONE A WHERE B.bo_id = A.bo_id;)) AND ((B.primary_ind)="y")); I was dealing with less than 3000 records locally...so I didn't worry about creating indexes on this temp table. I have since indexed the bo_id and effdt fields. Now...the above sql runs everytime with the same number of rows returned. I cannot send the table because it is customer info...but below is a 'modified' sample of the data I have to work with...but...on a recordset this size...the above sql gave me exactly what I expected. Does anyone know why adding the indexes would return different results? Thanks, Mark bo_id profile_cm_seq primary_ind effdt phone 10 84562 Y 14-Jul-04 555/481-5549 10 2588 Y 22-Nov-03 555/363-2290 10 2588 N 22-Jan-04 555/363-2290 10 4444444 N 22-Nov-03 555/796-3360 10 4444444 N 22-Jan-04 555/796-3360 10 4444444 N 14-Jul-04 555/796-3360 10 65542 Y 22-Jan-04 555/363-4490 10 84562 N 22-Jan-04 555/781-5549 >From: "Scott Marcus" >Reply-To: Access Developers discussion and problem >solving >To: "Access Developers discussion and problem >solving" >Subject: RE: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 13:46:53 -0400 > >Mark, > >Is this any closer(I'm just taking stabs now)? Save both queries and run >the second one. > >qry1: >SELECT tblPRS_Pending_PHONE.bo_id, > Max(tblPRS_Pending_PHONE.effdt) AS MaxOfeffdt >FROM tblPRS_Pending_PHONE >WHERE tblPRS_Pending_PHONE.Primary=True >GROUP BY tblPRS_Pending_PHONE.bo_id; > >qry2: >SELECT tblPRS_Pending_PHONE.bo_id, > Last(tblPRS_Pending_PHONE.Phone) AS Phone_Number >FROM tblTest INNER JOIN Query4 ON (tblPRS_Pending_PHONE.effdt = >qry1.MaxOfeffdt) > AND (tblPRS_Pending_PHONE.bo_id = qry1.bo_id) >WHERE tblPRS_Pending_PHONE.Primary=True >GROUP BY tblPRS_Pending_PHONE.bo_id; > >Until I have a copy of the data, I cannot be sure this is 100% correct. > >Scott > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From gustav at cactus.dk Wed Jul 28 13:35:13 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 20:35:13 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: <18331018802.20040728183012@cactus.dk> References: <18331018802.20040728183012@cactus.dk> Message-ID: <9338519037.20040728203513@cactus.dk> Hi Mark and Patti If you need all info, this single query will do, no subquery: SELECT bo, pro_cm_seq, Max(effdt) AS lasteffdt, phone FROM tblPhone GROUP BY bo, pro_cm_seq, phone HAVING (Count(pro_cm_seq) Mod 2)=1; /gustav > OK Mark, but it is a bit difficult if we only get bits and pieces. > How about a "true" sample of data - to stop guessing? > As for this new information this will do: > SELECT > bo, > phone > FROM > tblPhone > GROUP BY > bo, > phone > HAVING > (Count(pro_cm_seq) MOD 2) = 1; > /gustav >> Gustav, >> This does not give the results I need. I believe it is because this does >> not take into consideration a phone number being made primary...a second >> time...There may be a number of rows for the same pro_cm_seq...and the last >> one is now set to primary. >> Sorry for the confusion... >> Thanks, >> Mark >> P.S...This is something the company bought...It's not my monster...just >> something I was handed...lol >>>Hi Mark and Scott >>> >>>Maybe I'm dense but - given your example data - this gives you exactly >>>what you are asking for: >>> >>> SELECT >>> bo, >>> phone >>> FROM >>> tblPhone >>> GROUP BY >>> bo, >>> phone >>> HAVING Count(pro_cm_seq)=1; >>> >>>/gustav >>> >>> >>> > The table in question uses the following fields: >>> > bo_id...unique number string for each customer >>> > profile_cm_seq...unique number string for each phone number >>> > primary_ind...yes/no filed indicating primary >>> > Effdt...date row is active >>> > Phone...phone number >>> >>> > Each time a phone number is added...or changed...multiple rows >>> > are added. >>> > If you have the following row >>> > bo pro_cm_seq Primary effdt phone >>> > 10 86547 Y 5/21/2004 888/555/1212 >>> >>> > and you add a new PRIMARY number336/555/2222 today...the >>> > following rows will be added: >>> > bo pro_cm_seq Primary effdt phone >>> > 10 86547 N 7/28/2004 888/555/1212 >>> > 10 11235 Y 7/28/2004 336/555/2222 >>> >>> >>> > So now...I need the most current PRIMARY Phone number...but I >>> > have 2 records that show as PRIMARY with 2 different numbers... I >>> > can't just do a max on the date because the phone numbers are >>> > different. >>> >>> > I even went as far as islolating some of the records that showed >>> > in one pull but not the next...if I run the sql for just that >>> > bo_id...it pulls correctly everytime. >>> >>> > The table only has 2967 records in it. All fields mentioned are >>> > TEXT except for the effdt...which is a date field. From gustav at cactus.dk Wed Jul 28 13:50:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Wed, 28 Jul 2004 20:50:32 +0200 Subject: [AccessD] Query giving different results each time In-Reply-To: References: Message-ID: <10139438289.20040728205032@cactus.dk> Hi Mark Don't you miss the initial record here? The first must be a Y record. And all numbers except the currently used must be represented an equal number of times. And you have four records for 22-Jan-04 but three Ns and only one Y and three phone numbers - something must be missing? > bo_id profile_cm_seq primary_ind effdt phone > 10 84562 Y 14-Jul-04 555/481-5549 > 10 2588 Y 22-Nov-03 555/363-2290 > 10 2588 N 22-Jan-04 555/363-2290 > 10 4444444 N 22-Nov-03 555/796-3360 > 10 4444444 N 22-Jan-04 555/796-3360 > 10 4444444 N 14-Jul-04 555/796-3360 > 10 65542 Y 22-Jan-04 555/363-4490 > 10 84562 N 22-Jan-04 555/781-5549 Rearranged: > bo_id profile_cm_seq primary_ind effdt phone > 10 4444444 N 22-Nov-03 555/796-3360 > 10 2588 Y 22-Nov-03 555/363-2290 > 10 2588 N 22-Jan-04 555/363-2290 > 10 65542 Y 22-Jan-04 555/363-4490 > 10 84562 N 22-Jan-04 555/781-5549 > 10 4444444 N 22-Jan-04 555/796-3360 > 10 4444444 N 14-Jul-04 555/796-3360 > 10 84562 Y 14-Jul-04 555/481-5549 /gustav From bheid at appdevgrp.com Wed Jul 28 13:56:39 2004 From: bheid at appdevgrp.com (Bobby Heid) Date: Wed, 28 Jul 2004 14:56:39 -0400 Subject: [AccessD] Weird query execution problem. In-Reply-To: <916187228923D311A6FE00A0CC3FAA3091B170@ADGSERVER> Message-ID: <916187228923D311A6FE00A0CC3FAA305BB6D9@ADGSERVER> Just to let you know, I had to make the query accept parameters so that it would only operate on a range or payroll records. I my initial testing, I broke the payroll ID filed into 4 ranges and ran it on each range. It works fine now. Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 11:13 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Weird query execution problem. Hi Jim, That did not work either. I think that I'll pass parameters to the queries so that I can process the data in chunks. Thanks for trying, Bobby -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Dettman Sent: Tuesday, July 27, 2004 10:18 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Weird query execution problem. Bobby, Open up the queries and set the UseTransaction property to no. See if that clears up the problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Bobby Heid Sent: Tuesday, July 27, 2004 8:34 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Weird query execution problem. Hi all, Me again with another problem. I have these three queries that normally run fine on most BEs that I throw at it. These databases have between 1500-50000 payroll records. I have a large database with 193000 payroll records. I am running the queries from code using db.execute "queryname",dbfailonerror. When processing the large database, Access appears to stop running. It runs up to the offending queries and stops. I show 0% cpu for access when this happens. I have let it go for over an hour before and still no go. So yesterday, I stopped the program right before the queries. I then went to the query list and double-clicked each of the three queries and they ran fine. Anyone have any ideas as to what may be going on? I am going to try running them in code using a querydef. Thanks, Bobby -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From andy at minstersystems.co.uk Wed Jul 28 14:00:12 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Wed, 28 Jul 2004 20:00:12 +0100 Subject: [AccessD] Dividing days into years and months In-Reply-To: <011d01c474bf$d60df130$6601a8c0@rock> Message-ID: <004e01c474d5$201c7b10$b274d0d5@minster33c3r25> I find the same. -- Andy Lacey http://www.minstersystems.co.uk > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Arthur Fuller > Sent: 28 July 2004 17:28 > To: 'Access Developers discussion and problem solving' > Subject: RE: [AccessD] Dividing days into years and months > > > While on this subject, I'd like to poll the readers for their > clients' typical definition of a month. In my case, all > clients interpret a month to mean "increment the month number > while preserving the day number; if the month is 12, go to 1 > and increase the year number". However, some of my clients > break this rule when the day in question is EoM(): in that > case they want to go to the next EoM(); i.e., the next date > following Feb 29, 2004 is March 31, 2004; and conversely, the > next date after Jan 31, 2004 is Feb 29, 2004. > > Any other non-logical variants? > > Arthur > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of > Scott Marcus > Sent: Wednesday, July 28, 2004 7:27 AM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Dividing days into years and months > > > Andy, > > The problem with DateDiff is that > DateDiff("yyyy",#12/31/2003#,#1/1/2004#) = 1, which is hardly 1 year. > > Years would be DateDiff("d",begindate,enddate)/365 > Months would be (DateDiff("d",begindate,enddate)/365)*12 > Weeks would be (DateDiff("d",begindate,enddate)/365)*52 or > DateDiff("d",begindate,enddate)/7 Days would be > DateDiff("d",begindate,enddate) > > Scott Marcus > TSS Technologies, Inc. > marcus at tsstech.com > (513) 772-7000 > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey > Sent: Wednesday, July 28, 2004 7:10 AM > To: Access Developers discussion and problem solving > Subject: Re: [AccessD] Dividing days into years and months > > Hi Paul > > I'm guessing here but it sounds like you're talking about the > number of years etc between two dates. If that's true then > check out the DateDiff function and DateAdd functions. What > you could do then is calc the DateDiff in years, use DateAdd > to add that number of years back onto your first date then > get the DateDiff between the new date and the original last > date in Months, then repeat to get the remaining number of days. > > If I've misinterpreted what you want I'm sorry. If I'm right > but you need more help let me/us know. > > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > > To: 'Access Developers discussion and problem solving' > > Subject: [AccessD] Dividing days into years and months > Date: 28/07/04 07:55 > > > > > Dear Experts > > > > I can divide in Access the days from a date() into years > with a simple > > > /365, but is there a way to have months and days ... so I > have years, > months > > and days, please? > > > > Cheers paul > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > > > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > -- > > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/a> ccessd > Website: > http://www.databaseadvisors.com > > From markamatte at hotmail.com Wed Jul 28 15:48:20 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Wed, 28 Jul 2004 20:48:20 +0000 Subject: [AccessD] Query giving different results each time Message-ID: A phone number does not always have to be created as a Primary...so there won't always be the same number of records for each number...if there are 3 numbers...and 2 of them toggle back and forth as the primary...with each toggle of the primary setting...the app will write a record for each of the numbers affected. This thing writes a record evertime the wind blows. I actually found a table that gets 6 records everytime a reminder is set...but 5 of them are blank 99.9% of the time. Thanks, for the feedback... Mark >From: Gustav Brock >Reply-To: Access Developers discussion and problem >solving >To: Access Developers discussion and problem >solving >Subject: Re: [AccessD] Query giving different results each time >Date: Wed, 28 Jul 2004 20:50:32 +0200 > >Hi Mark > >Don't you miss the initial record here? >The first must be a Y record. And all numbers except the currently >used must be represented an equal number of times. > >And you have four records for 22-Jan-04 but three Ns and only one Y >and three phone numbers - something must be missing? > > > bo_id profile_cm_seq primary_ind effdt phone > > 10 84562 Y 14-Jul-04 555/481-5549 > > 10 2588 Y 22-Nov-03 555/363-2290 > > 10 2588 N 22-Jan-04 555/363-2290 > > 10 4444444 N 22-Nov-03 555/796-3360 > > 10 4444444 N 22-Jan-04 555/796-3360 > > 10 4444444 N 14-Jul-04 555/796-3360 > > 10 65542 Y 22-Jan-04 555/363-4490 > > 10 84562 N 22-Jan-04 555/781-5549 > >Rearranged: > > > bo_id profile_cm_seq primary_ind effdt phone > > 10 4444444 N 22-Nov-03 555/796-3360 > > 10 2588 Y 22-Nov-03 555/363-2290 > > 10 2588 N 22-Jan-04 555/363-2290 > > 10 65542 Y 22-Jan-04 555/363-4490 > > 10 84562 N 22-Jan-04 555/781-5549 > > 10 4444444 N 22-Jan-04 555/796-3360 > > 10 4444444 N 14-Jul-04 555/796-3360 > > 10 84562 Y 14-Jul-04 555/481-5549 > >/gustav > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Don?t just search. Find. Check out the new MSN Search! http://search.msn.click-url.com/go/onm00200636ave/direct/01/ From Subscriptions at servicexp.com Wed Jul 28 17:05:43 2004 From: Subscriptions at servicexp.com (Robert Gracie) Date: Wed, 28 Jul 2004 18:05:43 -0400 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: <011e01c474bb$e7053100$2a3ca8c0@TEXASSYSTEMS.COM> Message-ID: Very Nice Ken!!! Robert Gracie -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Ken Ismert Sent: Wednesday, July 28, 2004 12:00 PM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Early and Late-Binding Redux After reading with interest the thread "More on early versus late binding", the questions posed by the various responders prompted me to do some research. This rather long post is the result. I have divided this post into two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM Binding. -Ken BINDING PERFORMANCE =================== Summary: Early binding is much faster than late, and is fastest under the most typical Access usage situations. A compelling benefit of early binding is the efficiency gained when coding. When testing object binding performance, don't use objects which are bound to queries. PERFORMANCE COMPARISON What is the real-world performance difference between late and early-binding? One test is measuring the maximum calls per second that can be sustained using each method. The hands-down winner: early-binding. It is roughly forty times faster for in-process calls, and about four times faster for out-of-process calls (1). For typical Access programs, the majority of objects are run in-process, especially Forms, DAO and ADO. Out-of-process objects are most often used in Access when automating external programs like Word or Excel. Another common scenario involves creating an object, calling it a few times, and closing it. If we create and destroy objects frequently, we need to look at object activation performance. Are late-bound objects more expensive to create than early-bound ones? For in-process activation, its a tie: both binding methods create objects in the same amount of time. For out-of-process activation, it turns out that late-binding is more efficient if you are making less than 10 calls to the object. But if you are going to make more than 10 calls, early-binding has the edge (2). PRACTICAL RULES OF THUMB So, early-binding almost always beats late-binding in terms of performance, but what does that mean to you? It depends on the level of object use in your code. As a rule, the more complex your program, and the more it relies on internal object interaction, the more it can benefit from early-binding. However, if you are automating an external program, particularly across different versions, late-binding is a viable option. As a professional, you have to take binding and performance considerations into account if you are going to deliver consistent value to your customers. The most critical performance consideration is, in my view, the human performance of quickly and accurately coding an application. Look at what you get with early-binding: Intellisense, compile-time checking, and events. The first two are invaluable for catching errors before they reach production, and the last is indispensable for writing efficient, clean code. It helps you write solid code faster, which is a compelling reason to use early-binding wherever it is warranted. USING QUERY PERFORMANCE TO JUDGE OBJECT BINDING EFFICIENCY CAN BE MISLEADING Recordset objects are poor candidates to judge object binding and activation efficiency. When the underlying query is loaded, it must establish a connection to the backend database (if the query involves linked tables), parse the SQL and compile the query. These initialization costs, even in the best cases, dwarf any object activation cost incurred. A much more representative test would be to time repetitive opening, use and closing of custom VB classes not tied to data objects. AN UNDER-THE-HOOD LOOK AT VB/COM BINDING ======================================== Summary: Understanding objects in Access really means understanding COM, because it is the object foundation for VB. In COM, all object binding is done to interfaces. The object declaration determines whether a specific (early-bound) or generic (late-bound) interface is used. The overhead of late-bound object calls explains the performance disadvantages of this technique. Early-bound calls use a much more efficient mechanism. References are primarily used when coding and compiling early-bound references, not at runtime. The details of object activation reveal more about the role of the Registry, and how objects behave at runtime. INTERFACE BINDING In VB, object references bind to interfaces. An interface defines how clients communicate with an object. It is composed of a fixed set of method signatures. Think of it as the property and method declarations, with no code, that a class supports. All VB classes have a default interface, which is simply the public properties and methods in the class. VB classes can also support one or more custom interfaces, which is an external interface that a class agrees to implement. When declaring an object reference, you can specify that VB bind the reference to a specific interface (default or custom), or no interface at all, in which case VB supplies a generic interface for you, and binds to it. LATE-BOUND REFERENCES Late-bound references are determined solely by how the object reference is declared (2): Dim obj As Object Dim obj As Variant Dim obj ' Variant implied No specific interface is declared, so the references are late-bound. In late-binding, the object's default interface is hidden from VB, and can only be accessed indirectly. To backtrack a little, all VB classes implement an interface called IDispatch, originally developed to support automation. Hidden from the VB programmer's view, IDispatch provides a generic, runtime way of executing properties and methods of the classes' default interface. All late-bound VB object references use the IDispatch interface. To execute a method: 1. VB first calls IDispatch.GetIDsOfNames with the method's name. GetIDsOfNames looks up the name in the object's default interface, and returns the dispatch ID, or DispID, of the method. 2. Next, IDispatch.Invoke is called with the method's DispID and the parameter list. 3. If the method name is found, and the parameter list matches up, the method is executed, and all is well. Otherwise, a runtime error occurs. In late-binding, this process is repeated every time the method is used. This overhead accounts for a significant fraction of overall call time, and explains a lot about the performance hit taken by late-binding. It is also worth noting that for scripting environments like IE or ASP, late-binding is the only binding technique available (2). EARLY-BOUND REFERENCES Early-bound references are again determined solely by the object declaration: Dim obj As Library.CClass ' Default interface Dim obj As Library.IInterface ' Custom interface Because an explicit interface is declared, these references are early-bound. This allows VB to use vTable binding, the fastest, most efficient form of binding. All VB objects, and most COM components, support vTable binding (another form of early binding, called DISPID binding, is also supported, but not discussed here). A vTable, or virtual function table, is a list of pointers to the methods the interface supports. It is loaded into memory when the object is first instantiated. To invoke a method, VB passes a pre-compiled offset to the object's vTable, which is then resolved to the actual address of the method. The overhead of a vTable-based call is little more than that of a DLL function call, and is a fraction of the time required for a late-bound call. Additionally, a vTable can be shared by multiple instances of the same object, which saves memory when dealing with collections of objects. BINDING EXCEPTIONS There are reference types in Access that exhibit both late and early-bound qualities: Dim ctl As Access.Control Dim frm As Access.Form These special case objects are inheritance objects. All controls inherit Control, and all forms inherit Form. Notice that Intellisense works for the common properties and methods for each type. But, you can also refer to properties and methods that are not members of Form, and it will compile without error. This lets you refer to specific controls on specific forms using a generic Form reference. So, Form and Control appear to be both early and late bound: default properties and methods are early-bound, while references to specific form or control properties are late-bound. This leveraging of inheritance allows great convenience in dealing with forms and controls. HOW VB USES PROJECT REFERENCES Project References provide essential support for object-oriented programming, but their role in the VB environment not well documented. References are used when coding, compiling, and making install packages. They do not play a direct role during runtime. You can make a Project Reference in one of three ways: selecting Tools, References in the VB editor, selecting Insert, Components in VB editor, and selecting Insert, ActiveX Control in Form Design. References provide needed object information for a VB project. The first is the Class ID, or CLSID -- a unique GUID identifier for the class (11). This is one of the registry keys that facilitates retrieval of an object's type library, its server file (DLL, EXE, OCX), and other information. The second is the Type Library, which holds the definition of the interfaces supported by the object (1). Type Libraries drive IntelliSense and provide the necessary information to compile code using early bound object references. While coding, the aforementioned IntelliSense is the chief benefit of References. These same type libraries can also be viewed using the often underutilized Object Browser -- hitting F2 allows you to browse the type libraries for each Reference you have made. Note that there is also a type library for your VBA project, as well. During compilation, References are used in several ways: 1. All early-bound object references are resolved to their CLSIDs (11), and the type library is used to perform syntax checking of all property and method calls. 2. Once checked, the type library is again used to resolve the vTable offsets for all called properties and methods. In this way, the object type is specified, the method calls are verified against the specified interface, and the most efficient binding is setup, all before runtime. Since VBA is interpreted, this often happens just-in-time, but the conceptual workings are identical to its compiled sibling. RUNTIME OBJECT ACTIVATION Lastly, we will touch on COM object activation to get a feel for how objects get created at runtime. The information for the particulars of the class, (it's server file name and location, associated type libraries, etc) are stored in the Registry, and keyed by the CLSID. The server (a DLL, EXE, or OCX file) for a class contains not only the code to perform the methods, but also contains a class factory object, which houses the code used by the COM runtime to instantiate objects in that class. Runtime object creation, early-bound, typically goes like this (1): 1. Client requests a new instance of COM object 2. The COM runtime looks up the associated server DLL from the Registry using the object's CLSID, and loads it into memory. 3. The COM runtime then retrieves the requested class from the DLL. What it gets back is a reference to the Class Factory object, which uses the IClassFactory interface. Next, it calls the CreateInstance method to create the actual object instance in memory. 4. Finally, the COM runtime gets the requested interface from the object, and returns a reference to it back to the client. Its work done, the COM runtime drops out of the picture, and client and object communicate directly. So this quick look at COM activation demonstrates the role of the Registry and CLSIDs in locating and creating objects. Even for late-bound instantiation, the registry is used, but when the CLSID isn't known, the ProgID, or fully qualified class name, is used instead (11). References ========== I've covered a lot of ground quickly in this post. These resources are for the reader interested in finding out more: 1. Introduction to COM http://arcobjectsonline.esri.com/ArcObjectsOnline/GettingStarted/IntroToCOM. htm 2. Effective Visual Basic: How to Improve Your VB/COM+ Applications, Addison-Wesley 3. KB 245115 -- INFO: Using Early Binding and Late Binding in Automation http://support.microsoft.com/default.aspx?scid=kb;EN-US;q245115 4. KB 138138 -- INFO: Late, ID, Early Binding Types Possible in VB for Apps http://support.microsoft.com/default.aspx?scid=kb;EN-US;138138 5. How Visual Basic COM+ Objects Work Internally http://www.windowsdevcenter.com/pub/a/oreilly/windows/news/mojica_1000.html 6. An Under-the-Covers Look at OLE http://www.avdf.com/aug96/art_ole.html 7. Creating a Reference to an Object http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconassigningreferencetoactivexcomponentobject.asp 8. How Binding Affects ActiveX Component Performance http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconhowbindingaffectsolecomponentperformance.asp 9. Speeding Object References http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/htm l/vbconspeedingobjectreferences.asp 10. KB 247579 -- INFO: Use DISPID Binding to Automate Office Applications Whenever Possible http://support.microsoft.com/default.aspx?scid=kb;EN-US;247579 11. CCRP Versioning Policy: New ProgIDs Used for Visual Basic Version Builds http://ccrp.mvps.org/index.html?support/faqs/progid.htm -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Wed Jul 28 18:32:42 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Wed, 28 Jul 2004 19:32:42 -0400 Subject: [AccessD] Conversion Toolkit Message-ID: <20040728233240.OBNG1756.imf24aec.mail.bellsouth.net@SUSANONE> http://www.microsoft.com/downloads/details.aspx?familyid=2e861e76-5d89-450a- b977-980a9841111e &displaylang=en From HollisVJ at pgdp.usec.com Thu Jul 29 06:47:38 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Thu, 29 Jul 2004 06:47:38 -0500 Subject: [AccessD] Create a Search Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89B9@cntexchange.pgdp.usec.com> Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia From ssharkins at bellsouth.net Thu Jul 29 07:37:58 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 08:37:58 -0400 Subject: [AccessD] Create a Search In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89B9@cntexchange.pgdp.usec.com> Message-ID: <20040729123756.OOPO1721.imf16aec.mail.bellsouth.net@SUSANONE> Virginia, in truth this in an ambitious project. Do they want to search any field or can you restrict that much? Susan H. Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. From JHewson at karta.com Thu Jul 29 07:58:03 2004 From: JHewson at karta.com (Jim Hewson) Date: Thu, 29 Jul 2004 07:58:03 -0500 Subject: [AccessD] Create a Search Message-ID: <9C382E065F54AE48BC3AA7925DCBB01C0103E0F1@karta-exc-int.Karta.com> Virginia, I've done something similar in a database recording visit information for a healthcare ministry. There are over 70 geographic locations interfacing the database via the web. Data is recorded for individual visits as well as for events where multiple people are seen, such as a health fair. An Access front end of the database is used by the main office. There are three major report forms requesting information about visits, events, and a composite report. The most complex is the visit summary report form. This form has several criteria to choose from: the client data (gender, income status, literacy, marital status, employment, age, education level, ethnic group, and language), the place of service (office, home, telephone, etc.), nurse, region, team, location, whether contact was the first visit or a follow-up, and even down to the individual person. It also has the capability to choose the inclusive dates of the report (Thanks Drew, I use his calendar for the report form). I also have a memo field to add comments to the report (the client usually has at least a page or two of comments). On the form there is a text box that gives a continuous count of the number of records, so the user always knows how many records will be used in the report. The user also has the ability to export the data into an Excel spreadsheet. And finally, the user can save the criteria for the report (including comments) to regenerate the report at will. I placed a combo box on the report form to "fill in" the criteria for any given report when selected. In another database we use for resumes, the search form has three text fields that are used to search the text of a memo field. All this to say: the key to what you want to do is the criteria of the query. Criteria for date fields: between forms!frmSearch.datefield1 and forms!frmSearch.datefield2 Buttons to fill in the date fields for last quarter, last month, last week, yesterday, or today can be done. For those text fields they want to type in, I would recommend a list box or combo box. In the query, treat each field's search criteria separately. Ensure the nulls or zero length strings are captured and treated like a "*" in the criteria. Good luck. Jim -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Hollis,Virginia Sent: Thursday, July 29, 2004 6:48 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Create a Search Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Stephen.Pickering at caremark.com Thu Jul 29 08:09:33 2004 From: Stephen.Pickering at caremark.com (Pickering, Stephen) Date: Thu, 29 Jul 2004 08:09:33 -0500 Subject: [AccessD] Create a Search Message-ID: <35C4AC5A5AFD9642833200159C2581560A6A06@s98026.psd.caremark.int> Virginia, Have a look at Duane Hookom's DH Query by Form sample database. It can be found at (watch for wrapping): http://www.rogersaccesslibrary.com/OtherLibraries.asp Click on Duane Hookom's name (or scroll down) and click on the link for "DH Query By Form". It sounds like it might serve your needs. HTH, Steve -----Virginia Hollis' Original Message----- Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia From dwaters at usinternet.com Thu Jul 29 08:20:06 2004 From: dwaters at usinternet.com (Dan Waters) Date: Thu, 29 Jul 2004 08:20:06 -0500 Subject: [AccessD] Create a Search In-Reply-To: <32551579.1091102269911.JavaMail.root@sniper3.usinternet.com> Message-ID: <000d01c4756e$c3ec1d60$de1811d8@danwaters> Ken - I do exactly this with each business process and it works well. Contact me off-line and I can send you an example. Dan Waters ProMation Systems -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Hollis,Virginia Sent: Thursday, July 29, 2004 6:48 AM To: 'accessD at databaseadvisors.com' Subject: [AccessD] Create a Search Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. Some of the fields will be text where they can enter what they need and other criteria will be from a combobox, they also want a date range field. Then! they want to be able to save the criteria for later use. For example - Document number - text box, Document type will be a combobox. I want to know all the documents created during a certain month, quarter, year, etc.). I have tried something like this several times, but when it comes to having more than one search criteria, I can never seem to make it work - then adding a date on top of that - well, I am lost. Thanks, Virginia -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Thu Jul 29 08:45:10 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Thu, 29 Jul 2004 14:45:10 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Many thanks, Stuart, that looks excellent. -----Original Message----- From: Stuart McLachlan [mailto:stuart at lexacorp.com.pg] Sent: Wednesday, July 28, 2004 12:54 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months On 28 Jul 2004 at 8:52, Paul Rodgers wrote: > Dear Experts > > I can divide in Access the days from a date() into years with a simple > /365, No you can't because Leap Years don't have 365 days :-( > but is there a way to have months and days ... so I have years, months > and days, please? > First, you need to determine what answers you want. Take 28 Feb 03 to 1 Apr 03 as an example: Is that 1 month and 1 day (end of Feb to end of Mar + 1 day) or 1 month and 4 days (28 Feb to 28 Mar + 4 days) You will need to develop functions based on which interpretation you want. Here's one I've just knocked up that will return the second answer. I'll leave it to you to work out a method if you want the first answer. BTW, I've just copyrighted the word monthiversary :-) Function YMDDiff(Date1 As Date, Date2 As Date) As String Dim years As Long Dim months As Long Dim days As Long Dim monthiversary As Date months = DateDiff("m", Date1, Date2) years = Int(months / 12) monthiversary = DateAdd("m", months, Date1) If Date2 - monthiversary < 0 Then months = months - 1 days = Date2 - DateAdd("m", -1, monthiversary) Else days = Date2 - monthiversary End If months = months - (years * 12) YMDDiff = years & " years, " & months & " months" & " and " & days & " days" End Function -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Paul.Rogers at SummitMedia.co.uk Thu Jul 29 08:47:08 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Thu, 29 Jul 2004 14:47:08 +0100 Subject: [AccessD] Dividing days into years and months Message-ID: Thanks, Douglas, appreciated very much. -----Original Message----- From: Gustav Brock [mailto:gustav at cactus.dk] Sent: Wednesday, July 28, 2004 2:30 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Dividing days into years and months Hi Douglas > Function Age(Date1 As Date, Date2 As Date) As String > Dim Y As Integer > Dim M As Integer > Dim D As Integer > Dim Temp1 As Date > Temp1 = DateSerial(Year(Date2), Month(Date1), Day(Date1)) > Y = Year(Date2) - Year(Date1) + (Temp1 > Date2) > M = Month(Date2) - Month(Date1) - (12 * (Temp1 > Date2)) > D = Day(Date2) - Day(Date1) > If D < 0 Then > M = M - 1 > D = Day(DateSerial(Year(date2), Month(date2), 0)) + D > End If > Age = Y & " years " & M & " months " & D & " days" > End Function Just for the records - this Age() as well as quite a few other Age-functions will fail for those born on 29. Feb. Look up in the archive "Age Calc - How much have I forgotten" to see a reliable method. /gustav -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From markamatte at hotmail.com Thu Jul 29 08:48:01 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 29 Jul 2004 13:48:01 +0000 Subject: [AccessD] Import File From UNIX box Message-ID: Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN Money. http://special.msn.com/money/0407debt.armx From lytlenj at yahoo.com Thu Jul 29 08:51:25 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 06:51:25 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Is there any way to lock only the controls in the Detail section of a form. The page header section has my filtering and navigation, and other standard buttons. All the data entry is done in the detail section. I would like to be able to open the form in two ways, one where the users can edit or add to the form data, another where they can search using the controls in the form header but they can't edit or add to the data in the detail section of the form, which also contains a subform. I have tried the following called in the Current event of the form (I also tried it in several other events and it didn't do any better): blnDisable is set in the OnClick event buttons used to open the form (from another form) for Data Entry or Open for Search only. Public blnDisable As Boolean ' in declaration section of a module Public Function fcnCheckDisable() If blnDisable = True Then Me.Section(acDetail).Locked = True Else Me.Section(acDetail).Locked = False End If End Function Any ideas appreciated, Thanks, Nancy Lytle From ssharkins at bellsouth.net Thu Jul 29 09:02:16 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 10:02:16 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Message-ID: <20040729140214.DMOC8009.imf17aec.mail.bellsouth.net@SUSANONE> Nancy, there may be a Detail event that you could use, but I don't think so. Have you considered renaming the controls? For instance, all the controls in the detail section might include a prefix or suffix "dtl" or something similar. That way you could loop through the entire form's collection and stop only when it finds the appropriate prefix or suffix. Susan H. Is there any way to lock only the controls in the Detail section of a form. From markamatte at hotmail.com Thu Jul 29 09:34:16 2004 From: markamatte at hotmail.com (Mark A Matte) Date: Thu, 29 Jul 2004 14:34:16 +0000 Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: Nancy, This is a sample of how you might accomplish this...you would call this function after the form opens depending on a value you set when calling the form. You will have to add an if statement to exclude any command buttons...or items in the detail section that do not have the 'locked' property. Thanks, Mark A. Matte Sub TextBoxProperties(frm As Form) On Error GoTo Skip Dim ctl As Control ' Enumerate Controls collection. For Each ctl In frm.Controls Dim test Dim name name = ctl.ControlName test = ctl.Section With ctl 'Default = .DefaultValue If test = 0 Then ctl.Locked = True Else End If Skip: End With 'End If Next ctl End Sub >From: "Susan Harkins" >Reply-To: Access Developers discussion and problem >solving >To: "'Access Developers discussion and problem >solving'" >Subject: RE: [AccessD] Lock/Disable controls in the Detail section of a >form >Date: Thu, 29 Jul 2004 10:02:16 -0400 > >Nancy, there may be a Detail event that you could use, but I don't think >so. >Have you considered renaming the controls? For instance, all the controls >in >the detail section might include a prefix or suffix "dtl" or something >similar. That way you could loop through the entire form's collection and >stop only when it finds the appropriate prefix or suffix. > >Susan H. > >Is there any way to lock only the controls in the Detail section of a form. > > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com _________________________________________________________________ Discover the best of the best at MSN Luxury Living. http://lexus.msn.com/ From CMackin at Quiznos.com Thu Jul 29 09:44:13 2004 From: CMackin at Quiznos.com (Mackin, Christopher) Date: Thu, 29 Jul 2004 08:44:13 -0600 Subject: [AccessD] Lock/Disable controls in the Detail section of a form Message-ID: You can iterate through the controls in the detail using the Controls collection of the Detail section: For Each ctl in Me.Detail.Controls ctl.Locked = blnLock Next ctl -Chris Mackin -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Susan Harkins Sent: Thursday, July 29, 2004 8:02 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Lock/Disable controls in the Detail section of a form Nancy, there may be a Detail event that you could use, but I don't think so. Have you considered renaming the controls? For instance, all the controls in the detail section might include a prefix or suffix "dtl" or something similar. That way you could loop through the entire form's collection and stop only when it finds the appropriate prefix or suffix. Susan H. Is there any way to lock only the controls in the Detail section of a form. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Thu Jul 29 09:44:47 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Thu, 29 Jul 2004 10:44:47 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: <20040729135125.85346.qmail@web53909.mail.yahoo.com> Message-ID: Nancy, <> Sure. Function StdLockForm(frm As Form, intState As Integer) 'Lock/unlock all the fields in the detail section of the form that are enabled. Dim intL As Integer 'Generic loop counter Dim intCount As Integer 'Number of controls on the form intCount = frm.Count 'Find out how many controls are on the form On Error Resume Next For intL = 0 To intCount - 1 'Step thru all controls on the form If (frm(intL).Section = False) Then 'Don't do any control execpt those in the detail section If (frm(intL).Enabled = True) Then frm(intL).Locked = intState 'Set 'Locked' property to proper state End If Next intL On Error GoTo 0 End Function Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Nancy Lytle Sent: Thursday, July 29, 2004 9:51 AM To: AccessD at databaseadvisors.com Subject: [AccessD] Lock/Disable controls in the Detail section of a form Is there any way to lock only the controls in the Detail section of a form. The page header section has my filtering and navigation, and other standard buttons. All the data entry is done in the detail section. I would like to be able to open the form in two ways, one where the users can edit or add to the form data, another where they can search using the controls in the form header but they can't edit or add to the data in the detail section of the form, which also contains a subform. I have tried the following called in the Current event of the form (I also tried it in several other events and it didn't do any better): blnDisable is set in the OnClick event buttons used to open the form (from another form) for Data Entry or Open for Search only. Public blnDisable As Boolean ' in declaration section of a module Public Function fcnCheckDisable() If blnDisable = True Then Me.Section(acDetail).Locked = True Else Me.Section(acDetail).Locked = False End If End Function Any ideas appreciated, Thanks, Nancy Lytle -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From ssharkins at bellsouth.net Thu Jul 29 09:51:11 2004 From: ssharkins at bellsouth.net (Susan Harkins) Date: Thu, 29 Jul 2004 10:51:11 -0400 Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729145110.HRBS1789.imf25aec.mail.bellsouth.net@SUSANONE> Oh cool... I like that. :) Susan H. You can iterate through the controls in the detail using the Controls collection of the Detail section: For Each ctl in Me.Detail.Controls ctl.Locked = blnLock Next ctl From GregSmith at starband.net Thu Jul 29 09:54:22 2004 From: GregSmith at starband.net (Greg Smith) Date: Thu, 29 Jul 2004 09:54:22 -0500 (CDT) Subject: [AccessD] Programmatically Lockout Right Mouse Click? In-Reply-To: References: Message-ID: <1757.216.43.21.235.1091112862.squirrel@cetus.email.starband.net> Hi Everyone! I'm still dinking around with menus and trying to keep prying eyes and mouse clicks out of the menubars. Thanks to Doris and others I've gotten the programming to get the right toolbar or menubar to show at the right time. The commandbar(s) command was the trick. Although the changeproperty would have been nice except that it only took effect on the NEXT opening of the app, so it was fairly useless programmatically. I'm looking for some way to disable the customize function or to disable the right mouse click on the Menubars/Toolbars. I don't want them selecting alternate toolbars or menubars, or customizing anything. I can disable the right mouse button on the form, but that has no effect on the menubars at the top. I need to be able to do this programmatically as well. If the users login, I don't want them having access to any of the menus except what I program to them, however, if I login, I need everything turned back on. Suggestions? Comments? Am I full of it trying to do this? Is there an easier way? This is a secure database, but that shouldn't change what I'm trying to do. It's currently written in Access97. Thanks in advance! Greg Smith gregsmith at starband.net From DWUTKA at marlow.com Thu Jul 29 10:39:44 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 10:39:44 -0500 Subject: [AccessD] Import File From UNIX box Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E0@main2.marlow.com> You'll need to find out what character it actually is, but then something like this would work: Dim f as Long Dim strTemp as string f=FreeFile Open "C:\Import.txt" for binary access read as f strTemp=Space(LOF(f)) Get f,,strTemp close f Kill "C:\Import.txt" f=FreeFile strTemp=Replace(strTemp,chr(13),vbCrLf) Open "C:\Import.txt" for Binary Access Write as f put f,,strTemp close f fourth from the last line has chr(13). You may need to replace that with either 8 or 9. (Haven't finished my first cup of coffee...I do know that between 8,9, and 13 you have CR, LF, and Tab. Just not awake enough to remember which is which (I know 13 isn't tab though......I think 8 is.) Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mark A Matte Sent: Thursday, July 29, 2004 8:48 AM To: accessd at databaseadvisors.com Subject: [AccessD] Import File From UNIX box Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 29 10:46:15 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 10:46:15 -0500 Subject: [AccessD] Programmatically Lockout Right Mouse Click? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E1@main2.marlow.com> Move the menus to a form. (well, create a form to perform the menu functions). Then hide the Access window. You can set an AutoKeys macro to unhide access, if an Admin account is logged in. Only real issue with hiding the Access window, is that reports won't display on the desktop, only forms, so if you need to preview a report, you have to unhide Access, and then hide it when the report closes again. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Greg Smith Sent: Thursday, July 29, 2004 9:54 AM To: accessd at databaseadvisors.com Subject: [AccessD] Programmatically Lockout Right Mouse Click? Hi Everyone! I'm still dinking around with menus and trying to keep prying eyes and mouse clicks out of the menubars. Thanks to Doris and others I've gotten the programming to get the right toolbar or menubar to show at the right time. The commandbar(s) command was the trick. Although the changeproperty would have been nice except that it only took effect on the NEXT opening of the app, so it was fairly useless programmatically. I'm looking for some way to disable the customize function or to disable the right mouse click on the Menubars/Toolbars. I don't want them selecting alternate toolbars or menubars, or customizing anything. I can disable the right mouse button on the form, but that has no effect on the menubars at the top. I need to be able to do this programmatically as well. If the users login, I don't want them having access to any of the menus except what I program to them, however, if I login, I need everything turned back on. Suggestions? Comments? Am I full of it trying to do this? Is there an easier way? This is a secure database, but that shouldn't change what I'm trying to do. It's currently written in Access97. Thanks in advance! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From lytlenj at yahoo.com Thu Jul 29 10:49:12 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 08:49:12 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729154912.62077.qmail@web53907.mail.yahoo.com> Thanks Jim, and Susan and Mark and Christopher, For now I am using: Dim ctl As Control On Error Resume Next 'This is the key I was 'missing For Each ctl In Me.Section("Detail").Controls ctl.Enabled = Not ctl.Enabled Next ctl This works well except for the fact that the subform I have has a tab control which also gets locked, but i'm sure that will be easy enough to exclude. But I really like what Jim did, and it is certainly more flexible, so I may try working it into my apps. Again, thanks everyone, you guys are the best, not to mention the meer speed of the replies. Nancy --- Jim Dettman wrote: > Nancy, > > < Detail section of a form.>> > > Sure. > > Function StdLockForm(frm As Form, intState As > Integer) > > 'Lock/unlock all the fields in the detail section > of the form that are > enabled. > > Dim intL As Integer 'Generic loop > counter > Dim intCount As Integer 'Number of > controls on the form > > intCount = frm.Count 'Find out how > many controls are on the > form > > On Error Resume Next > For intL = 0 To intCount - 1 'Step thru all > controls on the form > If (frm(intL).Section = False) Then 'Don't do > any control execpt those > in the detail section > If (frm(intL).Enabled = True) Then > frm(intL).Locked = intState > 'Set 'Locked' property to proper state > End If > Next intL > On Error GoTo 0 > > End Function > > Jim Dettman > (315) 699-3443 > jimdettman at earthlink.net > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On > Behalf Of Nancy Lytle > Sent: Thursday, July 29, 2004 9:51 AM > To: AccessD at databaseadvisors.com > Subject: [AccessD] Lock/Disable controls in the > Detail section of a form > > > Is there any way to lock only the controls in the > Detail section of a form. > > The page header section has my filtering and > navigation, and other standard buttons. All the > data > entry is done in the detail section. > I would like to be able to open the form in two > ways, > one where the users can edit or add to the form > data, > another where they can search using the controls in > the form header but they can't edit or add to the > data > in the detail section of the form, which also > contains > a subform. > > I have tried the following called in the Current > event > of the form (I also tried it in several other events > and it didn't do any better): > > blnDisable is set in the OnClick event buttons used > to > open the form (from another form) for Data Entry or > Open for Search only. > > Public blnDisable As Boolean ' in declaration > section > of a module > > Public Function fcnCheckDisable() > If blnDisable = True Then > Me.Section(acDetail).Locked = True > Else > Me.Section(acDetail).Locked = False > End If > > End Function > > Any ideas appreciated, > Thanks, > Nancy Lytle > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From lytlenj at yahoo.com Thu Jul 29 10:50:33 2004 From: lytlenj at yahoo.com (Nancy Lytle) Date: Thu, 29 Jul 2004 08:50:33 -0700 (PDT) Subject: [AccessD] Lock/Disable controls in the Detail section of a form In-Reply-To: Message-ID: <20040729155033.98997.qmail@web53910.mail.yahoo.com> Thanks Mark, that looks great. Nancy --- Mark A Matte wrote: > Nancy, > > This is a sample of how you might accomplish > this...you would call this > function after the form opens depending on a value > you set when calling the > form. You will have to add an if statement to > exclude any command > buttons...or items in the detail section that do not > have the 'locked' > property. > Thanks, > > Mark A. Matte > > Sub TextBoxProperties(frm As Form) > On Error GoTo Skip > Dim ctl As Control > ' Enumerate Controls collection. > For Each ctl In frm.Controls > Dim test > Dim name > name = ctl.ControlName > test = ctl.Section > With ctl > 'Default = .DefaultValue > If test = 0 Then > ctl.Locked = True > Else > End If > > Skip: > End With > 'End If > Next ctl > End Sub > > > >From: "Susan Harkins" > >Reply-To: Access Developers discussion and problem > >solving > >To: "'Access Developers discussion and problem > >solving'" > >Subject: RE: [AccessD] Lock/Disable controls in the > Detail section of a > >form > >Date: Thu, 29 Jul 2004 10:02:16 -0400 > > > >Nancy, there may be a Detail event that you could > use, but I don't think > >so. > >Have you considered renaming the controls? For > instance, all the controls > >in > >the detail section might include a prefix or suffix > "dtl" or something > >similar. That way you could loop through the entire > form's collection and > >stop only when it finds the appropriate prefix or > suffix. > > > >Susan H. > > > >Is there any way to lock only the controls in the > Detail section of a form. > > > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > _________________________________________________________________ > Discover the best of the best at MSN Luxury Living. > http://lexus.msn.com/ > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > From KIsmert at TexasSystems.com Thu Jul 29 10:59:10 2004 From: KIsmert at TexasSystems.com (Ken Ismert) Date: Thu, 29 Jul 2004 10:59:10 -0500 Subject: [AccessD] Early and Late-Binding Redux In-Reply-To: Message-ID: <000b01c47584$fcea4180$2a3ca8c0@TEXASSYSTEMS.COM> Gustav, John, Jim, Jim: Thanks. Any and all feedback (including criticism and potential errors) is appreciated. -Ken > After reading with interest the thread "More on early versus late binding", > the questions posed by the various responders prompted me to do some > research. This rather long post is the result. I have divided this post into > two main sections: Binding Performance, and an Under-The-Hood Look at VB/COM > Binding. > > -Ken From pharold at proftesting.com Thu Jul 29 10:25:15 2004 From: pharold at proftesting.com (Perry Harold) Date: Thu, 29 Jul 2004 11:25:15 -0400 Subject: [AccessD] Import File From UNIX box In-Reply-To: Message-ID: <000001c47580$3fc7f830$082da8c0@D58BT131> Mark I had a file that came from a mainframe and I did an exec call to Wordpad, made an edit and then closed and saved the file in Windows Text format. The resultant .txt file was then in Windows format so it could be imported. I used VB but I think VBA also allows the same. Perry Harold -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Mark A Matte Sent: Thursday, July 29, 2004 9:48 AM To: accessd at databaseadvisors.com Subject: [AccessD] Import File From UNIX box Hello All, I have an A97 db that imports a text file. The text file was on a Windows box...but now is generated and sent to a UNIX box. The UNIX version of this text file has a CR or LF character after each record...and access sees this as the end of the file. Any suggestions in using vba to convert this file(or those characters) back to a Windows format/ Thanks, Mark A. Matte _________________________________________________________________ Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN Money. http://special.msn.com/money/0407debt.armx -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 12:50:43 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 10:50:43 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB14F@main2.marlow.com> Message-ID: I'm just not getting it. Writing SQL statements is not coming to me, so explain this in what I type into the grid view. Table name - tblCemeteries4Updating Field name - Surname Field name - MarrName In the update query grid, I have Field MarrName Surname Table tblCemeteries4Updating tblCemeteries4Updating Update To What do I type into Update To grid in order to copy the contents of MarrName field into the Surname field? (I don't want to change the Surname field to MarrName, as I need both - after doing this copy, I have to manually go through and del the contents of MarrName from all the males, and add the correct MarrName to all the females, as all the existing contents are "maiden names"} -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) From DWUTKA at marlow.com Thu Jul 29 13:23:12 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 13:23:12 -0500 Subject: [AccessD] Update query copy one field to another Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1E9@main2.marlow.com> Get rid of the MarrName field, and put [MarrName] in the Update To field under Surname. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Thursday, July 29, 2004 12:51 PM To: Access Developers discussion and problem solving Subject: [AccessD] Update query copy one field to another I'm just not getting it. Writing SQL statements is not coming to me, so explain this in what I type into the grid view. Table name - tblCemeteries4Updating Field name - Surname Field name - MarrName In the update query grid, I have Field MarrName Surname Table tblCemeteries4Updating tblCemeteries4Updating Update To What do I type into Update To grid in order to copy the contents of MarrName field into the Surname field? (I don't want to change the Surname field to MarrName, as I need both - after doing this copy, I have to manually go through and del the contents of MarrName from all the males, and add the correct MarrName to all the females, as all the existing contents are "maiden names"} -- Kathryn Bassett (at work address) kathrynatgwens at socal.rr.com kathryn at bassett.net (home) -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 13:37:02 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 11:37:02 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1E9@main2.marlow.com> Message-ID: Thanks - I had it backwards - just wasn't getting it. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 11:23 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > under Surname. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 12:51 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Update query copy one field to another > > > I'm just not getting it. Writing SQL statements is not coming to me, so > explain this in what I type into the grid view. > > Table name - tblCemeteries4Updating > Field name - Surname > Field name - MarrName > > In the update query grid, I have > > Field MarrName Surname > Table tblCemeteries4Updating tblCemeteries4Updating > Update To > > What do I type into Update To grid in order to copy the contents > of MarrName > field into the Surname field? > > (I don't want to change the Surname field to MarrName, as I need both - > after doing this copy, I have to manually go through and del the > contents of > MarrName from all the males, and add the correct MarrName to all the > females, as all the existing contents are "maiden names"} > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Thu Jul 29 14:07:42 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Thu, 29 Jul 2004 14:07:42 -0500 Subject: [AccessD] Update query copy one field to another Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1EA@main2.marlow.com> It is probably easier to just think in SQL terms. UPDATE tblMyTable SET SomeField=1, SomeOtherField=5*[SomeOtherField], SomeTextField=UCase([SomeTextField]), ThisField=ThatField WHERE ADateField>#2-13-04# If you look at the segments of the SQL, you have the actual command UPDATE. After update, you need to let it know what it's updating, which is tblMyTable. Then you need to let it know what you want to update within that table, so you have SET. Everything after SET are comma delimited Fields and their new values. So in the example above, we are setting 'SomeField' to 1, SomeOtherField to 5x it's value, 'SomeTextField' to All caps, and ThisField is being set to the value in ThatField. We also have a WHERE clause, which tells Jet to only perform this update on records that have an ADateField date after the 13th of February of this year. Now, if you look at the SQL that Access produces, it will be the same, but it will be cluttered with brackets, parentheses and full table references. That isn't bad, in fact it may even run just a hair faster (since everything is fully named), but it's a nightmare to try and actually see the basics being used. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens Sent: Thursday, July 29, 2004 1:37 PM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Update query copy one field to another Thanks - I had it backwards - just wasn't getting it. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 11:23 AM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > under Surname. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 12:51 PM > To: Access Developers discussion and problem solving > Subject: [AccessD] Update query copy one field to another > > > I'm just not getting it. Writing SQL statements is not coming to me, so > explain this in what I type into the grid view. > > Table name - tblCemeteries4Updating > Field name - Surname > Field name - MarrName > > In the update query grid, I have > > Field MarrName Surname > Table tblCemeteries4Updating tblCemeteries4Updating > Update To > > What do I type into Update To grid in order to copy the contents > of MarrName > field into the Surname field? > > (I don't want to change the Surname field to MarrName, as I need both - > after doing this copy, I have to manually go through and del the > contents of > MarrName from all the males, and add the correct MarrName to all the > females, as all the existing contents are "maiden names"} > > -- > Kathryn Bassett (at work address) > kathrynatgwens at socal.rr.com > kathryn at bassett.net (home) > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From kathrynatgwens at socal.rr.com Thu Jul 29 15:06:12 2004 From: kathrynatgwens at socal.rr.com (KathrynAtGwens) Date: Thu, 29 Jul 2004 13:06:12 -0700 Subject: [AccessD] Update query copy one field to another In-Reply-To: <2F8793082E00D4119A1700B0D0216BF8031BB1EA@main2.marlow.com> Message-ID: Drew, just making sure you got my off list message and that it didn't get caught in a spam filter. Kathryn > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > DWUTKA at marlow.com > Sent: Thursday, July 29, 2004 12:08 PM > To: accessd at databaseadvisors.com > Subject: RE: [AccessD] Update query copy one field to another > > > It is probably easier to just think in SQL terms. > > UPDATE tblMyTable SET SomeField=1, SomeOtherField=5*[SomeOtherField], > SomeTextField=UCase([SomeTextField]), ThisField=ThatField WHERE > ADateField>#2-13-04# > > If you look at the segments of the SQL, you have the actual > command UPDATE. > After update, you need to let it know what it's updating, which is > tblMyTable. Then you need to let it know what you want to update within > that table, so you have SET. Everything after SET are comma delimited > Fields and their new values. So in the example above, we are setting > 'SomeField' to 1, SomeOtherField to 5x it's value, 'SomeTextField' to All > caps, and ThisField is being set to the value in ThatField. We > also have a > WHERE clause, which tells Jet to only perform this update on records that > have an ADateField date after the 13th of February of this year. > > Now, if you look at the SQL that Access produces, it will be the same, but > it will be cluttered with brackets, parentheses and full table references. > That isn't bad, in fact it may even run just a hair faster (since > everything > is fully named), but it's a nightmare to try and actually see the basics > being used. > > Drew > > -----Original Message----- > From: accessd-bounces at databaseadvisors.com > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > Sent: Thursday, July 29, 2004 1:37 PM > To: Access Developers discussion and problem solving > Subject: RE: [AccessD] Update query copy one field to another > > > Thanks - I had it backwards - just wasn't getting it. > > Kathryn > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of > > DWUTKA at marlow.com > > Sent: Thursday, July 29, 2004 11:23 AM > > To: accessd at databaseadvisors.com > > Subject: RE: [AccessD] Update query copy one field to another > > > > > > Get rid of the MarrName field, and put [MarrName] in the Update To field > > under Surname. > > > > Drew > > > > -----Original Message----- > > From: accessd-bounces at databaseadvisors.com > > [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of KathrynAtGwens > > Sent: Thursday, July 29, 2004 12:51 PM > > To: Access Developers discussion and problem solving > > Subject: [AccessD] Update query copy one field to another > > > > > > I'm just not getting it. Writing SQL statements is not coming to me, so > > explain this in what I type into the grid view. > > > > Table name - tblCemeteries4Updating > > Field name - Surname > > Field name - MarrName > > > > In the update query grid, I have > > > > Field MarrName Surname > > Table tblCemeteries4Updating tblCemeteries4Updating > > Update To > > > > What do I type into Update To grid in order to copy the contents > > of MarrName > > field into the Surname field? > > > > (I don't want to change the Surname field to MarrName, as I need both - > > after doing this copy, I have to manually go through and del the > > contents of > > MarrName from all the males, and add the correct MarrName to all the > > females, as all the existing contents are "maiden names"} > > > > -- > > Kathryn Bassett (at work address) > > kathrynatgwens at socal.rr.com > > kathryn at bassett.net (home) > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com From mkahelin at gorskibulk.com Thu Jul 29 15:16:18 2004 From: mkahelin at gorskibulk.com (mkahelin at gorskibulk.com) Date: Thu, 29 Jul 2004 16:16:18 -0400 Subject: Autoreply: RE: [AccessD] Update query copy one field to another Message-ID: I will be out of the office starting Aug. 8th returning Aug. 23. I will be viewing my messages when I have a chance. For urgent information please call Heather Evans at 519-727-1275. From michael at ddisolutions.com.au Thu Jul 29 23:15:21 2004 From: michael at ddisolutions.com.au (Michael Maddison) Date: Fri, 30 Jul 2004 14:15:21 +1000 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: <6D8C24685B2A614481AD0BDAB0AC94F9113AD8@ddi-pdc.ddisolutions.ddisolutions.com.au> Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M From stuart at lexacorp.com.pg Fri Jul 30 00:12:25 2004 From: stuart at lexacorp.com.pg (Stuart McLachlan) Date: Fri, 30 Jul 2004 15:12:25 +1000 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <6D8C24685B2A614481AD0BDAB0AC94F9113AD8@ddi-pdc.ddisolutions.ddisolutions.com.au> Message-ID: <410A6559.14457.F9DFA6@lexacorp.com.pg> On 30 Jul 2004 at 14:15, Michael Maddison wrote: > Hi list, > > I've been mainly working in SQL 2K for a while now and have grown to > love using derived tables in my sql statements. A shame you can't do > the same in Access! You thought so, well so did I. No we didn't. This seems to come up about once a year:-) Search the archives for John Barlow's message "Re: [AccessD] SQL in-line subquery" of Thu, 8 May 2003 11:45:56 -0500 which traces references going back a posting by someon called Paul in July 2001 -- Lexacorp Ltd http://www.lexacorp.com.pg Information Technology Consultancy, Software Development,System Support. From Paul.Rogers at SummitMedia.co.uk Fri Jul 30 02:35:03 2004 From: Paul.Rogers at SummitMedia.co.uk (Paul Rodgers) Date: Fri, 30 Jul 2004 08:35:03 +0100 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: Brilliant, Michael. Thanks very much. (If you're prepared to divulge the url sometime, be very pleased to use it.) Cheers paul -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Friday, July 30, 2004 5:15 AM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From pedro at plex.nl Fri Jul 30 11:35:14 2004 From: pedro at plex.nl (pedro at plex.nl) Date: Fri, 30 Jul 2004 11:35:14 (MET DST) Subject: [AccessD] dim question Message-ID: <200407300935.i6U9ZEZl018562@mailhostC.plex.net> Hello Group, Why do i get different results with the function below when placing dim inside and outside the function. Option Compare Database Dim strLastPnr As String Dim lngPnrCount As Long Function NumberRecs(strPnr As String) As Long If strPnr <> strLastPnr Then lngPnrCount = 1 strLastPnr = strPnr NumberRecs = 1 Else lngPnrCount = lngPnrCount + 1 NumberRecs = lngPnrCount End If End Function as result i get Pnr field Exp1 0001 t1 1 0001 t2 2 0001 t3 3 0005 t1 1 0006 t1 1 Option Compare Database Function NumberRecs(strPnr As String) As Long Dim strLastPnr As String Dim lngPnrCount As Long If strPnr <> strLastPnr Then lngPnrCount = 1 strLastPnr = strPnr NumberRecs = 1 Else lngPnrCount = lngPnrCount + 1 NumberRecs = lngPnrCount End If End Function as result i get Pnr field Exp1 0001 t1 1 0001 t2 1 0001 t3 1 0005 t1 1 0006 t1 1 TIA Pedro Janssen From andy at minstersystems.co.uk Fri Jul 30 05:39:27 2004 From: andy at minstersystems.co.uk (Andy Lacey) Date: Fri, 30 Jul 2004 11:39:27 +0100 Subject: [AccessD] dim question Message-ID: <20040730103925.6296A25FC61@smtp.nildram.co.uk> Pedro Not such a dim question I didn't think ;-) With the dim outside the function it doesn't get reinitialised for each call, so when you're adding to it it's starting from a value. You'd need to put: lngPnrCount=0 at the top of the function. -- Andy Lacey http://www.minstersystems.co.uk --------- Original Message -------- From: Access Developers discussion and problem solving To: AccessD at databaseadvisors.com Subject: [AccessD] dim question Date: 30/07/04 09:36 > > Hello Group, > > Why do i get different results with the function below when placing dim inside and outside the function. > > <code> > > Option Compare Database > > Dim strLastPnr As String > Dim lngPnrCount As Long > > Function NumberRecs(strPnr As String) As Long > > If strPnr <> strLastPnr Then > lngPnrCount = 1 > strLastPnr = strPnr > NumberRecs = 1 > Else > lngPnrCount = lngPnrCount + 1 > NumberRecs = lngPnrCount > End If > > End Function > > > <code> > > as result i get > > Pnr field Exp1 > 0001 t1 1 > 0001 t2 2 > 0001 t3 3 > 0005 t1 1 > 0006 t1 1 > > > > > <code> > > Option Compare Database > > Function NumberRecs(strPnr As String) As Long > > Dim strLastPnr As String > Dim lngPnrCount As Long > > > If strPnr <> strLastPnr Then > lngPnrCount = 1 > strLastPnr = strPnr > NumberRecs = 1 > Else > lngPnrCount = lngPnrCount + 1 > NumberRecs = lngPnrCount > End If > > End Function > > > <code> > > as result i get > > Pnr field Exp1 > 0001 t1 1 > 0001 t2 1 > 0001 t3 1 > 0005 t1 1 > 0006 t1 1 > > > > TIA > > Pedro Janssen > > -- > _______________________________________________ > 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 HollisVJ at pgdp.usec.com Fri Jul 30 06:40:46 2004 From: HollisVJ at pgdp.usec.com (Hollis,Virginia) Date: Fri, 30 Jul 2004 06:40:46 -0500 Subject: [AccessD] Create a Search Message-ID: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> There are only a few fields they want to search and create the report from. Around 7 fields and a date field. Virginia ************ Virginia, in truth this in an ambitious project. Do they want to search any field or can you restrict that much? Susan H. Does anyone have an example of creating a report by selecting search criteria from fields? I had a request today to add a custom report builder to one of my databases. From Developer at UltraDNT.com Fri Jul 30 07:02:20 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 08:02:20 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: Message-ID: <001401c4762d$13fd9bd0$0201a8c0@COA3> Quite interesting, but, I'll admit, I don't see the application of this ... Could someone elaborate how I could make my applications better using this bit of sql in an app? Thanks, Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul Rodgers Sent: Friday, July 30, 2004 3:35 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Brilliant, Michael. Thanks very much. (If you're prepared to divulge the url sometime, be very pleased to use it.) Cheers paul -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Friday, July 30, 2004 5:15 AM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From gustav at cactus.dk Fri Jul 30 07:28:55 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 14:28:55 +0200 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <001401c4762d$13fd9bd0$0201a8c0@COA3> References: <001401c4762d$13fd9bd0$0201a8c0@COA3> Message-ID: <8423895479.20040730142855@cactus.dk> Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of this > ... Could someone elaborate how I could make my applications better > using this bit of sql in an app? From pedro at plex.nl Fri Jul 30 07:47:41 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jul 2004 14:47:41 +0200 Subject: [AccessD] dim question References: <20040730103925.6296A25FC61@smtp.nildram.co.uk> Message-ID: <003001c47633$67def090$f5c581d5@pedro> Hello Andy, Thanks for your help. Sometimes answers look so simple! Pedro ----- Original Message ----- From: "Andy Lacey" To: "Access Developers discussion and problem solving" Sent: Friday, July 30, 2004 12:39 PM Subject: Re: [AccessD] dim question > Pedro > Not such a dim question I didn't think ;-) > With the dim outside the function it doesn't get reinitialised for each > call, so when you're adding to it it's starting from a value. You'd need to > put: > > lngPnrCount=0 > > at the top of the function. > > -- > Andy Lacey > http://www.minstersystems.co.uk > > > > --------- Original Message -------- > From: Access Developers discussion and problem solving > > To: AccessD at databaseadvisors.com > Subject: [AccessD] dim question > Date: 30/07/04 09:36 > > > > > Hello Group, > > > > Why do i get different results with the function below when placing dim > inside and outside the function. > > > > <code> > > > > Option Compare Database > > > > Dim strLastPnr As String > > Dim lngPnrCount As Long > > > > Function NumberRecs(strPnr As String) As Long > > > > If strPnr <> strLastPnr Then > > lngPnrCount = 1 > > strLastPnr = strPnr > > NumberRecs = 1 > > Else > > lngPnrCount = lngPnrCount + 1 > > NumberRecs = lngPnrCount > > End If > > > > End Function > > > > > > <code> > > > > as result i get > > > > Pnr field Exp1 > > 0001 t1 1 > > 0001 t2 2 > > 0001 t3 3 > > 0005 t1 1 > > 0006 t1 1 > > > > > > > > > > <code> > > > > Option Compare Database > > > > Function NumberRecs(strPnr As String) As Long > > > > Dim strLastPnr As String > > Dim lngPnrCount As Long > > > > > > If strPnr <> strLastPnr Then > > lngPnrCount = 1 > > strLastPnr = strPnr > > NumberRecs = 1 > > Else > > lngPnrCount = lngPnrCount + 1 > > NumberRecs = lngPnrCount > > End If > > > > End Function > > > > > > <code> > > > > as result i get > > > > Pnr field Exp1 > > 0001 t1 1 > > 0001 t2 1 > > 0001 t3 1 > > 0005 t1 1 > > 0006 t1 1 > > > > > > > > TIA > > > > Pedro Janssen > > > > -- > > _______________________________________________ > > AccessD mailing list > > AccessD at databaseadvisors.com > > http://databaseadvisors.com/mailman/listinfo/accessd > > Website: http://www.databaseadvisors.com > > > > > > > > > > > > ________________________________________________ > Message sent using UebiMiau 2.7.2 > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From gustav at cactus.dk Fri Jul 30 08:10:32 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 15:10:32 +0200 Subject: [AccessD] Create a Search In-Reply-To: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> References: <618EB4D6DDCDD3119B0A00508B6FD37A0EAE89E6@cntexchange.pgdp.usec.com> Message-ID: <10826393131.20040730151032@cactus.dk> Hi Virginia This AddToWhere function should get you started: http://www.tek-tips.com/gfaqs.cfm/lev2/4/lev3/27/pid/702/fid/1177 You will need to refine it for date filtering. Just remember to specify any date/time as a String using the Lembit method: Public Function StrDateSQL(ByVal dat As Date) As String ' Formats full string of date/time in US format for SQL. ' Overrides local (non US) settings for date/time separators. ' Example output: ' ' #08/16/1998 04:03:36 PM# ' ' 1999-10-21. Cactus Data ApS, CPH. StrDateSQL = Format(dat, "\#mm\/dd\/yyyy hh\:nn\:ss AM/PM\#") End Function /gustav > There are only a few fields they want to search and create the report from. > Around 7 fields and a date field. > Virginia > ************ > Virginia, in truth this in an ambitious project. Do they want to search any > field or can you restrict that much? > Susan H. > Does anyone have an example of creating a report by selecting search > criteria from fields? I had a request today to add a custom report builder > to one of my databases. From Mark.Mitsules at ngc.com Fri Jul 30 09:07:20 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 30 Jul 2004 10:07:20 -0400 Subject: [AccessD] Multiple Table Search Message-ID: Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From garykjos at hotmail.com Fri Jul 30 09:29:16 2004 From: garykjos at hotmail.com (Gary Kjos) Date: Fri, 30 Jul 2004 09:29:16 -0500 Subject: [AccessD] Import File From UNIX box Message-ID: It has been my experience that transferring files to and from Unix to Windows worlds you almost always have to look at the record terminators in a Hex Editor to see what is there verses what should be there. Windows Text format should have a CR and a LF character at the end of each record. Unix generally has one or the other. Some Windows programs can handle these Unix version text files without any problems, but Access seems to be sensitive to them. It wants exactly one CR and one LF. Hex 0D and Hex 0A. I have seen the FTP process to transfer the files from Unix to Windows add CR/LF's and sometimes it would only do that if it had a dot txt file extension. Weird stuff. What I have seen is that since there is only the CR (or the LF) The Access text file import will see the file as ONE RECORD. One BIG record. This will cause it to blow up on big files or just not work right on smaller ones. I have used routines similar to the one posted below to "adjust" the cr/lf record terminators as needed. The basic logic is to parse fhe file one character at a time. If it's not a CR or LF character, you send it to the output buffer. If it is a CR or a LF, write the record, adding the CR/LF as needed - or NOT because just writing the record to the file may add that for you. I haven't done it for a while so I forget exactly if you need to add them explicitly or not. I see that this code has that addition commented out. Anyway, here's an example of my routine to straighten out a txt file, reading in one file and writing it out to a new file. Private Sub cmdFixFile_Click() ' On Error GoTo Err_cmdFixFile_Click Dim dRec As String Dim CharCounter As Long Dim RecordsWritten As Double Dim dtEndTime As Date Dim dtStartTime As Date Dim I As Long Dim O As Long Dim strBL As String Dim strImportPath As String Dim strOutputPath As String Dim strNL As String Dim MyChar As String Dim MyOutputRec As String Dim DisplayCounter As Long Dim TotalCharactersRead As Double Dim LineFeedSwitch As Boolean Dim str0D As String Dim str0A As String str0D = Chr(13) str0A = Chr(10) I = FreeFile O = FreeFile + 1 strNL = Chr(13) & Chr(10) strImportPath = "D:\aaaa\oracleconv\o200138JewelryOnly.txt" strOutputPath = "D:\aaaa\oracleconv\o200138JewelryOnlyCorrected.txt" Me!txtMessage = "Commencing Fix Process. " Me.Repaint dtStartTime = Now() Open strImportPath For Input As I Open strOutputPath For Output As O Do While Not EOF(I) MyChar = Input(1, #I) If MyChar = Chr(13) Or MyChar = Chr(10) Then If LineFeedSwitch = False Then MyOutputRec = MyOutputRec ' + strNL LineFeedSwitch = True Print #O, MyOutputRec MyOutputRec = "" RecordsWritten = RecordsWritten + 1 CharCounter = 0 DisplayCounter = DisplayCounter + 1 End If Else MyOutputRec = MyOutputRec + MyChar CharCounter = CharCounter + 1 TotalCharactersRead = TotalCharactersRead + 1 LineFeedSwitch = False End If ' If CharCounter = 655 Then ' MyOutputRec = MyOutputRec + strNL ' Print #O, MyOutputRec ' MyOutputRec = "" ' RecordsWritten = RecordsWritten + 1 ' CharCounter = 0 ' DisplayCounter = DisplayCounter + 1 ' End If If DisplayCounter = 500 Then Me!txtMessage = "Total Characters Read " & TotalCharactersRead & strNL & "Total Records Written " & RecordsWritten Me.Repaint DisplayCounter = 0 End If Loop Close #I Close #O Me!txtMessage = "Total Characters Read " & TotalCharactersRead & strNL & "Total Records Written " & RecordsWritten Me.Repaint MsgBox "All Done - " & RecordsWritten & " Records Written" Exit_cmdFixFile_Click: Exit Sub Err_cmdFixFile_Click: MsgBox Err.Description Resume Exit_cmdFixFile_Click End Sub Gary Kjos garykjos at hotmail.com >From: "Mark A Matte" >Reply-To: Access Developers discussion and problem >solving >To: accessd at databaseadvisors.com >Subject: [AccessD] Import File From UNIX box >Date: Thu, 29 Jul 2004 13:48:01 +0000 > >Hello All, > >I have an A97 db that imports a text file. The text file was on a Windows >box...but now is generated and sent to a UNIX box. The UNIX version of >this text file has a CR or LF character after each record...and access sees >this as the end of the file. Any suggestions in using vba to convert this >file(or those characters) back to a Windows format/ > >Thanks, > >Mark A. Matte > >_________________________________________________________________ >Overwhelmed by debt? Find out how to ?Dig Yourself Out of Debt? from MSN >Money. http://special.msn.com/money/0407debt.armx > >-- >_______________________________________________ >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com From fahooper at trapo.com Fri Jul 30 09:38:50 2004 From: fahooper at trapo.com (Fred Hooper) Date: Fri, 30 Jul 2004 10:38:50 -0400 Subject: [AccessD] Trouble moving A2K mdb to another computer Message-ID: <001901c47642$ee7942e0$f0bffea9@fred> I'm having trouble moving an A2K mdb to another computer. My computer runs W2K and has all Access programs from A97 through A2003 plus VB6, all up to date. The target computers have: (1) W98 Me & A2K; and, (2) W2K & A2K. Both are up-to-date. The most extreme problem was the latest version encountered a "VBE6.dll" file cannot be found. Going back to the previous version had no problems (the changes were minor). Returning to the new version gave the problems again. Six months or so ago I had no problems moving versions. But recently, there are *always* problems. I've compacted-repaired both in A2K and A2003, I've imported everything to a new container (but not recently). Does anybody have any similar experiences and/or any ideas? Thanks, Fred Hooper From gustav at cactus.dk Fri Jul 30 09:54:40 2004 From: gustav at cactus.dk (Gustav Brock) Date: Fri, 30 Jul 2004 16:54:40 +0200 Subject: [AccessD] API: Look up user profile from ProfileList Message-ID: <7132640374.20040730165440@cactus.dk> Hi all API gurus In the registry a user profile can look like (two lines): HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\S-1-5-21-1614895754-920026266-1343024091-1003 HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\S-1-5-21-1614895754-920026266-1343024091-1005 All user profiles have their ID listed under ProfileList. How do I look up which profile is currently in use (the current user)? In this case it could be: S-1-5-21-1614895754-920026266-1343024091-1005 I've googled around on ProfileList and others but it seems I miss the magic key word ... /gustav From John.Clark at niagaracounty.com Fri Jul 30 09:57:52 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jul 2004 10:57:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! From Developer at UltraDNT.com Fri Jul 30 10:28:34 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 11:28:34 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: <8423895479.20040730142855@cactus.dk> Message-ID: <000c01c47649$e3fb6490$0201a8c0@COA3> Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 30 10:30:24 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 08:30:24 -0700 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: We've discussed this trick before in the list. I found it back in A97, where it was problematic and had to be used with care, and I've used it in 2k and XP. There was a tip on this in the December 2001 Access-VB-SQL Advisor magazine, called "Create Derived Tables in Jet". As I recall, they are covered in O'Reilly's Access Database Design & Programming as well. Charlotte Foust -----Original Message----- From: Michael Maddison [mailto:michael at ddisolutions.com.au] Sent: Thursday, July 29, 2004 8:15 PM To: Access Developers discussion and problem solving Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Hi list, I've been mainly working in SQL 2K for a while now and have grown to love using derived tables in my sql statements. A shame you can't do the same in Access! You thought so, well so did I. A colleague came across a website (no link,sorry) which shows how to do derived tables in MS Access. Undocumented Syntax SELECT .* FROM [SELECT sum(x) FROM FOO]. BAR ***Notice the [] and the space after the . This works like a charm, even the query designer likes it! The only drawback I've found (apart from being undocumented) is the derived tables cannot have column names with square brackets arround them. So SELECT .* FROM [SELECT sum([My Badly Named Field]) FROM FOO]. BAR Will not parse correctly. Try it out. cheers Michael M -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Fri Jul 30 10:36:52 2004 From: marcus at tsstech.com (Scott Marcus) Date: Fri, 30 Jul 2004 11:36:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: The mathematical function you are talking about is XOR. If you can get a query that looks something like: Query3: Person_ID In_Query_1 In_Query_2 1 True True 2 False False 3 True False 4 False True The following query will give you what you want: SELECT Person_ID FROM Query3 WHERE (In_Query_1 XOR In_Query_2) = TRUE The result is the following: Person_ID 3 4 Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From cfoust at infostatsystems.com Fri Jul 30 10:44:00 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 08:44:00 -0700 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables Message-ID: It replaces a join to another table or query. So instead of SELECT * FROM Table1 INNER JOIN Query1 ... You use a derived table, which is a kind of subquery, in place of Query1. Does that make it clearer? Charlotte Foust -----Original Message----- From: Steve Conklin (Developer at UltraDNT) [mailto:Developer at ultradnt.com] Sent: Friday, July 30, 2004 7:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From marcus at tsstech.com Fri Jul 30 10:55:51 2004 From: marcus at tsstech.com (Scott Marcus) Date: Fri, 30 Jul 2004 11:55:51 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: I miss understood your question. Couldn't you just union the two queries and count by the person? For example: SELECT Count(Person) AS Total_Number_Of_People FROM [SELECT Person FROM query1 UNION SELECT Person FROM query2]. I'm tying in the other thread (Undocumented Access SQL syntax). Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Developer at UltraDNT.com Fri Jul 30 11:09:24 2004 From: Developer at UltraDNT.com (Steve Conklin (Developer@UltraDNT)) Date: Fri, 30 Jul 2004 12:09:24 -0400 Subject: [AccessD] Undocumented Access SQL syntax - Derived tables In-Reply-To: Message-ID: <001201c4764f$984bb990$0201a8c0@COA3> Much clearer, thanks Charlotte. Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust Sent: Friday, July 30, 2004 11:44 AM To: Access Developers discussion and problem solving Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables It replaces a join to another table or query. So instead of SELECT * FROM Table1 INNER JOIN Query1 ... You use a derived table, which is a kind of subquery, in place of Query1. Does that make it clearer? Charlotte Foust -----Original Message----- From: Steve Conklin (Developer at UltraDNT) [mailto:Developer at ultradnt.com] Sent: Friday, July 30, 2004 7:29 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Undocumented Access SQL syntax - Derived tables Ok, but, I'm just not visualizing what it actually DOES. (Union, I know what that does, so I can think of places to put it ... i.e., adding to a combo ...) So, I guess I am looking for an example like "In an Invoicing screen I used this to do blah-blah" or "in a calculated column of a widgets query, I used it to yada-yada" Steve -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock Sent: Friday, July 30, 2004 8:29 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Undocumented Access SQL syntax - Derived tables Hi Steve It is not a universal trick. It is just a tool like, say, a union query - sometimes it's useful, in some apps you may not use it at all. Just have it in mind and it will pop forward when you need it! /gustav > Quite interesting, but, I'll admit, I don't see the application of > this ... Could someone elaborate how I could make my applications > better using this bit of sql in an app? -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Fri Jul 30 11:18:31 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Fri, 30 Jul 2004 12:18:31 -0400 Subject: [AccessD] Trouble moving A2K mdb to another computer In-Reply-To: <001901c47642$ee7942e0$f0bffea9@fred> Message-ID: Fred, You need to open a module in design view and check the references on the computer that's having a problem. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Fred Hooper Sent: Friday, July 30, 2004 10:39 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Trouble moving A2K mdb to another computer I'm having trouble moving an A2K mdb to another computer. My computer runs W2K and has all Access programs from A97 through A2003 plus VB6, all up to date. The target computers have: (1) W98 Me & A2K; and, (2) W2K & A2K. Both are up-to-date. The most extreme problem was the latest version encountered a "VBE6.dll" file cannot be found. Going back to the previous version had no problems (the changes were minor). Returning to the new version gave the problems again. Six months or so ago I had no problems moving versions. But recently, there are *always* problems. I've compacted-repaired both in A2K and A2003, I've imported everything to a new container (but not recently). Does anybody have any similar experiences and/or any ideas? Thanks, Fred Hooper -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From DWUTKA at marlow.com Fri Jul 30 11:40:58 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jul 2004 11:40:58 -0500 Subject: [AccessD] Multiple Table Search Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1F8@main2.marlow.com> You didn't download the 'last' version. That not only wrapped the table names in brackets (ran into the same problem with linked Oracle tables), but it also breaks the searches down, so on tables with a lot of text and memo fields, you won't get a Query Too Complex error. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, July 30, 2004 9:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From Mark.Mitsules at ngc.com Fri Jul 30 11:51:21 2004 From: Mark.Mitsules at ngc.com (Mitsules, Mark S. (Newport News)) Date: Fri, 30 Jul 2004 12:51:21 -0400 Subject: [AccessD] Multiple Table Search Message-ID: ...hmmm I saw your post about the new version...I thought I had downloaded it and copied it right over the previous version...I guess not:( Thanks again Drew, Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Friday, July 30, 2004 12:41 PM To: accessd at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search You didn't download the 'last' version. That not only wrapped the table names in brackets (ran into the same problem with linked Oracle tables), but it also breaks the searches down, so on tables with a lot of text and memo fields, you won't get a Query Too Complex error. Drew -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mitsules, Mark S. (Newport News) Sent: Friday, July 30, 2004 9:07 AM To: 'Access Developers discussion and problem solving' Subject: RE: [AccessD] Multiple Table Search Drew, Thanks for working on this. It worked great. Though no fault of yours, the only comment I had is that due to the non-standard naming conventions used in this db, I had to modify the code to place brackets around the table names when building the SQL string...just as you did for the field names. So I ended up changing this: strSQL = "SELECT * FROM " & tbl.Name & " WHERE " & strWHERE To this: strSQL = "SELECT * FROM [" & tbl.Name & "] WHERE " & strWHERE Mark -----Original Message----- From: DWUTKA at marlow.com [mailto:DWUTKA at marlow.com] Sent: Tuesday, July 27, 2004 11:33 AM To: AccessD at databaseadvisors.com Subject: RE: [AccessD] Multiple Table Search (Here we go, posting this under the right subject this time!) Okay, here ya go. I built this into a form, because it uses a lot of 'techniques' to get things done. (Class modules, collections, callback functions (for the list box)), along with all of the associated properties that need to be set to get things done. So instead of trying to explain how to build the form, I'm just posting a link to download it. Right now, my DSL is down (in case anyone wondered why the archives on my site weren't there.....), it will be back up Thursday...so within a few days of that, I will try to remember to put this file on my website. (http://www.wolfwares.com) Until then, I put it on my company's website, for download. http://www.marlow.com/FindAllData.zip The zipped database has a form, query, and class module. Just import all three into whatever database you want. Open the form, enter the search criteria, and click the button. All applicable hits will be displayed in the listbox. You can then double click the listbox to display either the particular record (if a primary key for that table exists), or for all of the results off of that table. Boy, that was actually fun to build! Drew FYI: This code only searches for text, in text and memo fields. It also automatically puts astericks around the search criteria, so if you want to put astericks inside the criteria, go ahead, but they're not necessary on the outside. If you want to search number fields, the code could be modified to do that. Actually, if there is enough of a request for it, I could modify the search form to have different search boxes (text, currency, date/time, etc). Finally, and this is IMPORTANT, the code uses ADO. The sample I built is in 97, which has DAO set by default, but if you use A2k, make sure you have DAO selected. -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From John.Clark at niagaracounty.com Fri Jul 30 12:31:52 2004 From: John.Clark at niagaracounty.com (John Clark) Date: Fri, 30 Jul 2004 13:31:52 -0400 Subject: [AccessD] finding duplicates among different departmental programs Message-ID: Thanks Scott. This looks like it may do the trick. I may have to create several of these, because there are 14 rows in this column; all asking me to break it down a little more (i.e. how many are: over 75, frail, vets, white, asian, black, etc.). However, once I get to this point and find an accurrate number for the total, the rest is usually much simpler. I could not, however use your code exact; the count wouldn't work, so I made a separate query that counted this union query. My query ended up being: SELECT [xx-test1].kClientID FROM [xx-test1] UNION SELECT [xx-test2].kClientID FROM [xx-test2]; And then another: SELECT Count([qryTitleIII-New].kClientID) AS CountOfkClientID FROM [qryTitleIII-New]; Thanks again...it turned out pretty simple! John W Clark >>> marcus at tsstech.com 7/30/2004 11:55:51 AM >>> I miss understood your question. Couldn't you just union the two queries and count by the person? For example: SELECT Count(Person) AS Total_Number_Of_People FROM [SELECT Person FROM query1 UNION SELECT Person FROM query2]. I'm tying in the other thread (Undocumented Access SQL syntax). Scott Marcus -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Fri Jul 30 12:46:25 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 12:46:25 -0500 (CDT) Subject: [AccessD] Programmatically Hide the DATABASE Window In-Reply-To: References: <001901c47642$ee7942e0$f0bffea9@fred> Message-ID: <1540.216.43.21.235.1091209585.squirrel@cetus.email.starband.net> Hello everyone, again. It's FRIDAY! Pretty much got the menu bar working (one issue with the "menu Bar"'s control box not showing up after being disabled then enabled...but that's not the point here). I want to hide the main database window (the one with the queries, tables, forms, etc., to be exact) on startup, but not using the Startup's checkbox, but through vb. The DBA Archives dance around the issue, but I can't find where it's addressed. Is there a way to do this through code or am I stuck with using the checkbox in the Startup menu? I'm using Access97 in this app. Thanks! Greg Smith gregsmith at starband.net From cfoust at infostatsystems.com Fri Jul 30 13:09:04 2004 From: cfoust at infostatsystems.com (Charlotte Foust) Date: Fri, 30 Jul 2004 11:09:04 -0700 Subject: [AccessD] Programmatically Hide the DATABASE Window Message-ID: Try this: Public Function HideDBWindow() On Error GoTo HideDBWindow_err ' select a tab in the Database Window DoCmd.SelectObject acTable, , True ' Hide the database window DoCmd.RunCommand acCmdWindowHide HideDBWindow_exit: Exit Function HideDBWindow_err: MsgBox Err.Description & " (#" & Err & ")" Resume HideDBWindow_exit End Function Charlotte Foust -----Original Message----- From: Greg Smith [mailto:GregSmith at starband.net] Sent: Friday, July 30, 2004 9:46 AM To: accessd at databaseadvisors.com Subject: [AccessD] Programmatically Hide the DATABASE Window Hello everyone, again. It's FRIDAY! Pretty much got the menu bar working (one issue with the "menu Bar"'s control box not showing up after being disabled then enabled...but that's not the point here). I want to hide the main database window (the one with the queries, tables, forms, etc., to be exact) on startup, but not using the Startup's checkbox, but through vb. The DBA Archives dance around the issue, but I can't find where it's addressed. Is there a way to do this through code or am I stuck with using the checkbox in the Startup menu? I'm using Access97 in this app. Thanks! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From dwaters at usinternet.com Fri Jul 30 13:14:49 2004 From: dwaters at usinternet.com (Dan Waters) Date: Fri, 30 Jul 2004 13:14:49 -0500 Subject: [AccessD] ShortCut Menu on specific controls only Message-ID: <003301c47661$1a86e590$de1811d8@danwaters> Hello All! I have a form where I've created a custom shortcut menu designed for just one control. I don't want any shortcut menus for the form itself or any other controls. Per Help, if I enter a string into the ShortcutMenuBar property of a control where that string does not equal the name of a shortcut menu, then no shortcut menu will be displayed. But - what actually happens is that first I get an error message stating that the shortcut menu can't be found, and then the default shortcut menu appears. What am I not doing? (AXP) Dan Waters From GregSmith at starband.net Fri Jul 30 13:48:30 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 13:48:30 -0500 (CDT) Subject: [AccessD] Programmatically Hide the DATABASE Window-Solved! In-Reply-To: References: Message-ID: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> Thanks Charlotte! It works perfectly! Greg. > Try this: > > Public Function HideDBWindow() > On Error GoTo HideDBWindow_err > ' select a tab in the Database Window > DoCmd.SelectObject acTable, , True > ' Hide the database window > DoCmd.RunCommand acCmdWindowHide > HideDBWindow_exit: > Exit Function > HideDBWindow_err: > MsgBox Err.Description & " (#" & Err & ")" > Resume HideDBWindow_exit > End Function > > Charlotte Foust > From GregSmith at starband.net Fri Jul 30 15:16:44 2004 From: GregSmith at starband.net (Greg Smith) Date: Fri, 30 Jul 2004 15:16:44 -0500 (CDT) Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) In-Reply-To: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> References: <1697.216.43.21.235.1091213310.squirrel@cetus.email.starband.net> Message-ID: <1990.216.43.21.235.1091218604.squirrel@cetus.email.starband.net> I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net From jeffrey.demulling at usbank.com Fri Jul 30 15:24:33 2004 From: jeffrey.demulling at usbank.com (jeffrey.demulling at usbank.com) Date: Fri, 30 Jul 2004 15:24:33 -0500 Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) Message-ID: You need to go into the toolbar using View, Toolbars, Customize. Select the toolbar in question and then click the properties button. From here you can deselect the allow customizing option. This should solve your problem. "Greg Smith" To: accessd at databaseadvisors.com Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) dvisors.com 07/30/2004 03:16 PM Please respond to "Access Developers discussion and problem solving" I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ------------------------------------------------------------------------------ Electronic Privacy Notice. This e-mail, and any attachments, contains information that is, or may be, covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510-2521, and is also confidential and proprietary in nature. If you are not the intended recipient, please be advised that you are legally prohibited from retaining, using, copying, distributing, or otherwise disclosing this information in any manner. Instead, please reply to the sender that you have received this communication in error, and then immediately delete it. Thank you in advance for your cooperation. ============================================================================== From pedro at plex.nl Fri Jul 30 16:10:22 2004 From: pedro at plex.nl (Pedro Janssen) Date: Fri, 30 Jul 2004 23:10:22 +0200 Subject: [AccessD] Import File From UNIX box References: Message-ID: <004601c47679$a18c66b0$f5c581d5@pedro> Hello Mark, i use VBA on Reflection FTP to send a unix file as an ascii file to an windows box. Then it is imported with no problems in access. If you want the code, let me know, i will send you this next week from my work. Pedro Janssen > >From: "Mark A Matte" > >Reply-To: Access Developers discussion and problem > >solving > >To: accessd at databaseadvisors.com > >Subject: [AccessD] Import File From UNIX box > >Date: Thu, 29 Jul 2004 13:48:01 +0000 > > > >Hello All, > > > >I have an A97 db that imports a text file. The text file was on a Windows > >box...but now is generated and sent to a UNIX box. The UNIX version of > >this text file has a CR or LF character after each record...and access sees > >this as the end of the file. Any suggestions in using vba to convert this > >file(or those characters) back to a Windows format/ > > > >Thanks, > > > >Mark A. Matte > > > >_________________________________________________________________ > >Overwhelmed by debt? Find out how to 'Dig Yourself Out of Debt' from MSN > >Money. http://special.msn.com/money/0407debt.armx > > > >-- > >_______________________________________________ > >AccessD mailing list > >AccessD at databaseadvisors.com > >http://databaseadvisors.com/mailman/listinfo/accessd > >Website: http://www.databaseadvisors.com > > > -- > _______________________________________________ > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > > From DWUTKA at marlow.com Fri Jul 30 17:04:37 2004 From: DWUTKA at marlow.com (DWUTKA at marlow.com) Date: Fri, 30 Jul 2004 17:04:37 -0500 Subject: [AccessD] OT: Anyone have a SpeedStream 5260 DSL modem? Message-ID: <2F8793082E00D4119A1700B0D0216BF8031BB1FF@main2.marlow.com> Just curious. Had to jump through some hoops with my DSL provider, and in the end, I ended up with a new DSL account, which still has static IP's, but uses PPPoE. A complete pain. Didn't want to install EnterNet 300, so I bit the bullet, and tried the hack to upgrade my DSL modem into a full blown DSL Modem/Router (firewall, PPPoE, DNS, etc.). Had to do some web research to pull it off, but if anyone on the list has a SpeedStream 5260 (which has an actual model number that says 5660), let me know, I can give you exact steps (and the firmware upgrades you'll need) to pull off the upgrade. Drew From snegus at ovasia.org Sat Jul 31 06:24:37 2004 From: snegus at ovasia.org (Stephen Negus) Date: Sat, 31 Jul 2004 19:24:37 +0800 Subject: [AccessD] Hide Autonumber Message-ID: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen From rbgajewski at adelphia.net Sat Jul 31 07:59:06 2004 From: rbgajewski at adelphia.net (Bob Gajewski) Date: Sat, 31 Jul 2004 08:59:06 -0400 Subject: [AccessD] Hide Autonumber In-Reply-To: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Message-ID: Stephen This may not be exactly what you're looking for, but why don't you just set the entire control to Visible=False? Is there a reason that you need to show the existence of the field but not the value? Regards, Bob Gajewski -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Negus Sent: Saturday, July 31, 2004 07:25 To: AccessD Subject: [AccessD] Hide Autonumber Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From jimdettman at earthlink.net Sat Jul 31 12:30:35 2004 From: jimdettman at earthlink.net (Jim Dettman) Date: Sat, 31 Jul 2004 13:30:35 -0400 Subject: [AccessD] Hide Autonumber In-Reply-To: <001101c476f0$f73d6100$3664fea9@OneVoiceLaptop> Message-ID: Stephen, I can't think of anyway of doing it with Format, but you can get what you want by defining a column as: Expr1: IIf(IsNumeric([]),[],"") in the underlying query of the form or report. Jim Dettman (315) 699-3443 jimdettman at earthlink.net -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Stephen Negus Sent: Saturday, July 31, 2004 7:25 AM To: AccessD Subject: [AccessD] Hide Autonumber Hi All, Does someone know how to format an autonumber field so that the text (autonumber) is not visible? I know this was posted a long time ago on the list, but I couldn't find arcihves prior to Jan 2003. Thanks, Stephen -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From martyconnelly at shaw.ca Sat Jul 31 17:28:40 2004 From: martyconnelly at shaw.ca (MartyConnelly) Date: Sat, 31 Jul 2004 15:28:40 -0700 Subject: [AccessD] Urgent: Problem with mscomctl.ocx References: <200301141241.h0ECfrO22503@mailgate5.cinetic.de> Message-ID: <410C1D18.6080706@shaw.ca> Well mscomctl.ocx ver 6.0.81.77 is installed by Office 2000 and Office 2000 SR-1 ; ver 6.0.84.50 by Office 2000 developer 6.1.83.36 by various version of`SQL Server and 6.1.95.45 by Office XP SP2 and Office 2003 I don't know what mscmde.dll is (a typo) You can find this info at http://support.microsoft.com/default.aspx?scid=/servicedesks/fileversion/default.asp?vartarget=msdn If you really do need your version of the control, you might get away with installing the dll's in the same directory as your mdb, if they don't need to be registered. Maybe your Access program will run with the old controls. To get back the old versions your client will probably have to reinstall office 2000. How Access searches for reference libraries. ------------ First, Access searches for a RefLibPaths key in the following location in the Microsoft Windows Registry: HKEY_LOCAL_MACHINE\Software\Microsoft\Office\9.0\Access If the key exists, Access checks for the existence of a value name that matches the name of the referenced file. If it finds a matching value name, Access loads the reference from the path specified in the corresponding value data. If Access doesn't find a RefLibPaths key, it searches for the referenced file in the locations listed below in the following order: Application folder containing the application (the folder where Msaccess.exe is located). Current folder. System folders (the System and System32 folders located in the Windows or WINNT folder). Windows or WINNT folder. PATH environment variable. For more information about environment variables, see Windows Help. The folder that contains the Access file, and any subfolders located in that folder. If Access still can't find the reference after performing this search, you must fix the reference manually. --------------- This is why it is generally better to use SageKey Scripts for an install. michael.broesdorf at web.de wrote: >Dear group, > >I created a setup package for my a2K application. The app uses the treeview control. So I included mscomctl.ocx and MSCMCDE.DLL in my package. > >The installation at my clients works just fine and my app is running. But if they try to use MS Word or Excel, it keeps asking for the MS Office installation CD ROM. Rebooting the machine makes Word work, but Excel still asks for the CD. > >They use another application (which is obviously an Access app, too). Some of the forms in that app do not work anymore (it looks like they are using the treeview control). > >My client is using Microsoft Office 2000 Premium (no service packs applied) > >The Version of the treeview I distribute is 6.0 SP4. > >So it looks like the treeview control messes up my clients machines. > >Is there anything I can do to prevent that from happening? I thought installing the newest version should work in any case?! > >HELP!!! (please) > > >Michael > > >This list sponsored by Database Advisors Inc., a worldwide association of database developers. >Visit http://www.DatabaseAdvisors.com, the database developers' list portal and support site. > > > -- Marty Connelly Victoria, B.C. Canada From artful at rogers.com Sat Jul 31 21:07:22 2004 From: artful at rogers.com (Arthur Fuller) Date: Sat, 31 Jul 2004 22:07:22 -0400 Subject: [AccessD] finding duplicates among different departmental programs In-Reply-To: Message-ID: <008501c4776c$4858f7e0$6601a8c0@rock> Union. -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of John Clark Sent: Friday, July 30, 2004 10:58 AM To: accessd at databaseadvisors.com Subject: [AccessD] finding duplicates among different departmental programs I created a program, about a year and a half ago, for an agency that deals with providing programs for the elderly. This agency gets its funding from many different sources and a single source may fund multiple programs. To track all of this we need to provide many stats. When this was written, there wasn't a concern about a person being in multiple programs, although I warned about it. Now, because there state reporting has changed, there may be a concern. The state is kicking back their reports because one of their funding counts is greater than the total amount of participants; there are 1236 people enrolled with the agency, but one group of programs is showing a count of 1257. I think the fact that they are even close is a coincidence...I took a sample of 13 members and all but four were in at least 2 of the programs, and actually my queries, out of necessity, each handle two programs (there are four for this group) and each one blocks out its own 'duplicates', so it is very conceivable that many of these people are in all four of the groups. Question: qryOne looks for people in Prog1 OR Prog2 (count = 809) qryTwo looks for people in ProgA OR ProgB (count = 410) I need a total count of those is qryOne OR qryTwo *** I don't want those that are in both counted twice, which is what a count of 1219 (809 + 410) will give me. I'm thinking that I need to use one of these queries into another query...??? Thanks in advance for any help! -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com From GregSmith at starband.net Sat Jul 31 23:20:02 2004 From: GregSmith at starband.net (Greg Smith) Date: Sat, 31 Jul 2004 23:20:02 -0500 Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) In-Reply-To: Message-ID: <200408010420.i714KXQC005829@cepheus.email.starband.net> Jeffrey: Yes, that works, but I need to do it programmatically. Not using the interface, but through VB so I can turn it on and off depending on the user's name. Or the security group they belong to. I have the toolbars and menus to load the ones I want for the users or programmers, but I have to turn off the customizing through the program (vb) or they can very easily defeat my menus be adding their own stuff to the bars. If I try using the interface, it's local only and will not apply to other machines where the app is loaded. Greg -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of jeffrey.demulling at usbank.com Sent: Friday, July 30, 2004 3:25 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Disable Customizing of Menus in Code (Access 97) You need to go into the toolbar using View, Toolbars, Customize. Select the toolbar in question and then click the properties button. From here you can deselect the allow customizing option. This should solve your problem. "Greg Smith" To: accessd at databaseadvisors.com Sent by: cc: accessd-bounces at databasea Subject: [AccessD] Disable Customizing of Menus in Code (Access 97) dvisors.com 07/30/2004 03:16 PM Please respond to "Access Developers discussion and problem solving" I'm back. Must be 'bad penny' Friday. I now have the db window hidden (thanks again Charlotte!), and have the correct menu bar showing for the users. However, anyone can right mouse click on the menubar, click customize, and either modify the existing one or create a new menubar with all the options that I've gone to the trouble of hiding. There has to be a way to disable this function in Access. The shortcut menus don't affect the tool bar or menu bar menu selection from the right mouse click. Turning off shortcut menus on the form does not keep the Customize menu selection from appearing when clicked in the toolbar area. Ideally that menu customizing function should be turned off through the code so it can't be restarted by anyone using the program (except the programmer, of course...). Am I barking up the wrong tree? Is this possible? Or do I need some completely different route to get where I want? TIA! Greg Smith gregsmith at starband.net -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com ---------------------------------------------------------------------------- -- Electronic Privacy Notice. This e-mail, and any attachments, contains information that is, or may be, covered by the Electronic Communications Privacy Act, 18 U.S.C. 2510-2521, and is also confidential and proprietary in nature. If you are not the intended recipient, please be advised that you are legally prohibited from retaining, using, copying, distributing, or otherwise disclosing this information in any manner. Instead, please reply to the sender that you have received this communication in error, and then immediately delete it. Thank you in advance for your cooperation. ============================================================================ == -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com