Recent content by MikeAngelastro

Dim Average as Double Dim A$ as String Open "Grades.txt" For Input As #1 Do until EOF(1) Line Input #1, A$ Average = ParseAndAverage(A$) Loop Then write a function to parse and return the average of each A$.

Hi, Keybd_event VK_SNAPSHOT, 1, 0, 0 The code above should copy only the active window. Instead it copies the whole screen. Changing the "1" to a "0" provides the same result. When I press Alt+PrtScr on the keyboard, it works properly. I have Windows 2000 Server. Any...

Hi Brian and Cornerstone,<br><br>First, I did not misspell &quot;caption&quot; in the code - only in the message.<br><br>Second, here is my grand scheme:<br><br>I am running a report that runs for any of a number of countries.&nbsp;&nbsp;My objective it to print the reports to Adobe Acrobat...

Hi,<br><br>I need to be able to run a report multiple times.&nbsp;&nbsp;However, I need to have a different caption each time I run it.&nbsp;&nbsp;How do you change the caption property of a report with code without opening it.&nbsp;&nbsp;<br><br>The helper suggests that a report is in the...

Will5,<br><br>If the date field is from a query or a table, format the field as a short date.&nbsp;&nbsp;Then I believe the export will pass date without time.<br><br>Mike

Pance,<br><br>Try creating a table containing Batch numbers and a date.&nbsp;&nbsp;The batch number could be an autonumber. You can start it from any number you want.&nbsp;&nbsp;When it is time to do a new batch number, just append Now() to the batch number table.&nbsp;&nbsp;Then run a summing...

Kathryn,<br><br>Thanks for your help.&nbsp;&nbsp;I am aware of the ways you had suggested.&nbsp;&nbsp;I was merely wondering if there was a way to do it directly&nbsp;&nbsp;- in a query.&nbsp;&nbsp;I was thinking that, since the row number is available running a SQL statement in code, perhaps it...

Hi,<br>I would like to include a rank field in a query that sorts descending. I believe the row number would be equal to the rank. For instance, in a query listing in descending order of revenue generated the top 10 sales people, the sales person at the top of the list would be ranked 1, the...

Thanks jgarnick!!<br><br>Thanks for your question.&nbsp;&nbsp;It showed me how to calculate rank in a report that lists perhaps the top 50 sales people.&nbsp;&nbsp;The person at the top of the list will have a rank of one, the second a rank of two, etc.&nbsp;&nbsp;I just added a test box, set it...

Thanks from me too. :-)

Use the following code:<br><br>Option Compare Binary<br>Option Explicit<br><br>'Attribute VB_Name = &quot;basDatabasePassword&quot;<br>'--------------------------------------------------<br>'&nbsp;&nbsp;&nbsp;basDatabasePassword<br>'<br>'&nbsp;&nbsp;&nbsp;Get the database password of a Jet...

Hi,<br><br>If you go Microsoft's knowledge base, there are a few articles on getting Access 97 and 2000 to work on the same machine:&nbsp;&nbsp;&nbsp;Q241141, Q218861, Q141275 ,Q220914, Q220885, and Q235280.<br><br>Mike

Use the Randomize statement. See below.<br> <br> Randomize Statement<br> <br> Initializes the random-number generator.<br> <br> Syntax:<br> <br> Randomize [number]<br> <br> The optional numberargument is aVariant or any validnumeric expression.<br> <br> Remarks:<br> <br> Randomize uses number...

Hi,<br> <br> If one must use unbound forms, etc., in Access to interact with Oracle or SQL Server, would there be any advantage to using Access? Why not use VB6 if it is available?<br> <br> Just asking. :-)<br> <br> Mike

Lanie,<br> <br> I wrote the following function for names. It has worked well so far.<br> <br> Mike<br> <br> Public Function MixCase(ByVal strTextIn As String) As String<br> 'This function returns a string where<br> 'the first letter of each word is upper case and<br> 'the rest of the letters of...