Search results

  1. Pyro

    Autoexec and command line parameters

    You have a bunch of options in front of you. Here are a couple that immediately sprang to mind. 1. Each PC should have a separate copy of the FE, therefore each FE has its own Autoexec macro. Modify the two separate versions such that they each perform the separate tasks required. 2. Run your...
  2. Pyro

    Auto sizing fields together

    X1 and X2 are the distance from the left edge as you noted. You can redefine them after each line is drawn and draw a new line. Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) Dim X1 As Single, Y1 As Single Dim X2 As Single, Y2 As Single Dim Color As Long ' Specify unit of...
  3. Pyro

    Import Error in BE/FE Scenario

    It might seem obvious, but does tblBoQ contain a natural PK that is imported with your data? If that is the case, did you import the data, split the database, try to import the same data again and at this point get the error? i.e. the data you are trying to import is already in the database?
  4. Pyro

    Export to Excel for quotes

    It is entirely possible to output the data as per your template, but it will be quite a bit of work to get the formatting as you want it. Here's a code snippet to get you started. 'Function to export query to excel Public Function Query_Excel(strQry_Name As String, strSheet_Name As String)...
  5. Pyro

    Want to print Value List results

    The intPrintCounter value was not being reset. I have adjusted a few things - added basic error handling. See attached.
  6. Pyro

    Union Query: one field repeated, 18 fields stacked

    It seems as though your MasterCarton table has not been normalized. I would advise looking into that before going down the path of union queries. That said: SELECT MasterCarton.[CartonID], MasterCarton.[SN:1] FROM MasterCarton UNION ALL SELECT MasterCarton.[CartonID], MasterCarton.[SN:2] FROM...
  7. Pyro

    Want to print Value List results

    Victor, As already suggested, writing the value list data to a table would be the simplest approach. As they say though, "there is more than one way to skin a cat". Attached is a database demonstrating another method. Basically, the value list of your listbox is passed as openargs into a...
  8. Pyro

    Problem With Date Parameter Not Used

    Yep, that works too if Text136 is unbound and not checked for a valid date entry, then your user might enter some other value by mistake. So switch IsNull for IsDate. strCrit17 = "[Term_Date] " If Not IsDate(Me!Text136) Then strCrit17 = strCrit17 & " " & Me!Combo132 & "#" & Me!Text131 & "#"...
  9. Pyro

    Problem With Date Parameter Not Used

    Sorry State90 - little kids running around my feet here causing much distraction! If IsNull(Me!Combo132) Then strCrit17 = "([Term_Date] > #1800# Or Not IsDate([Term_Date]))" Else strCrit17 = "[Term_Date] " & Me!Combo132 & "#" & Me!Text136 & "#" End If
  10. Pyro

    Problem With Date Parameter Not Used

    If it were me, i would follow spike's suggestion and string together the criteria only where the criteria exists, that way you don't need to worry about scenarios like this. dim strWhere as String If isDate(txt) then strWhere = strWhere & ... Else 'Ignore End If etc... For getting the job...
  11. Pyro

    Riddle - On Current depends on column

    It is working correctly for me in the attachment from my previous post. No matter where i click in the new row, nor which row i am clicking into the new row from, move up is always disabled. I have attached an AVI recorded in Snagit demonstrating my results.
  12. Pyro

    Problem With Date Parameter Not Used

    Are you trying to return values where there has not been a date entered for that record? If so: strCrit17 = "[Term_Date] " If IsNull(Me!Combo132) Then strCrit17 = "Not IsDate(" & strCrit17 & ")" Else strCrit17 = strCrit17 & " " & Me!Combo132 & "#" & Me!Text136 & "#" End If
  13. Pyro

    Riddle - On Current depends on column

    See Attached.
  14. Pyro

    Riddle - On Current depends on column

    Sorry, the line above it has the same issue. My fault for only glancing quickly.
  15. Pyro

    Riddle - On Current depends on column

    This line: Me.cmdMoveUp.Enabled = Not Me.CurrentRecord = 1 And Not Me.CurrentRecord > Me.Recordset.RecordCount Evaluate the recordcount first. Dim L as long With Me.RecordSetClone .MoveLast L = .RecordCount End With Me.cmdMoveUp.Enabled = Not Me.CurrentRecord = 1 And Not Me.CurrentRecord...
  16. Pyro

    how do you charge for the design of a database?

    One thing i would add if you go down the road of providing a fixed price is to provide a detailed proposal/quotation. I itemise every data entry point (form, automated import etc), as well as every output (report, data export, automated email etc) and make it very obvious that the quoted price...
  17. Pyro

    Many 1:1 tables? Or...

    Thanks everyone for your input. Spike, that link was very interesting and google offered a ton of additional info on the EAV model. Doc, your response heads down this path as well and is inline with option #2 from my OP. So far this is how i am mapping it out: tbl_Project stores data specific...
  18. Pyro

    Many 1:1 tables? Or...

    The thing that irks me most about the above scenario is that i would need to present the questions in a continuous form or datasheet, meaning i couldn't have some of the more simple answers limited to the results of a combo box...
  19. Pyro

    Many 1:1 tables? Or...

    The subset of result data could really be anything. Some examples: - A description of the site where a sample was taken. - The depth (in metres) under water where a sample was found. - The abundance of females in a specific area. - Whether X characteristic was present. - ... So the value could...
  20. Pyro

    Many 1:1 tables? Or...

    Hi. I am working on an application that records project result data. Most of the database has been mapped out and is relatively straight forward. However, each project has its own unique subset of result data, somewhere between 2 and 15 intrinsic fields. Currently there are 15 projects. And it...
Back
Top Bottom