Recent content by AHJ1

You were right. Thanks. Have a star! I made the mistake of grabbing code from a different project without totally proofing it. In this snippet I have a datDue I changed it to a zero. Set rst = qdf.OpenRecordset() If Not rst.EOF Then If Not IsNull(rst(strFieldName)) Then...

Lameid, Thanks for your response. Here's the code to that function. I do have a workaround, but I'd prefer not to use it. Function ReturnSingleFieldData(strQueryName As String, strFieldName As String, _ Optional strParameterName1 As String, Optional varParmValue1 As Variant, _ Optional...

Can someone explain to me why this code works, but it does not work when I uncomment Function GetCountOfRecs() As Integer On Error GoTo err_GetCount Dim strSQL As String Dim intCount As Integer intCount = ReturnSingleFieldData("qryCountOfMyDataAggregated", "CountOfID") 'intCount =...

Simple. Thank you.

Yes. That works. Thank you. I realize that a zero-length string is not the same as a Null. Do you happen to have the code for checking for zero-length strings?

I'm running a query that calls a function. SELECT MyDataAggregated.ID, PutAppealsToNotes1([Appeal_Not_Heard_1],[Appeal_Not_Heard_2],[Exemption_Description]) AS Notes1, PutAppealsToNotes1([Appeal_Not_Heard_1],[Appeal_Not_Heard_2]) AS Notes2, [Notes1] & [Notes2] AS Notes FROM MyDataAggregated...

Ben, Thanks for the alternative. I tried the code and it works.

I knew there had to be a simple solution. Here it is: Sub TestXMLImport() Application.ImportXML _ DataSource:="C:\Data\ImportSBE\HDTestAlan_data.xml", _ ImportOptions:=acStructureAndData End Sub This creates a table called "topmostSubform". I'm not sure why it does this. Now, it...

Hello, I am using Access 2002 and I have about 5,000 forms that were created using Adobe Life Cycle. When someone fills out the form it creates an XML file like this: <?xml version="1.0" encoding="UTF-8" ?> - <topmostSubform> <Name_of_Petitioner>Alan</Name_of_Petitioner>...

Skip, That's quite true. mMogul, why not sort the data, and examine it. Perhaps we really don't have a problem. Alan

I could be wrong, but it seems to me as if you are sorting numbers in text order sometimes. 01 sorts differently than 1 in text. I would try using an import spec, with everything going to a table that is all text fields, and then coercing the fields that contain numbers to numbers. (The...

Hmmm. What would happen if you forced a type conversion? Maybe forcing the number to a long integer. Something like this? [Code] With Application.FileSearch .NewSearch .LookIn = PicPath .FileName = [SOCIAL_SEC] & ".jpg" .Execute Found =...

For other people's reference: http://smallwhitecube.com/php/dokuwiki/doku.php?id=code:vbasoundex

Thanks.

May I suggest that you save the file as a comma separated variable. This allows you to import the data and create an Import Specification. The import spec lets you define the types of data you are importing. Importing certain data as text, double, etc. may be helpful. Good luck.