Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. rbowes

    Import Hidden Excel Sheet

    try this: Private Sub UploadData() Dim wks As Excel.Worksheet Dim wkbk As Excel.Workbook 'here you set get the workbook and set the worksheet to the hidden sheet Set wkbk = GetObject("H:\BulkUpload.xls") Set wks = wkbk.Worksheets("upload") 'Activate the sheet and...
  2. rbowes

    TransferSpreadsheet, can I export a query instead of a table?

    is the query a saved query or a sql statement? If it is a query then you can place the name of the query into the Table argument and it should work. A sql statement requires a little more work. You could create a new querydef and append it to the querydefs collection then use the...
  3. rbowes

    Boolean Fields and MicroSucks!

    The problem might be that the checkbox(I assume that this is a checkbox on the form) is defaulted to Null unless otherwise specified for new record or in an unbound form. I always give a default value to the checkbox, that way it its either true or false and not Null. Just thought I'd add my...
  4. rbowes

    Is there a data bound grid control?

    Yes, its called subform with a datasheet view. I know it isn't very helpful but, after playing with grid controls for some time I've come to the conclusion that the datasheet is the most versitle. You can control its recordsource or load it with a recordset. you can even create it...
  5. rbowes

    Have two forms each of which are ba

    Try this: If the second form is just a "new record" form (to schedule a new date) then I would do it this way. Private Sub cmdSchedule_Click() Dim stDocName As String Dim stLinkCriteria As String Dim caseNum As String caseNum = Me![CASE_NUMBER] stDocName =...
  6. rbowes

    How do I decompile a secured database Access 97

    Try this: Click Start and select Run. Type this into the commandline "C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\MSACCESS.EXE" /decompile "C:\PCL Timsheets\Exeter\TMajor\SecureTimeSheet.mdb" Make sure that you have the correct path to Access and to your database name From...
  7. rbowes

    Prompt 4 SQLS7 Password

    I'm not sure if this helps but what I do is have a local table that holds the names of the SQL Server table Names (as they appear in Access) and their SourceName (table names as the appear in SQL Server) usually they look like this: tableName: dbo_LookupCodes; SourceName: LookupCodes On my...
  8. rbowes

    Yes/No Msgbox default to 'No'?

    Try this Response = Msgbox(msg, vbYesNo + vbDefaultButton2, "Title") That should work Bob [surprise]
  9. rbowes

    Labels - multiple records with same Address

    I have this problem with multiple records with the same address, but different people. I want to save some money on postage, so if I come across two or more records with similar addresses, I want to have it print out with the first names of the individuals, their last name (which will be the...
  10. rbowes

    Memory problems with Access

    Are you holding some of the data in temp tables in the front end? If you are, drop the temp tables as soon as you can and make sure that you compact on close. One thing you might try, and this is only if you wish to revisit how your mdb works, is to scrap your queries and use the sql...
  11. rbowes

    Option buttons

    What is the loop for? Try this: Private Sub fraReport_AfterUpdate() If Me!fraReport.Value = 1 Then Me!BeginningDate.Enabled = False Me!EndingDate.Enabled = False Else Me!BeginningDate.Enabled = True Me!EndingDate.Enabled = True End If End Sub Hope that...
  12. rbowes

    Create one form to add new records to multiple tables

    This may help you, make the form unbound and when the user presses the save button just run a series of "Insert Into" queries. Make sure that you start with the table with greatest priority. With a database application that I am developing, I log donors and donations. I save...
  13. rbowes

    Filtering

    You use AND: Private Sub SolveH_Click() Dim stDocName As String Dim stLinkCriteria As String stDocName = "Issues" If Not IsNull(High) Then stLinkCriteria = "[Priority]=" & "'" & Me![HighF] & "' AND [Status] = 'Open'" DoCmd.OpenForm stDocName...
  14. rbowes

    Using an ActiveX Progress Bar with a query.

    There is a syscmd function that will allow you to use the progress bar that runs during a query. Check out the help file to work with it. The ActiveX ProgBar is really only a distraction - it actually takes resources (memory) away from the query to make it look like there is real progress...
  15. rbowes

    Query criteria has an apostraphe!! what to do?

    Aaron, if you're using Access 2000 you can use the Replace() function. What i do is check my criteria strings for single quotes then replace it with chr(44) which is an apostrophe (single quote is chr(39)) ex: strCriteria = Replace(strCriteria, "'", chr(44)) that works just great...
  16. rbowes

    Display records...

    First, is there a reason that you don't have ID in the second table? Names are easy to duplicate. Anyway, I would use a multicolumn combo with a rowsource set to a SQL statement "Select Name, Field1, Field2, ID from tblProducts, tblData Where tblProducts.[Name]=tblData.[Name]" set...
  17. rbowes

    How to evaluate a combobox to return a value to a field

    I have an idea, but its just like the multi column listbox kind of thing. The Combobox's columncount should be set to 2, columnwidths 1";0". Set the RowSourceType to "Table\Query" and then create a query that will have the medical report choices (maybe a lookup table...
  18. rbowes

    Check Boxes-how to verify for inclusion on report

    Sorry, I said if you want the 3rd column. That's wrong. The listbox columns are zero-based, so the first column is 0 like this: Mylist.column(0,varitm) I'm sorry if I confused you (thank God for debugging tools) Bob
  19. rbowes

    Check Boxes-how to verify for inclusion on report

    Just create a listbox and set its MultiSelect property to Simple or Extended. Simple lets you select more than one value in the Listbox and while Extended allows you to select a range of the listbox's values (ie Listbox row number 1 - 5, 'simple' lets you select rows 1,4,6,7,9 separately.). To...
  20. rbowes

    Textbox Peculiarities

    Try this: If IsNull(Me.Processing_Comments.Value)Or (Me.Processing_Comments.value = "") Then MsgBox ("Please Explain Yourself") End If Hope that helps. Bob

Part and Inventory Search

Back
Top