Private Sub List6_Click()
Me!txtbal = Me!List6.Column(6) - Nz(Me!txtAmount, 0)
end sub
when i run my update query, it seems like it leaves $0 as null. by that i mean when i look at the table, if the calculation is $0, then field doesnt return $0 but blank.
so i get an error message when...
i have a listbox('lstBud') from form "SelectBudget"
Record Source: tbl_VRegister
quick description of what this form do.
its opened from another form, and filters users id and provides a list of their budgets. User can select a budgetline from the list box and when they click ok, the budget is...
i have a listbox /w 8 columns.
how would i update them to multiple fields in the table?
ie. listbox has
FIELD1, FIELD2, FIELD3, ETC
if user were to select a line from the list box and click OK
How can I have those information stored in the table?
am i making sense?
i have a following code..
Private Sub cmdOK_Click()
If Me.tempBal < 0 Then
MsgBox "The amount is larger than the balance"
Else
CurrentProject.Connection.Execute _
"Update tbl_fsource " & "SET balan =" & Me.tempBal & " WHERE BFSIX='" & Me.LstBud.Column(7) & "'"...
i was just wondering if that's possible.
I'm thinking about building a scheduling program using access. thought i should be aware of the abilities.
ie. 3/16/06 | 10hrs
4/16/06 | 20hrs
5/16/06 | 30hrs
is this possible?
im using a query and thought this would be the simplest way.
under ProjectBudgetAmt
criter: =<[forms]![frm_projectbud]![projectamt]
seems like it's not showing any reaction?!?
how do i build an if statement that does nothing if it's true. ie.
If Forms!frm_projectbud!ProjectAmt > Forms!frm_projectbud!txtProjBudTotal Then (nothing... proceed action?)
else
MsgBox "Project Budget Total can not exceed your Balance"
End If
ALSO how can i build a filter to make sure...
i have a subform. source=qry1 lets say.
im trying to update/calculate balance as users
type in the other field but it's not working for some reason.
here is what i have
fields are: Budget, EncAmt, EncPaid, EncBal, TBal.
i've tried doing (in qry criteria)
"EncBal"...
im trying to create a data sheet users can use to manage their budget. This is what I have so far.
3 text fields: ProjectID / Project Name / Bud Amount /
here's the problem i can't solve. User has to be able to divide/catergorize their own budget line.
ie. ProjectID:test1 / Project Name: LOB...
i have been brain-storming to come up /w best way to do this..
I currently have 3 tables.
] tbl_ProjBudget : ProjID | ProjBudID | BFSIX | ProjBudget | EncAmt | EncPaID | EncBal | ProjBudBal
] tbl_ProjName : ProjID | ProjIDName
ex. ProjID = exhibit1
ProjIDName = Liberty OTB...
everytime i open this form, i get a dialog box "enter parameter value" forms!frm_PSC_new!txtStaffid.
Im not even opening that form.. actually opening
frm_psc_update. I've looked through my query, vba codes.. and i have no idea why that's popping up..
any suggestion or idea why it's doing this?
i'm trying to create a help screen for database users. Thinking about creating a "button" on top of the form and when user clicks a button, open a page/dialog with help descriptions. anyway i can approach this?
i'm trying to make the default of a textbox to 00.
these numbers are optional but if not entered, should be 00. i've set input mask as 99;
and defalut value to "00" but it's returning just 0.
if someone enters a number (ie.1) it needs to show as 01 not 1. how would i do this?
i have a query which consists of 3 criteria
PRnum, =[forms]![frm1_purrequisition]![txtpr]
Payee, =[forms]![frm1_PurRequisition]![payee]
Date,
I have "fromDate" and "toDate" on the form and i don't know how set the criteria to return all the records inbetween those dates... how would I do that...
I've been struggling with this for awhile..
I have a "option" form, which has a command button,"cmdWV"
when user clicks cmdWV, form "frm_psc_voucher" opens.
here's the problem. form frm_psc_voucher is related to frm_psc_new. Two seperate forms but user first write contracts on frm_psc_new and...
similar question as the first but..
CurrentProject.Connection.Execute _
"Update tbl_psc " & "SET contractamt = contractamt + " & Me.txtContAmt & " WHERE contractno='" & Me.txtContNum & "' AND Addconno=" & Me.txtAddContNum & "'"
can this not work?
i want access to look up both contractno and...
CurrentProject.Connection.Execute _
"Update tbl_fsource " & "SET Contp =" & Me.txtContAmt & " Where BFSIX='" & Me.LstBud.Column(7) & "'"
this code currently replaces the field on the table..
but i need to add that amount to make new balance.
i've tried doing...
i'm reposting because i've been browsing adn trying different things yet i can't find a solution to this problem..
thread702-1187654 (original post)
below is afterupdate event of txtad
Me.cboContName = _
DLookup("ContractName", "tbl_PSC", "ContractNo='" & Me!txtContNo & "' AND AddContNo='" &...
below is afterupdate event of txtad
Me.cboContName = _
DLookup("ContractName", "tbl_PSC", "ContractNo='" & Me!txtContNo & "' AND AddContNo='" & Me!txtad & "'")
I was two blank textboxes and a combo box on a form.
txtContNo, txtad, and cboContName.
I want to look up the table to find the...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.