Recent content by Bugget

Thats why I placed it in the onKeyUp event, it also looks nicer to the user to have the formatting happen as they type the input. AS you may notice I put an integer arguement on the function so I can see how many times it is executed and it seems to work properly. The Format function has been...

Yes I have put DoEvents all over this guy and it doesn't seem to help. I can step through the code and it never fires the afterupdate event, but it will save the changes/new input into the database. Could it simply be that the keypress/keyup events stop afterupdate from firing?

So here is an update on what I have discovered. I changed the code to the following: Private Function FormatCurrencyResponse(strText As String) As String Dim NumCommas As Integer Dim strCurrent As String Dim strChr As String Dim strFormatted As String Dim Multiple As Single...

I have a recursive function which works (ie I have stepped through it on multiple occasions and never seen it go into an infinite loop and the output is correct) but whenever I use it to validate user input, my code in the BeforeUpdate and AfterUpdate events will never be executed. I have...

There are a lot of ways you can do that. First, if you are doing all of this from a form, you could bind the field in the form to the field in the query, then when the circumstances are correct, do a me.requery on the form. Another way of doing it would be to leave the field unbound and use a...

I think it is because BETWEEN is SQL and VBA uses comparison operators. Try: IF dMyDate > 10/1/2001 AND dMyDate < 12/10/2002 Then ... END IF

Last I checked SOUNDEX was not part of SQL and was only supported on specific Databases. Depending on his DB he may be able to find a similar function though.

Thats a tough one. The issue here is precision as I stated earlier. If you cut off everything after the comma and then did a like, it would find the record. The problem is that it will find anything else that starts with "Abbot Company". The level of precision is something you need to...

Try something like: SELECT A.CustName, B.ClientName FROM A, B WHERE (A.CustName Like B.ClientName) That should grab them all. If its not getting everything you could try grabbing custname, using a left function on it and appending a wildcard character to it to get even more results with less...

Thats too simple. Thanks John!

I just started working with the Adobe PDFDistiller object in VBA. After reading up on how it works I see that it needs to have an input postscript file. How can I programatically print a report to a postscript file?

Two things about the SQL string. First using the UPDATE keyword is actually going to leave a row there (Access may get rid of it if the whole row is NULL but in a strict SQL world it would stay). This may be what you intended as you state "only the data in [Notes]" but if you want to delete...

So the web database is actually at a host somewhere (or colo) and you are copying it via ftp I am guessing? If this is the case there are only a couple of options for you if you have to (financially) stick with access and none of them are really elegant. 1) You can program a form which...

VBA has a built in error collection that you can use for ODBC errors that SQL Server will throw. Have a look at this short example: Public Function ErrorHandling() Dim errX As DAO.Error Dim Str As String If Errors.count > 0 Then Str = "ODBC Error:" & vbCrLf & vbCrLf For...

Actually change this line: Set myquerydef = mydatabase.CreateQueryDef("qry_SendSQLMail") to: Set myquerydef = mydatabase.QueryDefs("qry_SendSQLMail")