Search results

  1. L

    Export to Excel

    I am exporting a query to excel using: DoCmd.OutputTo acOutputQuery, "QueryName", acFormatXLS, , True The issue is that one of the fields is a memo field and the data is being cutoff. There is no order by or group by on the query. I found one post that said to get around this issue use...
  2. L

    ODBC Call Failed

    I finally got it to work. The method I was using at first which was a different post on this forum said to: field = forms!search!cboCase OR forms!search!cboCase is null show = uncheck criteria = true Instead I set: criteria = forms!search!cboCase OR forms!search!cboCase is null Here is...
  3. L

    ODBC Call Failed

    That doesn't work either. Probably because the field is an int. What I am trying to do is return all records where CaseID = cboCase. However, if the user does not pick a CaseID from the first combo box (cboCase) it will show all of the records in the second combo box (cboBuyers). The query...
  4. L

    ODBC Call Failed

    Using Access 2003 and SQL Server 2005. The Access database uses linked tabled to the SQL Server. I have a 1 table query where I am trying to return data for a search form. Here is the query: CaseID = Forms!Search!cboCase This works fine. However, when I try to get the query to return all...
  5. L

    Update Query

    I figured it out: In the update query: Len(Val(Right$([DocID],Len([DocID])-InStrRev([DocID],".")))) = 3 Then [DocID] + "0"
  6. L

    Update Query

    In Access 2000 I have the following: Table: tblDoc FieldName: DocID I need to run an update query that will change the format of the values in the DocID field to add a zero on the end if the number to the right of the decimal is only 3 digits. The number of characters to the left of the...
  7. L

    Formula Editor/SQL

    I think you mean to do the following (if not, I apologize): Create a formula for example called Margin = (Test_txt.DeliveredQuantity/Test_txt.OrderedQuantity) * 100 You want to switch delivered and ordered around from what you did if you are trying to figure out the percentage delivered...
  8. L

    How to use Crystal reports in Access application.

    On the access form insert the active x control called Crystal Reports Control. I usually change the name of the control to CrystalReports (go to properties on the control and go to the Other tab). After you insert the active x control on the form type the following code on whatever event you...
  9. L

    How to use Crystal reports in Access application.

    On the access form insert the active x control called Crystal Reports Control. I usually change the name of the control to CrystalReports (go to properties on the control and go to the Other tab). After you insert the active x control on the form type the following code on whatever event you...
  10. L

    Oh the Places You'll Go

    Europe: Brussels Rome Venice Vienna Munich Paris Caribbean: Jamaica (got married there last May) Bonaire Mexico & Canada: Border towns via Texas, Arizona, and Detroit Michigan (not sure if that counts) US: California Colorado (great skiing) New York Chicago Orlando (Disney World &...
  11. L

    Parse Data

    I have the following sample data: LON09844 NUOS00101 NU-U00092 I am trying to subtract one from the end number. The following code worked until I realized not all of the number sequences began with 0. NewField: Left$([BegBates],InStr(1,[BegBates],"0")-1) &...
  12. L

    Dcount Error

    Thank you . . . yes you were right the field is a text field. I did have to change your line of code slightly to: DCount("[MobileNumber]", "tblMobileNumber", "[MobileNumber]='" & Me.txtMobileNumber & "'") Otherwise I kept getting the same error. Thanks for the help!
  13. L

    Dcount Error

    I have a form where a user can add a new record. I am trying to prevent duplicate records from being entered with the following code: If DCount("[MobileNumber]", "tblMobileNumber", "[MobileNumber]=" & Me.txtMobileNumber) > 0 Then MsgBox "The mobile number " & Me.txtMobileNumber & " is already...
  14. L

    Create an autonumber field

    Pat, I understand what you are saying but unfortunately that doesn't work with the way the users want the data stored. The reason the ID field is a combination of the year and an ID is because they use the same ID over year after year. For example, 2003001 and 2004001 refer to the same...
  15. L

    Create an autonumber field

    Basically 2004002 is the last record prior to 20049?? so I want the new record to be 2004003. I am thinking that I might be able to something like: New ProjectNumber will be max ProjectNumber less than 2004900 plus 1. In any given year the ProjectNumbers should never reach 2004900 so I can...
  16. L

    Create an autonumber field

    I have searched the forum and haven't been able to find the exact solution to my problem. I need to create a primary key field that is an autonumber field; however, I need to generate the field via a different means that the datatype = autonumber. The reason I need to do this is as follows...
  17. L

    Keep focus on current record

    I haven't had any issues per say with updating data in a table via a form based on a stored procedure as long as I set the unique table value and resync command if there is more than one table in the stored procedure. Seems like I struggle with all of the bugs though that exist in Access 2000...
  18. L

    Keep focus on current record

    Pat, Trying to play catch up here I guess . . . why must the form be unbound if the record source is a stored procedure?
  19. L

    Keep focus on current record

    The form's record source is already a stored procedure that joins the main table to several tables. However, the other fields won't poplulate until I save the record and requery.
  20. L

    Keep focus on current record

    OK I have fixed the prior error with the following code: Rim rst As Object Dim strCriteria As String DoCmd.RunCommand acCmdSaveRecord Set rst = Me.Recordset.Clone strCriteria = "CheckItemID = " & Me!CheckItemID Forms!frmCheckInfo!sbfCheckItem.Requery rst.Find strCriteria Me.Bookmark =...
Top Bottom