Search results

  1. Cosmos75

    How to create a variable with the name of a variables content?

    Note to self: Learn to use collections... :D
  2. Cosmos75

    How to create a variable with the name of a variables content?

    DKDiveDude, Interesting question! I'd sure like to know if there is a way to do that. I don't know of a way, but I like as to your idea of an array to do it. You would have to know which array element represents a particular fruit. Or just use a multidimensional array? Dim MyFruits(1 To 3...
  3. Cosmos75

    Access rounds down at a "5" and not up.

    I suggest that you create your own VBA rounding function, to use like you would Round(). It isn't very hard to do, see here for an example.
  4. Cosmos75

    Round up to next $25 increment

    Alternatively, you can create a custom rounding function, to use like you would Round(). See here for an example. You can find multiple examples on this forum as well.
  5. Cosmos75

    Setting up a WIKI - Opinions / Recommendations

    Does anyone here have any experience with setting up a WIKI? I am testing out TikiWiki, seems to be a good one. Any opinions or recommendations? There is more discussion on WIKIs here - http://en.wikipedia.org/wiki/Wiki
  6. Cosmos75

    FREE - Visual Studio (Express Editions)

    Did a search and didn't see that anyone posted on this. Thought I'd share this with you people. Get free Visual Studio Express Editions from Microsoft. http://msdn.microsoft.com/vstudio/express/ Visual Web Developer 2005 Express Edition Visual Basic 2005 Express Edition Visual C# 2005 Express...
  7. Cosmos75

    Passing an array of any data type as an argument to a procedure

    Found the answer. I have to declare the array argument as a VARIANT variable, not as a VARIANT array. Sub DebugPrintArray(AnArray As Variant) Dim i As Long For i = LBound(AnArray) To UBound(AnArray) Debug.Print "AnArray (" & i & ") = " & AnArray(i) Next i End Sub
  8. Cosmos75

    Passing an array of any data type as an argument to a procedure

    I have the following code. Sub CreateArray() Dim lngArray(1 To 10) As Long Dim i As Long For i = LBound(lngArray) To UBound(lngArray) lngArray(i) = i Next i DebugPrintArray lngArray() End Sub Sub DebugPrintArray(AnArray() As Long) Dim i As Long For i = LBound(AnArray) To UBound(AnArray)...
  9. Cosmos75

    Vass' birthday

    HAPPY BELATED B-DAY, Vassago!! :) Sorry I'm late!! :o
  10. Cosmos75

    Someone has hacked the forum :(

    I'm sorry to hear about the hijacking. What a loss... :mad: I've been awhile for quite some time. I will do what I can to put back the samples I had before once the sample forums is set up again. I owe a lot to this site and its members. My start in learning and using Access is here.
  11. Cosmos75

    Adding Records Only On Button Click?

    I've got a sample here that deals with adding records only when the ADD button is pressed. It also demonstrates how to deal with confirming edits to controls (bound to a field) and the entire record. Link to sample is at the end of the article.
  12. Cosmos75

    Input Validation

    I cooked up a sample that deals with confirming edits to fields (i.e. controls) and records on a form. If would be easy to add data validation to it once you understand using the BeforeUpdate events (Form and Control). See the article here. A link to the sample file can be found at the end.
  13. Cosmos75

    Rnd not very Random

    AN60, You can just just use the Randomize statement by itself. Randomize Another common practice if to use 0 or the Now() function Randomize (0) Randomize (Now()) I've got some sample code for generating a random whole number between two numbers with some explanation, see here.
  14. Cosmos75

    Review - Table Design - Meter Reading / Adjustments

    Thought it might help to show the SQL for the queries to clarify what I am after. Version 1 qryPrevReadings SELECT MeterReadingID, dtMeterReading, MeterID, FuelID, dblMeterReading FROM tblMeterReadings; UNION SELECT MeterAdjustmentID, dtMeterAdjustment, MeterID, FuelID, dblMeterReadingOLD...
  15. Cosmos75

    Review - Table Design - Meter Reading / Adjustments

    I am working on a database to keep track of meter readings from several meters. Am at the table design stage and have come up with two seperate table designs but am wondering what would be best. Each individual 'Meter' tracks more than one 'Fuel'. All of the regular meter readings should...
  16. Cosmos75

    Possible?? - Use DAO to loop though back end file properties

    Is there a way using DAO to loop through the back end files and get the path/file name infomation? I know that I can accomplish the same thing by using a SQL string and recordset and parsing the 'Database' field SELECT Database FROM MSysObjects GROUP BY Database, Type HAVING Database Is Not...
  17. Cosmos75

    Problems - Main report with subreport

    With a little more searching, I found the answer!! - http://www.access-programmers.co.uk/forums/showthread.php?t=49754 But since I need to repeat the header section of the field that the subreport is linked to, the subreport would repeat together with the header section did. So, what I did...
  18. Cosmos75

    Problems - Main report with subreport

    I have a report that contains a subreport. The subreport will open on its own fine. But the main report won’t open unless I remove the subreport. Or at least, I wasn’t patient enough to wait for it to open. The progress bar goes straight to 100% then nothing happens, even after 10 mins...
  19. Cosmos75

    Extracting field name from argument...

    Query Field - Pass Name & Value to Function I am interested in this too! Did a search on Google and it actually found this thread. Currently I have a field that stores a string that represents a formula. The formula will contain names of fields in a table. In order to calculate a value in...
  20. Cosmos75

    String is valid range - return Lower & Upper boundary

    Bat17, Thanks! DoH! Why didn't I think to do that? :o I actualy started out with something like that but for whatever reason, I went another route. Been working 8 hours/day non-stop for the last few weeks on my latest project and my brain is starting to turn into mush.... Final code...
Back
Top Bottom