Recent content by PROXI

You are my hero. It worked like a charm! Thanks, PROXI

Can you please elaborate on what you mean. I am unsure where to alter the code to get to those results. Thanks, PROXI

If I make only one selection from the listbox the SQL works perfectly. If I make multiple selections, it pulls everything (I.E. As if you didn't put in any criteria for strWhere). Any help would be really appreciated. Private Sub CmdExport_Click() On Error GoTo Err_CmdExport_Click Dim...

Alright... Sorry for the delay in responding. I had other projects that pushed this one to the side. Thanks PHV for finding the missing ". The code worked, but then I found that I didn't have one of the fields in the code. This is what I have now, but it is giving me a "Type Mismatch" Error...

I have a similar statement that I can't get to work either :( any help on this one PHV? :-D StrSQL = "INSERT INTO 222 ( Field2, Field3, Field4 ) " & _ "SELECT Sum(a.DOLLAR_AMT) AS Field2, b.TRUST, a.PROCESSED_DATE " & _ "FROM...

Thanks PHV... I modified it a bit, but your suggestions made it work perfectly :) Here is what I ended up with. I added a textbox to the my form that pulls in the DMax of the table on form load to give me a starting point and just have it run through today. Thanks again :) Private Sub...

StrSql = "INSERT INTO ForfTest ( CASE_SEQ_ID, PROCESSED_DATE, TRNMSTR_SEQ_ID, AMOUNT ) " & _ "SELECT PUBLIC_PPAK_ACCT_ACTIVITIES.CASE_SEQ_ID, PUBLIC_PPAK_ACCT_ACTIVITIES.PROCESSED_DATE, PUBLIC_PPAK_ACCT_ACTIVITIES.TRNMSTR_SEQ_ID, PUBLIC_PPAK_ACCT_ACTIVITIES.DOLLAR_AMT AS Amount " & _...

I'm retarded. Had the "If" statement set to <> instead of =. If Nz(Me.PPA_NBR, "") & "" = "" Then MsgBox "Please input an administrator number", vbOKOnly, "Input Error" GoTo Command10_Click_Exit Thanks, PROXI

Hello, I have been trying to get this code to work for me and I just can't seem to get it to work right. It appears that the code is just skipping over my first "If" clause and going straight to the sql. Any help would be greatly appreciated. Private Sub Command10_Click() Dim strSQL As...

I always hate it when someone solves a problem and doesn't share the way they did it to help anyone else that may have that same problem. I figured a way of doing it that is much simpler than any other form of the running sum I could find. The best part is that it doesn't involve making...

Hello everyone, I am trying to do a running total in my report. I have no problem with the running sum in the detail section of the report. The problem that I am running into is that I want to have a starting point. I have a textbox in the header that has a value in it that is pulled from...

I figured it out. I always hate when people solve the problem and don't put the code that finally did it for later people to use. Here is how I have completed my problem. I set the control source of my unbound textbox to be: =DLookUp("File","Tblfile") And here is my code behind on the form...

Alright... I ended up finding a simple way to retrieve the value of the for my textbox using Dlookup() to pull the value into the texbox. I am trying to use an SQL update statement to put the value of the import file into the table I am using. What am I doing wrong here?!?!?!?!?!? Private...

Alright... I got it to work with a bit of trial and error. The problem that I am running into is that it is pulling the file name of the first file imported and not the last file imported. Here is what I have now: [cod] Private Sub bImportFiles_Click() On Error GoTo bImportFiles_Click_Err...

Alright... What is the best way to go about doing that. I would need it to just overwrite the data that is in the table each time since I just need the last file name. Thanks, PROXI