User Profile
Collapse
-
where do i attach the SQL..i want the results of the SQL to be stored in a different table so data i can use it for the aggregated report later. Example will do. thank you. -
i just have a table to store different assets in a field called assName eg; CPU, Monitor, UPS, Table...etc. so what i want to do is to design a module that can counts each item separately. for example i used to use a module below to do this.Code:Do Until Myset.EOF Select Case AssetName Case Is = "CPU" countCPU = countCPU + 1 Case Is = "Monitor"
Leave a comment:
-
Counting Assests
i want to design a module to count each assets on a table so i can generate an aggregated data report of for each item. this is where i got stuck:Help!
Code:Private Sub countAssets() Dim mydb As Database, MysetAssets As Recordset, MysetSoftware As Recordset Set mydb = DBEngine.Workspaces(0).Databases(0) '............................................................................ Set MysetAssets
-
referring to a control
how do i refer to a tabbed subform control or field from main form.
eg. myset![empID]= me.empidCode:myset![empID]= me.empid
i wrote:Code:myset![empID]=me.tabCat36.empid
-
thanks Neopa.. its works wonders, i didn't even change a thing. thanks again. till we meet again. my regardsLeave a comment:
-
okay... here i want to filter a form by Time(ntsTime) and serial number is Text data type and thats where i get stuck with the coding the two in one code/Line.Leave a comment:
-
this works fine when tested:
Code:Public Sub frmNotes() DoCmd.OpenForm "frmNotes", , , "ntsTime=#" & Me.ntsTime.Value & "#" End Sub
Code:DoCmd.OpenForm "frmNotes", , , "equipGovSerialNumber='" & Me.equipGovSerialNumber.Value & "'"
Leave a comment:
-
-
Yes... the code brings the error with the correct result but wont open the form im trying to filter due to the error.Leave a comment:
-
Syntax Error
im trying to run this code from a button but i get an error "syntax error(missing operator)in a query expression": where do i go wrong?
Code:DoCmd.OpenForm "frmNotes", , , "SerialNumber='" & Me.SerialNumber.Value & "'" & "ntsTime='" & Me.ntsTime.Value & "'"
-
-
If Text_EmployeeID is the name of the textbox that contains the employee Id in the subform and Frm_Employee_De tails is a form that displays the details about an employee, i have used:Code:DoCmd.OpenForm "Frm_Employee_Details", , , "empID=" & Me.Text_EmployeeID.Value
Leave a comment:
-
Nic;
i do get the idea and i know this would work with subforms..but what iam trying to do is to open a new form from a subform not opening another subform. so i dont know if the Parent. expression will work.Leave a comment:
-
Filtering a form
I have designed a form(main form) which has a record source that runs subforms. this works perfectly. I also have a macro that is attached to this subform which filters records on a different form. One of my subforms contains personnel IDs and few details. When I click on the ID field the macro runs and opens another form, filtering it by the ID number. This works when the subform is opened independently but when the subform is opened on a record...Last edited by NeoPa; Aug 1 '11, 02:53 PM. Reason: Text-speak or similar abbreviations are specifically NOT allowed when posting technical questions in a forum. Similar questions in future will be deleted summarily. -
NeoPa
thanks..i got it and i really appriciate your help.
my regards, LovelyLeave a comment:
-
sorry again 4 tagging.. are you sayin i should use "&" instead of "AND". i tried it and i still get the error. NeoPa, im still an a learner on this, but i wii get there. so where im i suppose to amend.Leave a comment:
-
okay, now i want to filter using the 1st and second combo box and i added the following code line number 5;
Code:strFilter = "[MinName] Like '" & Me.cmbMinistryName.Column(1) & "*'" And _ "[MinDistrict] Like '" & Me.cmbDistrict.Column(1) & "*'"
any help..!Leave a comment:
-
eeeh. programming is not a joke neh...i have never done VB at school i just got interested and started reading books and the outcome was fruitful.
thanks bout the design...i was confident but now u make me feel more confident and willing to do more.
thanks, its working now...im glad. now i have to work on the other combo boxes...
regards,LovelyLeave a comment:
-
NeoPA;
just a reminder...i know you always have your dish full..Leave a comment:
-
No activity results to display
Show More
Leave a comment: