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 Rhinorhino 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: *

  • Users: davyre
  • Content: Threads
  • Order by date
  1. davyre

    avoid error 2220

    Hi, I have a piece of code to display a picture in an Access Form. Here's the code: http://tek-tips.com/threadminder.cfm?pid=701 Dim UnitID As String UnitID= Me.UnitID.Value If IsNull(UnitID) = False Then Me.ImageBox.Picture = "E:\User\USER\Database\Unit Pics\" & UnitID & ".png" Else...
  2. davyre

    INSERT INTO query not doing its job

    Hi, I have an append query to insert some data into a table from ms excel. Heres the code: Dim partNum As String Dim desc As String Dim Material As String Dim cost As Long Dim vendorPartNum As String Dim VendorID As Long Dim ctr As Long Dim xlLine As Integer Dim allBlank As Integer Dim...
  3. davyre

    help with HAVING clause in a query

    Hi, I have a query to show all orders and its units that is still "Pending". Here is the query: SELECT TblCustOrderUnit.OrderID, TblCustomer.CustomerName, TblCustOrder.PONumber, TblCustOrder.JobName, TblCustOrder.CustomerUDD, TblUnits.UnitName, Count(TblCustOrderUnit.UnitID) AS Qty...
  4. davyre

    Help with logic/algorithm for Excel Data table

    Hi, In Access I have query to display top 5 units sold each year. I put those in a recordset, and I want it to be placed in the excel file that I wanted. The problem is the structure of a recordset is different with data table in Excel that I need. It is being used as data source for Bar Graph...
  5. davyre

    total sales each year query help

    Hi, I have a table Sales, I want to have a query to display total sales in each year.. The table is like this: |OrderID|OrderDate|CustomerID|Comment| |1 |1/1/2011 |12 | | |2 |5/1/2011 |13 | | ... |600 |1/12/2013|5 | | How can I get...
  6. davyre

    using docmd.findrecord for name index list

    Hi, I have an index list in my form (A-Z) for quick search on CustomerName field, think of it as quick scroll on iPhone Contacts but this one you have to click on each alphabet instead of swiping the screen. So this listbox has A-Z and what I want is if user click on letter C, it goes to record...
  7. davyre

    Database become error when sending email

    Hi, I have a button which sends email. The problem is whenever I clicked the button, and it finishes, then the database become error in terms of a textbox in every form which has Date Picker, it stopped working. I cannot fill the textbox using the date picker anymore (either a click on a...
  8. davyre

    schedule output to excel

    Hi, I am new to MS Project, and wondering if it is possible for me to get output of a list/schedule for every resources(people) I already created report "Who Does What When", but I need more detail than this I need a real schedule, like | | Mon 8 Jul | Tue 9 Jul |...
  9. davyre

    automatically send email after a set of time

    Hi, I dont know if it is possible but can I program a code to send an email automatically (without using Outlook) when an order status has been changed to "Ready"? So in the Order form, when the Status textbox value="Ready", it will start countdown on for example 5 days after that, and it will...
  10. davyre

    cannot change row source in listbox

    Hi, I have encountered several issues regarding the row source of a listbox. For example in my current listbox, it has row source like this: SELECT TblCustOrderUnit.OrderUnitID, TblCustOrderUnit.OrderID, TblCustOrderUnit.UnitID, TblUnits.BSUnitID, TblCustOrderUnit.CompletionDate...
  11. davyre

    Slash/backslash in directory causing error

    Hi, I have code like this: Set objSheet = objExcel.Worksheets(1) saveDir = "C:\Users\User\Desktop\" & UnitName & "-" & PONum & ".xlsx" objBook.SaveAs (saveDir) note that UnitName and PONum are string variables. This code is a piece of code from a button that will create a new Excel file...
  12. davyre

    add value to existing Excel file

    Hi, I want to create a button in a form to 'edit' an existing Excel file, that is to add something (a variable's value from a table in Access) to a certain cell in the Excel file. I do not want the VBA to overwrite the Excel file because it will scrape all the existing data from the excel, but...
  13. davyre

    Displaying pictures to Excel file output

    Hi, I have a database file named UnitPics that stores pictures of many units, and I have linked that table to the main database file. Now, in the main database file I have created a button to export some data to Excel file output. Here's the code: Private Sub PictOne_Click() Dim objExcel As...
  14. davyre

    Help with IF clause not working properly

    Hi, I have this code Dim ctr As Long Dim oldRowSource As String Dim newRowSource As String Dim listValue As Long Dim unitID As Long oldRowSource = "SELECT TblCustOrderUnit.OrderUnitID, TblCustOrderUnit.OrderID, TblCustOrderUnit.UnitID, TblCustOrderUnit.SerialNumber FROM TblCustOrderUnit;"...
  15. davyre

    add WHERE clause in row source query of a listbox

    Hi, I have a listbox that is populated using this query (the row source) SELECT TblCustOrder.CustOrderID, TblCustOrder.CustomerID, TblCustomer.CustomerName, TblCustOrder.PONumber, TblCustOrder.JobName, TblCustOrder.CustOrderDate FROM TblCustomer INNER JOIN TblCustOrder ON TblCustomer.CustomerID...
  16. davyre

    error handler causes access to not responding

    Hi, I have this code: On Error GoTo errHandler --- exporting to Excel --- Exit_Sub: Set rst = Nothing Set objSheet = Nothing Set objBook = Nothing Set objExcel = Nothing Exit Function errHandler: Resume Exit_Sub end function so basically in this code, I am trying to create a report in...
  17. davyre

    problem with adding days to a date

    Hi, I have a field named OrderDate, which the user inputs Short Date (dd/mm/yyyy) from a textbox (DatePicker enabled). Now in some condition, another field named CustomerUDD is empty (not specified/intended to be left blank). Now I am creating a button to fill the blank CustomerUDD to add 30...
  18. davyre

    help with logic

    Hi, I have a table called tblReport(CustName,Item,Qty) -> just an example roughly this is the look inside the table |CustName |Item |Qty | |A |ab |1 | |A |pq |1 | |A |zz |2 | |B |qwe |1 | |B |zz |1 | now I want that table to be...
  19. davyre

    help with control source

    Hi, I have 2 textboxes on a report named CUDD(Customer UDD) and CDate, and in the CDate control source I put code: =Nz([CUDD],DateAdd("d",30,[CUDD])) basically it looks for CUDD textbox, if it has a value then show CDate its value, if CUDD empty then I want to show date+30 days to CDate...
  20. davyre

    error: No Current Record

    Hi I have a query that goes into a recordset: LSQL2 = "SELECT TblUnits.UnitID, TblParts.PartNumber, TblParts.PartDescription, TblParts.Material, " & _ "TblUnitPart.Qty, TblParts.PartCost, TblParts.VendorPart, TblVendor.VendorID, " & _ "TblVendor.VendorDesc...

Part and Inventory Search

Back
Top