Setting A Couple Of Global Values?
Oct 5, 2015
Right so I have a database which is split. I have two values which are universal and only change occasionally so I don't want them in a table against every record in the database. I have currently set them up as globals in a module I want to set it up so I can draw the values in from the backend database rather than having to edit every single copy of the front end each time.
View Replies
ADVERTISEMENT
Jun 7, 2005
i have a form (frm1) and subform (sfrm1) that when a room number is double-clicked in the subform another form (frm2) and subform (sfrm2) loads. frm1 has building info and frm2 is used for inspection info. if a room has never been inspected then when frm2 loads the field [room] will be empty. however, after the first inspection the room number is obviously entered for frm2.
so i have created a global variable that holds the value of [lab_room] from frm1 and is supposed to use this value on frm2 if the room has never been inspected - ie, [room] is null. however, the value of intRoom (global variable) is lost after is leaves frm1 and goes to frm2. below is my code:
modGlobal (module with global variables declared)
Option Compare Database
Global intVar As Variant
Global intRoom As String
Private Declare Function CoCreateGuid Lib "OLE32.DLL" (pGuid) As Long
Private Type GUID 'Memory structure used by CoCreateGuid
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(7) As Byte
End Type
Private Const S_OK = 0 'Return value from CoCreateGuid
frm1 subform double click event
Private Sub Form_DblClick(Cancel As Integer)
On Error GoTo Err_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
Dim stMsg As String
'if the user double clicks on an area that has no lab_id associated with it
'prevents a null value for lab_id
If IsNull(Me!lab_id) Then
stMsg = "There is no lab associated with this room."
intRes = MsgBox(stMsg, vbOKOnly + vbExclamation, "Error - No Lab Selected")
GoTo Exit_DblClick
End If
'opens lab forms associated with this lab_id
intVar = Me!lab_id
intRoom = Me!lab_room
stDocName = "ehs_lab_safety_surveys"
stLinkCriteria = "[lab_id]=" & "'" & intVar & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
[Forms]![ehs_lab_safety_surveys].Form.RecordsetClone.Find ("lab_id = '" & intVar & "'")
DoCmd.Close acForm, "copy_lab_search_by_bldg"
Exit_DblClick:
Exit Sub
Err_DblClick:
MsgBox Err.Description
Resume Exit_DblClick
End Sub
frm2
Private Sub Form_Load()
Dim strNewguid As String
'checks for null values of lab_id, room, id and safety_survey_date. if they are
'null or empty a value is inserted.
If IsNull(Me!lab_id) Or (Me!lab_id = "") Then
Me!lab_id = intVar
End If
If IsNull(Me!room) Then
Me!room.Value = intRoom
End If
If IsNull(Me!safety_survey_date) Then
Me!safety_survey_date = Date
End If
If IsNull(Me!id) Or (Me!id = "") Then
Set x = CreateObject("Scriptlet.TypeLib")
strNewguid = Left(x.GUID, 38)
Me!id.Value = strNewguid
End If
DoCmd.Maximize
End Sub
can anyone see why the value is being lost from frm1 to frm2? i'm ripping my hair out trying to figure this one out....
View 12 Replies
View Related
Feb 19, 2007
Hey guys,
I'm not sure how to do this, and I can't find any info about it, but is it possible to set a value for my date field to accept either
1) date
2) "TBD"
3) null
Is there a way to allow and exception of "TBD"?
View 5 Replies
View Related
Sep 29, 2006
Okay. So, i have this frmProduction that has a cbo box on it, and when i select the value 'sold from field' i want it to open up another form (frmSales) that i have already created. Now, not only do i want it to open it but i want to have some information on frmSales filled out with the values the user entered on frmProduction. I already have it opening the frmSales on the AfterUpdate value on the cbo box (if statement) but i don't know what to do about setting the values of frmSales!
Any help would be much appreciated!
View 3 Replies
View Related
Oct 25, 2005
I have a very simple report - just one field.
I have a Form - "Cases". The button to open the report is on that form as are the values I want in the report.
I want to pull the value of Case Name and Case Number from the current form view and put them together in the single field on my report.
I can "almost" do it. Then VBA gives me a warning - it says that you can't assign a value to the control on my report.
Can anyone give me any ideas?
by the way:
I chose to make this an unbound report because I'm using SQL server as my back-end and my Access is an .adp file. SQL (so I was told by the programmers at work) can't pull in variable criteria from a form like Access Queries can. So this all has to be put in VBA.
View 5 Replies
View Related
Mar 6, 2014
I have a blank form that is usually entered from scratch, so all the fields are empty.
We do fill out the form with standard data occasionally, so I'd like to be able to assign a button or use a combo box to automatically fill those fields with predetermined data.
Two questions:
1) Can I use a 'on click' for a button to populate the data using this:
Code:
Me.Control1.DefaultValue = Chr(34) & Me.Control1 & Chr(34)
2) If I have a default value fill a combo box, will it save the bound column correctly since I didn't select it from the drop down itself?
View 6 Replies
View Related
Dec 21, 2005
G'day. I've been browsing the forum trying to find a solution to a problem, without much luck, and am hoping that someone might be kind enough to help me more directly.
I'm a biologist and a newbie to access: with the distinction of being completely clueless about VBA. Nonetheless, I have been tasked with creating a database for storing data obtained from biological surveys of juvenile salmon and harvest/spawner surveys of adult salmon.
The bones of the db are in place and functional. The problem I have is streamlining the data entry process to minimise keystrokes/mouse clicks.
I have a subform for entering fish records with attributes such as 'species_name', 'fork_length', 'count', 'presence of tags, etc. The idea is that fish can be entered as individuals (count=1) or groups (count>1) with attribute data at the appropriate level (eg, fork lengths only entered for individuals. We typically measure the fork lengths of the first 20 individuals of each species and then tally the remainder).
One problem I face is that fish often occur in schools, and it becomes quite tiresome to click and select the same species_name combo box value for each record when entering multiple individuals of fish of the same species.
What I would like to do is set the default value for that combo box (on the fish subform) to match the value entered for the previous record.
I suspect that you could use the after update trigger to execute some code to change the default value each time something is entered manually into the combo box. Unfortunately, I know nothing about how to write the appropriate code.
Can anyone offer me some guidance?
Thanks in anticipation.
Sincerely,
Craig Dolphin
View 11 Replies
View Related
Nov 30, 2012
Access 2010..One organization that we work with provides us with a block of numbers for each of the two types of contract products we order from them; we do order non-contract stuff from them also.The block of numbers are the same (i.e. 20000 to 30000 this year) for each of the two products. This means that each product can have the number 20000, for example. We call this the Tracking Number. If it is one of these products, we need to select the Contract Number.
For all other one off orders we have with them, we assign our own Tracking Number starting with 00001. This Tracking Number cannot duplicate unless it is one of the aforementioned two products.Both the Tracking Number and Contract Number are in the same table. The user selects the Contract Number from a form (connected to the Contract Number table that has all the details on the contract) and the Contract Number is populated in the same table that has the Tracking Number.Each order must have a Tracking Number (no null)..Not all orders need a Contract Number (null okay).The Tracking Number and Contract Number combination cannot duplicate.I tried setting the primary keys to more than one field in the table, but they cannot have null values.
If not... I have been working on Plan B.... an AfterUpdate on the form (either the form or a field... don't know yet) that looks at a query that only has results if there are duplicate values.
View 1 Replies
View Related
Jun 13, 2005
Hi all
I am new to Access and have just designed a new database and was wondering if anyone could help with a few questions.
1/ I am setting up a Macro to send an e-mail on the change of a form. When the e-mail is generated by Access I get a message from Outlook stating that "A program is trying to automatically send e-mail..." and asks you to confirm that it is ok to go. Is there any way to bypass this check or alternatively send the e-mail from a specific e-mail address rather than the database user.
2/ I have changed the background colours on a number of my forms but the Record Selector's and Scroll Bar stay the standard Access Grey. Is there anyway to change these?
3/ I have used the User Security Wizard to setup users, groups and access but I can't seem to see a way to limit the number of simulateous logins a person can have i.e. I can log in more than once with the same user when I only want to be able to login once. Any ideas?
Any help would be greatly appreciated.
JC
View 4 Replies
View Related
Feb 8, 2007
Hi all,
I'm currently stuck with 2 issues with my database.
1) I have Team (TeamID), Player (PlayerID, CurrentTeamID) & Transfer (TransferID, PlayerID, PrevTeamID, NewTeamID) tables. I got this addTransferRecord form to add transfer records. The Player table has a currentTeamID attribute which is a foreign of TeamID from Team table.
What I'm trying to do is when adding a transfer record via a form and after selecting a particular player from the combobox, I want the prevTeamID combobox.Value to automatically reflect his currentTeamID. Next, after choosing his newTeamID from the combobox, I want the value to be stored in his currentTeamID.
*CurrentTeamID, PrevTeamID & NewTeamID are foreign keys of TeamID
2) I have this LeagueStandings (TeamID, Wins, Losses) table. I've added an expression into the query to calculate the PCT (those basketball fans would know what i mean :) ). The thing is I've been trying to find a way to sort the position and assign rankings to each team where PCT is descending.
Thanks for the help in advance :)
View 2 Replies
View Related
Jul 24, 2006
Hello again,
I created a form from a query that before loading all the controls asks for the Item ID (parameter). This form has two subforms that depend on another two queries; since I want them to show the info for the same item, all three ask for the Item ID, which can be kind of annnoying and does not look too professional. Is there a way I can get rid of two of the pop-ups and still have the three forms display the info of the same item?
And my second question: After the Item ID is entered 3 times, all the info is displayed on the forms. But, if I click the arrow on the bottom of the form (to supposedly go to the next time...but it should not be possible to do this), a "Enter parameter value" window pops-up (one just like the Item id one), and I have no clue where it came from. I cannot find it in the code; and I really want to get rid of it. I could use all the help I can get.
Thanks in advance.
View 6 Replies
View Related
Aug 6, 2005
Hi all,
I'm building a db to catalogue my prints collection. I'd like to group them in categories. With the examples I found on this site I've been able to include cascading comboboxes in a form and they cascade beautifully (3 categories: maincategory, Subcat1 and Subcat2). Problem is though, I cannot get them to work in combination with a unique record! I have tried all sorts of combinations to link the cascading boxes to the print but they either don't change at all, or my qry returns 0 records. I must be doing something simple wrong but I'm not very experienced and just don't see the solution. I've spent all evening so far and I think it's time for some help.
I've got these tables (there are more tables and fields, but these are the main ones)
Tbl_prints
PrintID
PrintTitle
Tbl_Category
CategoryID
Category
Tbl_SubCat1
SubCatID
SubCat1
TblSubCat2
SubCat2ID
SubCat2
PrintID
The tables are linked by the printIDs.
Now, when I fill in the details for print #1 and then advance 1 record to print #2, (or #3 etc) the comboboxes don't follow.
What would be the solution for this?
Thank
View 3 Replies
View Related
Nov 4, 2005
Hello everyone, im new here and i have some basic access knowledge, little knowledge about VB. Im looking to create a access database using access 2000 -- I know what I need and how to create most of it, however, I do not know how to do a few things, input for improvement or recommendations are more than welcome... Heres the design
Im doing a fairly simple inventory control database, it will have about 8-10 fields:
FAX# (date)
DATE (date)
NAME (text)
EMP# (number)
UNIT (text)
SIZE (text) (this is static and will be combo box drop down)
GENDER (text) (same as size)
POSITION (text) (same as size)
SENT (date)
AMOUNT (number)
RECEIVED (number)
PO# (text)
I need all of that in a form, which I can do, what i also will need on the form is the current amount which be determined by RECEIVED - AMOUNT, which I need to some how show up on the form (this i dont know how to accomplish) ive been trying to put a formula into a text box like =SUM([RECEIVED]-[AMOUNT]) ... it works okay, unless i copy from excel to the table which the form uses, then it doesnt see the items i copied into the table, only the items that were typed in using the form. I also I need to put like a box below the text boxes which will display a query (which i dont know how to do) -- this box will display a query (ie. if i wanted to filter out all , and only see SIZE = xl GENDER = male and then the box will show up in 'table' form all the people who meet that requirement.)
==============================================
= Gender [M/F] Size [XS/S/M/L/XL] Position [K/C/W] =
= Name [ ] Unit [ ] Emp# [ ] =
= =
= Date [ ] Sent [ ] Fax [ ] =
= =
= PO# [ ] Received [ ] =
= ------------------------------------------------------- =
= Search [ ] Amount Left: X =
= ------------------------------------------------------- =
= || || =
= ||---------------------------------------------------|| =
= || || =
= ||---------------------------------------------------|| =
= || || =
= ||---------------------------------------------------|| =
= ------------------------------------------------------- =
==============================================
Thats the best ascii drawing i can do of what invision...
:) Thanks for any help in advance.
AD
View 1 Replies
View Related
Jul 14, 2006
Okay, I have two questions.
First, if I have a table, and I want to combine two records together, how would I accomplish this? For example, say I have the following table.
NAME SALES
Bill 2000
Jim 500
Ted 1000
And by some miracle of science, Bill and Jim are able to fuse together to become Jill, combining their sales together. So the new table would look ilke this.
NAME SALES
Jill 2500
Ted 1000
My second question is, say I have an extended list of the same table with 30 names and corresponding sales. However, I want to find out Ted's percentage of sales of the TOP 15, not all 30. How can I accomplish this?
Thanks so much in advance for helping out a complete newbie. :)
View 9 Replies
View Related
Oct 18, 2005
Hi All,
I have finished up a database that I will be using to store code snippets. But I have a couple of nagging questions that have been bothering me.
http://img63.imageshack.us/img63/7752/untitled1cg.jpg
In the right hand portion of my dialog I use a subform to display key words for the code. Is there a way to turn off the column and row headers for the form? Also is there a way to have a transparent background for the subform?
In order to add key words I need to open up another form, enter the words there, close that form and then select them from this dialog. It would be nice to be able to add keywords from this form. FYI, there is a many to many relationship between the key words and the code.
Is there a way to show just my dialog when the database is opened and not the rest of the Access application space? I have unchecked everything in the startup options already.
The last thing is I would love to be able to format the code section so that certain pieces of text are formatted. I am going to start messing around with the some of the free rich text controls but is there an out of the box solution that can handle this task? I was thinking about formatting the code in html and then displaying the html. Is this possible from within Access?
Thanks all,
Steve
View 3 Replies
View Related
Mar 9, 2006
Hi all,
I've played a bit with MS Access 2003 the last week. I've made a form wich should contain information about stores (phone numbers, locations e.g.).
I'm trying to imagine myself (what could be a real) scenario, that way it's easier to give myself practice and tasks :)
As I'm new to MS Access, I'd like you to take a look at my forms. I want to know if there's better ways to do what I have done, and if I have done something wrong.
I also got a couple of questions;
Lets say I want to print one post by clicking on a button, is that hard to implement?
Is it possible to make a button, which exports the form to an .xls -file by clicking on it?
I did make these forms on a computer that had the resolution to 1280/1024, when I tried to open the form on a computer with 1024/768 resolution, the forms won't be displayed in the center of the screen :confused:
I think that's all.. Thanks! :)
Here's the access -file (http://www.home.no/f00b/stores.rar) (180kB) (use winrar to extract it)
I've tried to transalate to forms into english, sorry for the bad english :o
View 2 Replies
View Related
Feb 25, 2005
Hello All, I was wondering when you use a find command, if you can make it so it searches two tables from the form your currently viewing, not just the data from the table that is tied to that current form.
Second question is I am thinking about maybe taking some "1 day" classes on access. My question is how many people have taken these & are they worth the money, or is it easier just to buy a book & if buying a book is better what is a good access book to buy.
View 1 Replies
View Related
Sep 24, 2013
Debugging my VBA code. I'm trying to track/display the content/value of a couple of variables to make sure they have the right value at a certain point.
What is the VBA code to say "display content of variable Var1" ? Where exactly will it display the value when instruction is executed?
I know I can just hover the mouse on a variable to see its content but some string varables like SELECT commands are too long and you cannot see the whole string.
View 2 Replies
View Related
Jun 22, 2013
On mij registration form I have the option to fill in the name and day of birth, email and GSM number of the partner off the main contact.
But to keep the form nice and clear, I only want to make the fields acceseble when the checkbox from [couple] is checkt OK.
How to make the fields and the Box around it Light Gray, so its very clear it issn't clickable.
The main coller is white BG and Green strokes. (see attachment) When the field [paar] 1 (couple in englisch) is OK then the fields in de eclips 2 are available And I want the collors of the stroke 25% black and de fields disabled.
View 2 Replies
View Related
Apr 15, 2008
Quick question that I suddenly have gotten stuck on: How do I use a global var in the query builder grid as a parameter? It keeps putting quotes around it - ?!
View 14 Replies
View Related
Jul 20, 2005
Is there a way to rename all my queries at teh sam time.
View 2 Replies
View Related
Mar 10, 2008
I need to creat a global Name Query. I have 4 Tables. Each table has a Unique Name and a name Field, Such as:
Table: Parents
Field: Parents name
Table: Students
Field: Student Names
I need to Create a Query That just has one Field Call Name.
And i need it to pull all the names from the name field in all 4 tables.
PLease help.
View 1 Replies
View Related
Sep 23, 2005
I have 3 different forms, each belonging to 3 different tables. The user is required to enter data on form 1 then form 2 & then form 3. The records on all the 3 forms has to be attached to the same primary key.
The problem is that the user has to enter the same primary key for each form.
I want to be able to carry the primary key entered on form 1 to form 2 and form 3, so that the user does not have to type it 3 times. How can i accomplish this ? Can i call the last primary key entered on table 1 and automatically pop it up on form 2 & 3 every time form 2 & 3 load?
Thanks
View 2 Replies
View Related
Feb 13, 2006
I have an access form called forma. It has a command button. When I click a command button, FormB opens up and FormA closes. The FormB also has a command button. When I click the command button of Form B, it closes and opens FormC. Like this there are total 30 forms. What I need is. I want to count the no. of clicks of the command button in total. Actually each button is a correct option of A multiple choice question. I tried to declare a public Variable called total in the declareation of the first form and tried to use it directly in the succeding forms. It does not capture the values. How can I increase the value of the varialbe declared in the first form even after the form closes and capture till end. Actually I also should be able to send the value in a table. Please Help Me.!
View 2 Replies
View Related
Sep 23, 2013
I need to update a table at a client's site to change a couple of fields, and would like to be able to send them something that they can run on their end to perform an insert query.
I cant update the tables via RDP etc. because the database needs to be in Access '97 format, and they all run access 2003.
I also cannot get them to send me the file for updates since it needs to be online basically 24/7.
Is there any way for this to happen?
View 5 Replies
View Related
Apr 3, 2015
I would like to enter a couple of alphanumeric groups into a field on an input form. After I enter an alphanumeric group, I hit the enter and the data will add into the field and refresh to empty box ready for next entry. If I continue to enter another group and hit enter, the next group will be added to original field with a comma and a space in between. build the VBA in after update event to accomplish the task.
View 14 Replies
View Related