[AccessD] Missing references

Gustav Brock Gustav at cactus.dk
Fri Feb 16 10:43:20 CST 2007


Hi Mark

You need to show the two columns for condition etc.

However, you can read the full macro in from a file.
Cut and paste the text below into a new textfile (Notepad).

<macro>
Version = 131074
ColumnsShown = 3
Begin
    Action ="Echo"
    Argument ="0"
End
Begin
    Condition ="CheckReferences()=False"
    Action ="RunCode"
    Argument ="VerifyReferences(True)"
End
Begin
    Condition ="..."
    Action ="OpenModule"
    Argument ="USysReferencesCheck"
End
Begin
    Condition ="..."
    Action ="RunCommand"
    Argument ="126"
End
Begin
    Condition ="..."
    Action ="Close"
    Argument ="-1"
    Argument =""
    Argument ="0"
End
Begin
    Action ="Echo"
    Argument ="-1"
End
</macro>

Then import it in Access with the command in the immediate window:

  LoadFromText acMacro, "AutoExec", "d:\filename.txt"

/gustav

>>> markamatte at hotmail.com 16-02-2007 17:23:25 >>>
Thanks Gustav,

This is almost embarrassing...I see the code...I know what the code does...I 
can write VBA...ALL...DAY...LONGGGG...But I don't know how to convert your 
IF statement back to a macro???  lol...Not sure why but I find this fact 
amusing, but I do.  Here is the VBA/Macro...

<macro>

'------------------------------------------------------------
' AutoExec
'
'------------------------------------------------------------
Function AutoExec()

  DoCmd.Echo False, ""
  If (CheckReferences() = False) Then
    Call VerifyReferences(True)
    DoCmd.OpenModule "USysReferencesCheck", ""
    DoCmd.RunCommand acCmdCompileAndSaveAllMod
    DoCmd.Close , ""
  End If
  DoCmd.Echo True, ""

End Function

</macro>

I got the echo part...lol...but how do you do the if statement?

Thanks,

Mark A. Matte

>From: "Gustav Brock" <gustav at cactus.dk>
>Reply-To: Access Developers discussion and problem 
>solving<accessd at databaseadvisors.com>
>To: <accessd at databaseadvisors.com>
>Subject: Re: [AccessD] Missing references
>Date: Fri, 16 Feb 2007 00:03:43 +0100
>
>Hi Mark
>
>Some years ago we had a lengthy thread on this.
>Look up here:
>
>http://databaseadvisors.com/pipermail/accessd/2003-July/011034.html 
>
>/gustav
>
> >>> markamatte at hotmail.com 15-02-07 23:02 >>>
>Thanks John,
>
>I'm not referencing any other app or docs...I was referring to when you are
>in a module and goto TOOLS---REFERENCES...and there is something missing or
>incorrect.
>
>Is binding relevant at this point?  If not...back to the original
>question:...how to handle the 'missing'???
>
>Am I still confused>..lol...???
>
>
>Thanks,
>
>Mark A. Matte





More information about the AccessD mailing list