Search results

  1. WineSnob

    The Dreaded NULL assign 0

    I am using a form to provide arguments to code to fill a table. How can I assign 0(zero) to a field where it is null else use the value in the field. Here is the field I am trying to assign. cDIOverB1 is the variable ![Desired Income Override] = IIf(cDIOverB1 = "", 0, cDIOverB1)
  2. WineSnob

    "Object doesn't support the property or method"

    I think it is an Access 2010 issue trying to use OLE. I am going to try API instead.
  3. WineSnob

    "Object doesn't support the property or method"

    I am getting an error: "Object doesn't support the property or method" using the following very reliable code. It errors on CDlg1.DialogTitle = "Select File in Folder" The only difference now is I am using a Win 7 64bit. I added Comdlg32.ocx to the WOW64 folder and registered it. It is in...
  4. WineSnob

    Question Attachment control on form

    Can the attachment control store the attachment on a hard drive and not embed in Access? I created a db with this feature and now the db size is reaching 2 GIG . It is the attachments. If I remove the attachment field in the table it shrinks to 55mb. I thought the attachments was just a link to...
  5. WineSnob

    Loop not looping correct # of times

    I'll give that a try.
  6. WineSnob

    Loop not looping correct # of times

    Thanks. I am actually writing the values to a table. What is the syntax to select iYears between two years. If iYear = EndBucket1Year < EndBucket2Year Then What I want is for income in the table to be YR 1 = 5000 Yr 2 = 5000 YR3 = 5000 Yr4=5000 YR5=5000 YR6=5000 YR7=5970.26 YR8 =5970.26 YR9...
  7. WineSnob

    Loop not looping correct # of times

    I am trying to get a currency amt for a number of years. The amount will change based on the year. The code only loops thru the first 6 years (which is the (nbucket1duration). Why doesn't it continue until (nProposalYears). Here is the code with testing code at the bottom. Function...
  8. WineSnob

    Case Select problem

    Thanks VilaRestal !!!
  9. WineSnob

    Case Select problem

    The End Select is at the very bottom just before End Sub. Thanks for the tip on the # for the code. I never knew that. Sub FillAnnuity(nProposalID As Long, nAnnuityYearsLife As Integer, cInitial As Currency, nRORGB As Double, _ nAnnuityID As Integer, nIntType As Integer) Dim rst As Recordset...
  10. WineSnob

    Case Select problem

    I get an error " Case without Case Select" on the Case 0 line in the following code. If I change the Case 0 to Case Else I get the error "Case Else Outside Select Case". Is it because of the End If's ? ? nIntType will only be 1 or 0. Sub FillAnnuity(nProposalID As Long, nAnnuityYearsLife As...
  11. WineSnob

    Show or Hide image based on value

    Thanks AGAIN Paul. You're the best!
  12. WineSnob

    Show or Hide image based on value

    I am trying to show or hide an image based on the detail records value. I want to show a Green up arrow image If Me.IncomeFromActual > Me.EstIncome or show a Red Down Arrow If Me.IncomeFromActual < Me.EstIncome. The actual report has 15 records and some should show red arrow and some should show...
  13. WineSnob

    For Next Loop ingores first loop

    Thanks Paul and Sean. I got it to work by adding If nYear > 1 Then GB = nextStarting * (1 + nRORGB) nextStarting = nextStarting * (1 + nRORGB) End If
  14. WineSnob

    For Next Loop ingores first loop

    I removed the writing to the table part of the code when I first posted to simplify. It is in the db attached though. I need to write to a table because I need to store them and compare them to Actual values later.
  15. WineSnob

    For Next Loop ingores first loop

    Thanks guys. See attached db. I expect the table to get filled in with Year1 GuaranteedBase with 309783.8552 Year2 GuaranteedBase with 328370.886512 Year3 GuaranteedBase with 348073.13970272 Is it when it gets written to the table?
  16. WineSnob

    For Next Loop ingores first loop

    The NextGB is for the next year not the current year. nYear: 1 NextGB: 309783.8552 This is starting value for year 2 nYear: 2 NextGB: 328370.886512 This is starting value for year 3 nYear: 3 NextGB: 348073.13970272 This is starting value for year 4
  17. WineSnob

    For Next Loop ingores first loop

    I am trying to create a table with each year values. I am not geting the 1st year calculation correctly. I think It has to do with where the End If is or I am setting the nextStarting value wrong. Using the test code at the end of this post - I expect year 1 to be 309783.86 and year 2 to be...
  18. WineSnob

    Loop Thru Table and ADD field values?

    Thanks AGAIN!. I guess I looked at too long and could not see the obvious.
  19. WineSnob

    Loop Thru Table and ADD field values?

    I guess it is a Windows 7 thing or my new computer. Here it is from my old XP. Thanks Much
  20. WineSnob

    Loop Thru Table and ADD field values?

    Here it is all stripped down. Just the Table and the Module. I am using Function TestGetDesiredIncCalc() GetDesiredIncomeTotal 1001, 6, 10 End Function to test the function. Actually the value of the Desired Income is a monthly amount and must be multipled by 12 to return an Annual Desired...
Back
Top Bottom