I’d like some assistance on the following if possible:
I have a database where I want to update a field (Agree_ID) based on the data input in a second field (Pond_ID). Agree_ID uses only a portion of Pond_ID. I’d like some routine (macro or VBA code) to assist.
Example: Pond_ID – keyin "05-04-1P" Agree_ID – updates to "05-04"
I used “=Mid([Pond_ID],1,5)” to update Agree_ID which appears to work. However, I have to close the record; run a macro that runs the code; then go back into the form and open the record. I’d like this to happen automatically when I keyin the data in Pond_ID.
Any ideas would be greatly appreciated. Thanks, SKK
I have 2 fields in access table. In one field i fill numbers eg (1,2,3,4,5) drop down list. In the second field I need to fill another data. When I chose one of the numbers from Field 1, I want automatically fill the second field with appropriate data.
Getting the total in a GroupFooter from a Field2 based on Criteria on Field3. For instance, I could total values from Field2 based on criteria “KEY” of Field3, however my problem is when I try to get the valued from Field2, which has the same value for all records based on criteria “NoKEY” of Field3.
I’m not sure if this is the best way to explain my problem, but I’ll try to give you a better scenario for you reply. I really appreciate if you help me out in anyway that lead me to the right procedure.
Here is my code for the ControlSource of my unbound for Field1
=Sum(IIf([Field3]="KEY",[Field2]))
How can I capture the value on [Field2] based on criteria [Field3]=”NoKEY”?
I want to save the timestamp created in a table when a user opens the database. My vba saves the computer name and user name and sets the currentuser = yes. The table is mysql odbc, and has the requisite timestamp and id fields. I have a form that I can open that shows who is online at that moment. When a user closes the database, the currentuser field is set =no. All of that works well. Now, I have added a "starttime" field in which I would like to store the timestamp that was set upon opening, since when a user logs off, the timestamp gets changed to the log off time.
Code:
Dim myQry As String Dim sUserName As String Dim sUserComputer As String Dim currentVersion As Date
[code]....
The UserTimestamp in red is the field value of the first record in the table, not the usertimestamp in the user's record. How do I store the log on timestamp in the "starttime" field?
I want to input a number value in [field1], then i want [field2] to generate an auto number BUT i want it to increase based on [field1] THEN combine them into [field3] creating a unique SKU for every item I have.
EXAMPLE1: I will type in [field1]: "001234". [field2]will enter "000001" because it is the first occurrence of "001234" in [field1]. [Field3] will then have a value of "001234-00001" EXAMPLE2: I will type in [field1]: "002468". [field2]will enter "000001" because it is the first occurrence of "002468" in [field1]. [Field3] will then have a value of "002468-00001" EXAMPLE3: I will type in [field1]: "001234". [field2]will enter "000002" because it is the second occurrence of "001234" in [field1]. [Field3] will then have a value of "001234-00002"
I have a report based on a query that has data for many dates. At the moment I have put a specific date in the criteria of the query so that I could build the report format. So it now displays all the data for the date i have in the criteria section. I will need to run this report several times per week so the specified date (and corresponding data in the report) will need to be changed to a new date when I open the report i.e. when I open my report I want to show data in the report only for a specified date.
Can I create a date parameter box open up when I open the report? Can I create a form with a button that when I click will open the report displaying data for that date? What would be the best way?I also need to display the specified date on the report.
Problem: Visual Basic run-time error 7792: You can't open a subform when it is also open in Design view.
I have a subform with properties for SourceObject, LinkMasterFields, LinkChildFields changing according to objects and events in the master form.
The subform was bound to a query before which meant that the subform load event was happening as soon as the master form is loaded. I needed to restrict the subform loading until a certain point so I removed the SourceObject property for the masterform's subform. The subform on the master form is now Unbound.
(This is because I'm now running some code on the FormLoad event for the subform which needs to be restricted until the LinkMasterFields and LinkChild Fields properties have been assigned correctly otherwise it takes ages to load.)
Now I'm getting the above error. Obviously, i do not have the subform open anywhere in design view. No Visual Basic windows are open. I've closed the db, closed access, reopened it and clicked on nothing except the masterform. The error occurs when I raise the event in the master form which assigns the sourceobject property to the subform, i.e.
Me.sfmQryAllOV.SourceObject = "sfmQryAllOV"
Can anyone help me? I've googled this but finding no answers.
when i open a form i want to open another frm at the same time. i have a main form with some buttons in it. when i click on a button and a form opens then i am not able to click on a button to open other forms from the main form.
I currently have a button that opens a report. the report pulls from a query that has parameters set to "fromdate" and "todate". instead of using dates and parameters that pop up as blank text boxes, I would like to click the button, have a form pop up with a combo box to select all of the options available (currently 23 options) and then click a button to make a report that only displays the record (1-23) selected. I do not need any time constraints because as the databases get updated with more records, there would be more than 23 options to choose from.
I want to open another form automatically when an initial form opens, both are non popup) I have tried open and load events - but still the calling form appears on top of the called form.
How do I get the two forms to open form 1 and then form 2?
Also I cannot use the timer event as this is doing something else.
I have noticed that on our network, certain people can open an Access db that is already open by another person, yet some cannot. We are using the same shortcut (to the mdb file) and all have the same windows read/write permissions.
Is there a way to close a form that is open from another form that has the focus. I tried using the Unload event, but I received an error message "Cant load or unload the object". I would appreciate any help!
I have created a ms access database and it is located on our shared server at work.
However if someone is viewing the database, when another person double clicks the icon to open the database, nothing happens. As soon as the other person exits the database, someone else can access it.
Previously more than one person could access the database at a time, now they can't.
I'm not sure if this can be done with the expression builder. I have a query that brings in a value from an open form when run. The query can be called from two seperate forms.
In my expression, I would like to check which form is open, and port the corresponding value.
In VBA -
If IsOpen(frmPSWork) Then MyVar = Forms!frmPSWork!txtID Else MyVar = Forms!frmCSupdate!txtID End If
In the expression I tried playing around with something simple along these lines without success -
I am goign to try and explain my issue the best I can and hope that one of you has some advice.
I have a form full of text boxes that are populated based on a Combo Box selection. A couple of the fields are Not Visable and house a PDF name and PDF path What I am tryign to do is allow the user to hit a PDF button and bring up the PDF image, although there may be recrods without a PDF image. So I am trying to test for this. I wrote a basic If THen statement that tests for the PDF image name. IF it is there then it says "Its there", if not it says it "Not there". This worked out fine, showing me that I can test for an image name.
BALLFIELD_PDF_NAME = PDf image name BALLFIELD_PDF = PDF Image Path (location of image)
CODE: Dim Test Test = Me.BALLFIELD_PDF_NAME.Value
If Not Test = "" Then MsgBox "Its there" Else MsgBox "Its not there" Exit Sub End If
I then wrote the below code to look for the image name, if there open the image, if not exit Sub.
Results: When I open the form and all teh fields are blank adn try to open PDF from a record that I know does not have an image if get nothing (Exaclty what I want)(it exits the sub) I then choose one that I know has an image and it opens the image (Exaclty what I want, open the image) I then repeat on another that has an image and it opens that image. (Great) My problem arises when I try and open one that does not have an image after opening one that does. It goes into the Else Statement (See below) but still opens the last image I opened..... I cannot figure this out.....
What is the best place to have opendatabase statement ? Currently I have opendatabase in all of my forms. I dont have any modules in my application. I am new to access programming. Is module really necessary in an application? If I can put the opendatabase statement in one place, it will be easier for me to change the database name and path, if I have to..I dont know how to do it.
Can anyone help..I hope this one should easy for many of you people.
I thought my problem would be a common one but after spending enough time on the net and all forums i couldn't find my answer... anyway... here is my problem. The database is about creating reference, the table contains multiple references, i create a folder where i'll put all the files to be attached
I wanna a create a link to a file... the thing are : - i want to open any kind of file (or at least i specify in a table what kind of file to open (jpg, pdf, etc...) - The name of the file is different for ever record... Anyway i think it will be more clear with the code :
Private Sub File_Name_Label_DblClick(Cancel As Integer) Dim rst As New ADODB.Recordset Dim file As String Dim fold As String Dim i As Integer
Hey all I was wondering if there was anyway to open my program when windows opens, I have the XP sytem but I was also wondering if there would be a difference with windows 98... SO What i would like to accomplish is to open my access program without clicking on it when my windows, is loaded, can I open it when it loads automaticly. Does it matter that there are different users on my system or not. Thanks
I've run across a couple issues with our database. The most immediate issue is that I have been unable to open the database on any networked (or non-networked) computer. Me and a assistant typically enter data into this database from two seperate computers. She works on a wireless networked computer with the file on my computers hard drive. I work directly with the file. My computer is wired to the router. (in case that information helps)
We keep getting errors about "cannot access remote computer" and such, they seem to occur when she's entering data and I have the database open, then close Access. It will often give her the error and not allow her to save the record.
But just today she entered something, I closed my database window, then reopened it and I could not get in. All network computers rebooted, and still cannot get into the file. I can enter the password and then it goes to just a blank area (like when your first open access with no database). Older backup versions of the database still work, so it doesn't seem like an Access error. I also noticed that the little "LockFile"s are not being created (I ever faked one just to try it out and it deleted it after i entered the database password)
I can't repair, or convert or anything, it just asks for the password, I give it...and then nothing.
I can't open my database... It was open yesterday and after a power failure computer turned off... 2day I can't open it... Messege box says something like ---database was open--- not properly closed--- etc. etc. and can't perform auto repair...
I tried to import the objects in other database but can't do that as well...
