Search results

Check this it should provide you with a way of doing it. it's not clear if Irie got it working or not, but it certainly will, Drew

the problem was that IsNumeric will allow 1.2e3 as it fits scientific notation, but having reviewed my post above, why not just use an input mask... Drew http://www.access-programmers.co.uk/ubb/Forum7/HTML/001756.html [This message has been edited by Drew (edited 09-07-2001).]

sorry Pat, i don't mean to criticise but ANSI dates ( noting the American tone of the std ) are YYYY-MM-DD or YYYYMMDD, not mm/dd/yy. The point was that m$ fakes working in one while really working in the other, if it worked exclusively in one or other the confusion wouldn't exist. The format...

yep, that stupid db called access pretends to work in a uk format but look at the SQL of a query and it's translated into american. As a fellow englander, but from little-london-on-sea, i wholly sympathise any frustration you feel at the gross stupidity/laziness of M$ not fully coding date...

just answered a question on a different forum and thought it may apply here too. Why not force the checking while still in the field? Using the OnKeyPress event do If Not (KeyAscii < 32 Or (KeyAscii > 48 And KeyAscii < 57)) Then KeyAscii = 0 End If disallows all entries except...

I think you're right! it's very frustratingly simple, dates need to be identified as such when they go into a query. One of those things that bugs for hours until you know it, then you never think about it again. If you surround the date with #'s it should work eg strSQL = "SELECT DISTINCTROW...

Good point Ricky, never under-estimate the ability of users to do the wrong thing. Shouldn't your* ReallyIsNumericIPromise function be in there too? Drew *think it was yours..?

hi Rich, you could use something like If Me.Text0 Like "*[a-z]*" Then MsgBox "True" End If HTH Drew

if you do an unmatched query ( wizard will help ) on the 2 it will give you all the 'unselected' records HTH Drew

Hi Random, you need to set the 'Key Preview' "event" of the form to Yes and then trap for the esc key eg Private Sub Form_KeyPress(KeyAscii As Integer) If KeyAscii = 27 Then 'do stuff with the boxes End If End Sub HTH Drew

for my 1p I would like to suggest a seperate table with person(?) id and selection as primary key, and a master table of available selections. if you're going to add/remove/edit more later it will allow you to add more choices without having to change any of the structure, HTH Drew

Hi Deeta, <Date()-4 looks right, although either should work, are you getting an error back or just no data? Drew

You do need to make intPrintcalcInt publicly available rather than just within the button code, put Public intPrintcalcInt as Integer in a Module, a new one if u don't have any. Just to make sure - Query2 is a report and not a query? Do you have some other code placed on this command button...

okay, we'll lose freddie , he's a bad habit of mine along with bob boolean and dave double. Okay, so a new report is going to open, in that case probably disregard the above and in a module somewhere put Public intSensiblyNamedInteger as Integer ( ), on the OnClick event you'll then want...

yup, my bad - i looked at the top sql and failed to look at the rest properly, getting the wrong end of the stick..oops. You need to run the SQL against the database, otherwise it's just a string like any other and won't have retrieved any data. You could either do that the normal way or use...

I may be missing something ( sure wouldn't be a first...) but CurrentTemplate = DLookup("[Template ID]", "[Project Details]", "[Project ID] = 3") will get the "Template ID" field value where "Project ID" is 3, it won't return "Project ID". Is that not what you were after? Drew

hi goober if you only need the value for the life of the form then Static freddie As Integer freddie = freddie + 1 MsgBox freddie will do it if placed in the onclick event of the button, is this all you need or does it need to be stored in the db for later? HTH Drew

hi northy, you can either use DLookup - CurrentTemplate = DLookup("[Template ID]", "[Project Details]", "[Project ID] = 3") or ( if in 97 ) to dim rst as recordset set rst=CurrentDB.OpenRecordset("Select [Template ID] FROM [Project Details] WHERE [Project ID]=2") if rst.recordcount then...

Hi chrodus, don't know if u still need this as u posted a while ago but, anyway. The value will be lost if you get any code errors and someone hits 'end', i guess it may also be lost due to flakey M$-ness. You may have more luck with a hidden form with a UserName field on it, that should...

Hi Scupper, sounds like a module to me! Are there any more constraints on this? eg teams can only play each other x slots apart, can only play x slots apart, any more? Drew