newsgrps
newsgrps at dalyn.co.nz
Fri Jul 22 16:54:54 CDT 2011
Jim, How do we find out when Microsoft have solved the problem? Is there a website for these things? Regards David Emerson Dalyn Software Ltd New Zealand At 23/07/2011, Jim Dettman wrote: > BTW, I should have added that your not alone; the bug has already been >reported to Microsoft. > >Jim. > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee >Sent: Thursday, July 21, 2011 03:18 PM >To: Access Developers discussion and problem solving >Subject: [AccessD] Access 2010 SP1 issue > >I have an ADP with a form that gets bound at run-time. >This has worked flawlessly for several years until this morning. > >The user is complaining that the form opens up with all of the fields >displaying #NAME? > >I haven't touched this form, or even the ADP in the longest time so I new it >wasn't anything I've done. :) > >It works as it is supposed to on my computer and all the other employees in >his department. > >We had him go to another user's computer and log in as himself. It worked. > >So I figured it was tied to his machine. I then realized his is on Win7, >using Acess2010SP1. > >I found out SP1 was just released internally this week. A-HA! > >I ended up getting it working by doing this quick fix as shown below: >I added the "If (SysCmd(acSysCmdAccessVer) = 14) Then" statement. > >Private Sub Form_Open(Cancel As Integer) > On Error GoTo Form_Open_Error >Me.RecordSource = "" >If Nz(Me.OpenArgs, "") <> "" Then ' Is Not Null Then > If IsNumeric(Me.OpenArgs) Then > Me.InputParameters = "@IncStatJunctID = " & CInt(Me.OpenArgs) > If (SysCmd(acSysCmdAccessVer) = 14) Then > Me.RecordSource = "EXEC dbo.stpItemDetHist " & >Me.InputParameters > Else > Me.RecordSourceQualifier = "dbo" > Me.RecordSource = "stpItemDetHist" > End If > > 'Do a bunch of stuff here > > Else > Cancel = True > End If >Else > Cancel = True >End If > > >This works, but technically isn't correct. I need to check for A2010 SP1, >not just A2010 (Ver14) > >Does anyone know how I can check for SP1? >Exit Sub >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com