I would have thought this was easy, but I keep getting an error.
I have a form with a save button. When the save button is clicked, I want it to check if user has attached an OLE object to a bound object frame. If they have, I'd like a checkbox to be true.
Here's the code I tried:
If Attachment.LpOleObject = 0 Then
Attach.Value = False
Else
Attach.Value = True
End If
This seems so incredibly straight forward and it does work if there is an attachment. If there isn't I get the message that my database can't retrieve the value of this property.
I have been trying to solve this problem for two weeks and am almost tearing my hair out! I have attached a scaled down version of the database I am working in - could some kind person have a look at it and help me, please?
I am trying to make a combo box on my form that will allow me to click on the CID (CustomerID) field, let me click on my customer, and have the rest of the fields filled in automatically.
I have followed the instructions in 'Step by Step - Microsoft Access 2000' to do this, but although it shows the fields, I can't actually select them on the form....
I have a button that when pressed it checks a specific file for documents with the same name (example: Test, Test 1, Test 180, ect...)
Code: Dim StrFile As String StrFile = Dir("C:UsersJohnDesktopTest*test*") Do While Len(StrFile) > 0 Debug.Print StrFile MsgBox StrFile StrFile = Dir Loop
The problem with this is if there are 2 files with Test (Test, Test - Copy) It gives me 2 separate message boxes. The first with Test. Then a second message box with the second file, Test - Copy. I want to combine both of the message boxes in to one. So the message box would look like:
halloo everybody Here is my code to check an excel sheet wether it is open or not. It is working good in the following situations.
1.if the excel file is not yet opened. then it is opening and bringing a value from some cell of the sheet1. 2.If the file is already opened and not yet closed. it is not opening again it is understanding that the file is already openrd and bringing the cell value. 3.It is working when it is closed by the user and again clicked the button to open. It is opening and bringing the value. 4.NOW the problem starts. IT IS NOT WORKING , If I click the button again to open. It is opening another copy of the same file. I did't understand why is it working perfectly? before I close the file and not working if I close the File.
please kindly check my code and respond to me . here is my code but it is not working when the file is already opened.
Private sub Cmd_Click()
Dim XL As New Excel.Application Dim wbk As New Excel.Workbook Dim ws As New Excel.Worksheet
WorkBookName = "Book2.xls" If Not WorkbookOpen(WorkBookName) Then chk = 1 Set wbk = XL.Workbooks.Open("C:Dokumente und EinstellungenKiran KarnatiDesktopEXCELBook2.xls") Else Set wbk = Workbooks(WorkBookName) End If
Set ws = wbk.Worksheets("Sheet1") If chk = 0 Then With ws Label48.Caption = .Cells(1, 2).Value .Cells(1, 3).Select End With Else With ws Text49.Value = .Cells(1, 2).Value End With End If XL.Visible = True
Set SA = Nothing Set XL = Nothing Set wbk = Nothing End Sub _________________________________________________
Function WorkbookOpen(WorkBookName As String) As Boolean 'Returns TRUE if the workbook is open WorkbookOpen = False On Error GoTo WorkBookNotOpen If Len(Excel.Workbooks(WorkBookName).Name) > 0 Then WorkbookOpen = True Exit Function End If
My database is to track customer incidents. Can anyone tell me if my relationships look ok? I'm a remedial access user to any input would be appreciated. Thanks in advance for the help.
Okay, my boss gave me this killer project and I just have a brief question to see if anyone thinks I can do this.
Right now, I have a database for business card management.
I have 2 tables
1)Contact Info - Has various contact info fields 2)Business Card Table - Have 2 fields, CardID and Card (field is OLE object to attach business card to the database.
I have the CardID field in a relationship with the same field in Contact Info.
I have 2 questions:
1) I am using Access 2000, and would like to know if there is a way to allow the OLE field to be a jpg attachable field. I did not see it as an option, only .bmp Cry
2) Is there a way, that when I pull the information up in a form, it can display the attached business card that is attached to the database?
As shown in the attached database, I have a multiple criteria query with a front end (see frmIssue). I am trying to add a keyword search on the field 'Issue' by having an unbound textbox in frmIssue and linking it with a 'Issue' field in the query 'MyQuery'.
An example search would be looking for an issue with the keyword 'misfiring' in project 'A'.
However, having tried the Like expression on the field 'Issue' a few times, I'm still having trouble making it work. Any suggestions would be greatly appreciated!
I have found an example of a search form that I really would like to replicate, but I'm have no idea how to implement it into my database. i have attached a stripped version of my database (only consists of a table) and the database with the search form i would like to implement.
Basically, I need my search form be able to sort through a list of consultants so that the user will know whether or not they're in the database already. The fields that I would like displayed are last name, first name, and phone number and social security/fed. tax ID. Any suggestions would be much appreciated!
I'm using 2013. The first version of my code works great. It opens the correct report and attaches it to an e-mail as a pdf with all of my text etc.
Code:
Private Sub btnEMail_Click() On Error GoTo errHandler Dim strReport As String Dim vMsg As String Dim vSubject As String Dim strWhere As String strReport = "RptJobDSD"
[Code] ....
The problem I have is I would like to rename the pdf, so instead of "RptJobDSD" everytime, it can have some fields [DSDDate] and [JobID] etc.
Before trying the fancy field stuff I thought I'd try just "DSD Test" and see if I could rename it in the first place!
I added this and am getting - Error(32004) - The control name 'RptJobDSD' is misspelled or refers to a control that doesn't exist.
I do have the following problem, and - please do tell me- if I don't see the obvious.
I changed to Office 2007 and am busy changing an Access Application. In the course of that, I included some .gif files in an attachment field, which were hitherto stored in external files and loaded when required for display.
Say we have a company table (OPR_Operator) and a country table (GEO_Country). The country table has a country flag (Field GEO_Country.Flat) as attachment file.
If I create the following query:
SELECT OPR_Operator.OPID, OPR_Operator.Operator, OPR_Operator.Country, GEO_Country.CountryName, GEO_Country.Flag FROM OPR_Operator INNER JOIN GEO_Country ON OPR_Operator.Country = GEO_Country.CountryCode;
I can edit existing records in a form without any problem. If I change e.g. the Country field in OPR_Operator, the new flag is displayed.
The problem occurs, when I want to add a new record. No way to do that. As soon as I enter the Country, I get the following error message:
The current field must match the join key '?' that serves as the one side of one-to-many relationship. Enter a record in the "one" side table with the desired key value, and then make the entry with the desired join field in the "many-only" table.
I appreciate that this reads like a beginner's error. The funny thing, though is, that I entered a country code, which DOES exist in the GEO_Country table.
I open the form and if i scroll with the mouse it doesnt move through records, it stays on the first record but amends the details for that record in the second box.
any idea how i can set the scroll mouse function to browse through the records rather than the project box, which amends which project that record is ascoiated with.
I have a field [CurrentDay] of type Date/Time. The values for this field are entered through the selection from the date picker. However the time of the day always come along with the date - even if it is not seen. This creates a huge problem when making a query based on this field because no results will be returned unless the time is included with the date in the criteria.
The other part to the problem is that I cannot find a built in function in the expression builder to generate the current date without appending the time - now() certainly does not do that - even if the time is not seen it is there.
Hi all,I'm trying to attach some table from a Sql Server database, but when I take a look to the content, I see all the fields filled by the value "#CANCELLED".I supposed that the matter of such an issue could be the datatype used for some fields, a user-defined datatype. The only table content from the same Sql Server database I can see does not use that data type. I'm using a read-only account to access the Sql Server database. If I try to import the table, the data are imported correctly and the user-datatype is converted to text.Any suggestions for a solution / workaround ?Thanks Bye
Can someone go through my forms and help me figure out why I cannot submit the entered data. Whenever I try to test my system and enter in inspection information I get an error that says....
"The changes you requested to the table were not successful because they would create duplicate values in the index, primary key, or relationship. Change the data and try again."
Steps:
1.) Type the given sample account number in the blue box 2.) Click "Search Acct #" button 3.) Click "Test" button 4.) Enter random info on the test form 5.) Read error message 6.) Help Ken_C :D
:eek: I have tried almost everything and I still can get this to work. I thought I had it with this attempt until I inputted October data and found that Access was sorting it by Number vs. Date.
I am simply trying to compare the number of tickets opened each month to the number of tickets closed each month. I also need to address how a report will appear if no tickets were opened or if no tickets was not closed in a month.
Incase the SQL in screencap is too difficult to read:
Query: qryTotals_Assigned_And_Completed - This calls the following two queries. ############################################# SELECT qry_AssignedByMonth.MyAssigned, qry_AssignedByMonth.Count, qry_ClosedByMonth.MyClosed, qry_ClosedByMonth.Count, qry_AssignedByMonth.Month, qry_AssignedByMonth.Year, qry_ClosedByMonth.Month, qry_ClosedByMonth.Year FROM qry_AssignedByMonth INNER JOIN qry_ClosedByMonth ON qry_AssignedByMonth.Month = qry_ClosedByMonth.Month ORDER BY qry_AssignedByMonth.Month, qry_AssignedByMonth.Year, qry_ClosedByMonth.Month, qry_ClosedByMonth.Year; ############################################# qry_AssignedByMonth ############################################# SELECT (Format([DateAssigned],"mmm"" '""yy")) AS MyAssigned, Str(Month([DateAssigned])) AS [Month], Str(Year([DateAssigned])) AS [Year], Count(*) AS [Count] FROM tblRequests GROUP BY (Format([DateAssigned],"mmm"" '""yy")), Str(Month([DateAssigned])), Str(Year([DateAssigned])) ORDER BY Str(Month([DateAssigned])), Str(Year([DateAssigned])); ############################################# qry_ClosedByMonth ############################################# SELECT (Format([DateClosed],"mmm"" '""yy")) AS MyClosed, Str(Month([DateClosed])) AS [Month], Str(Year([DateClosed])) AS [Year], Count(*) AS [Count] FROM tblRequests GROUP BY (Format([DateClosed],"mmm"" '""yy")), Str(Month([DateClosed])), Str(Year([DateClosed])) ORDER BY Str(Month([DateClosed])); #############################################
We have an Access database that opened some cash drawers attached to the computer through USB and it is working perfectly. We have some of the cash drawers that are attached to the EPSON Receipt printer and we also want to open those Cash Drawers attached to the receipt printer. Looking for code to open the cash drawer attached to the receipt printer, Is there any command available that I could send to the receipt printer and it would open the Cash Drawer.
I have also taken the screenshot of the utility program that will show the information regarding the printer and I am very expecting to get this working soon as we have build the Microsoft Access database that would checking the cash drawer status and also open the USB cash drawers.
I'm trying to make a database table for a sneaker inventory display/controller, it will be displayed on website using Dreamweaver to pull out the records. I can't figure out how to have a "size" entry in the table, let me explain:
Here is the problem, I need a "Size" field in there, but a sneaker will have multiple sizes (i.e. 6-11) and each size will have different quantities. Is it possible to incorporate a "size" field in my current table? or should I re-do my table in another way? How?
It should be exceedingly simple, but I got mashed potatoes between the ears today.
I make a query looking up for Name+Firstname+Ref number which I display in a tabular form .
Now, I want to use check boxes to select the ones I wants to print. But the thing is, if I add a check box in the main part of the form, it'll be the same box for all records. Not what I want.
So, how to create (add) a column so I can check individual records in the form?.
Hi guys, a company in my city is giving out prizes, and for each buy you get a sheet with 25 numbers ( kind of bingo thing). Well I have like 300 sheets . So i did an Access where I enter the SheetID and the 25 numbers. Now I have to do another table where I can insert the number that will be draw and whenever one of the sheet is complete, it let me know that I win!!! and the SheetID. Any ideas!!! please please
Hi, i want to set values (=numbers) in fields of a table by selecting check-boxes in a form (based on the same table). as checkbox1 =1 checkbox2= 2 etc If the box is checked the value should be entered, if unchecked the value should be removed. Afterwards i want to show the sum of these values in another field in the same form. I suppose this requires VBA. Could anybody help me plz ?
I have a form where I enter student names, and it often happends that I enter the same student a couple times, Is there any way to let the user know that there is allready someone in the system with the same name, like a pop up message.:confused:
