DoCmd.MixMeAdrink acDrink "Jack & Coke",True

Keeps returning an error of "Invalid Outside Procedure" :mad:

Damn I thought VBA could do anything. I guess not :rolleyes:

You're going about this completely the wrong way. You need an append query;

Dim PourMeADrink As string

PourMeADrink = "Insert Into Glass(Right, Now) Select Whiskey, Coke From Bottle Where Whiskey = 'Jack Daniels';"

CurrentDb.Execute PourMeADrink, dbPourMeAnotherOnError

:)

Good point. I like your solution.

It probably also needs to be within the construct of an if else statement as well for supply outages :D

Good point. I like your solution.

It probably also needs to be within the construct of an if else statement as well for supply outages :D

Not to mention,

If Blood Alcohol => .08% then

If Must Drive =True then
Go to Sleep
End If
End If
Exit Sub
Sleep:
Lie Down Now 'Hopefully with one of the pretties at the party that
' are like wise =>.08%