Please adice how can I realize in the report such function:
If [Value1]=yes then me.[Filed1].visible
Please advie the exact spelling for that condition.Thanks.
Is trying to run a code for Set in a field Expiry Date the date that is 3 month bigger that the one in shipement date.Has made a code:
Forms!insurance![Expiry date] = DateAdd("mm", 3, Forms!insurance![Date of Loading])
That does not work
Any ideas?
No way- getting an error no current record:
Zone is a letter
Dim db As DAO.Database
Dim Rs As DAO.Recordset
Dim a As Byte
Set db = CurrentDb
Set Rs = db.OpenRecordset("Select Rate.* from Rate WHERE Rate.Code = " & Me.Commodity & " AND Rate.Zone = '" & Me.Zone &...
in this one:
Set Rs = db.OpenRecordset("Select Rate.* from Rate WHERE (((Rate.Code)=" & Me.Commodity & " ) AND ((Rate.Zone)= ''" & Me.Zone & "''))")
Please advice where is a syntax error- pardon I am really a big dummer in VBA:
Private Sub Command38_Click()
Dim db As DAO.Database
Dim Rs As DAO.Recordset
Set db = CurrentDb
Set Rs = db.OpenRecordset("Select Rate.* from Rate WHERE (((Rate.Code)=" & Me.Commodity & " ) AND...
Thanks a lot for your help.
I understoof my mistake and rebuild the table with rates to standart (code,commodity,zone,rate)
Now I run the query
SELECT Rate.Rate
FROM Rate
WHERE (((Rate.Code)=1) AND ((Rate.Zone)="A"));
and get the value I need.
How can I transfer this value to a...
With my code I got the recordset with 7 values.How can I get the value that from the column with the name zone
(chosen from the Directions table)
Me.commodity - commodity code
Me.zone- zone code
Private Sub Command38_Click()
Dim db As DAO.Database
Dim Rs As DAO.Recordset
Dim Rsd As...
Thanks for your answer.You are right.
Could you please comment a bit your answer
i a form the user imputs
1.Code of commodity (selecting from the list)-stored in A
2.Letter of zone -stored in B
So for that field i shall use such sequence of actions:
2. SELECT Commodities.Code...
I do have a table [Commodities] with fields (Code(key);Number;Commodity name;A;B;C;D;E;F;Special conditions)
A;B;C;D;E;F stands for different directions (Europe, USA,ETC)
The data in the table are the rates for different commodities depending on a zone.
Zones are described in a separate table...
Tring to use following NotinList code. Receiving error "type missmatch", but the table Servides has 2 columns: No (autonumber) and ServiceName (text):
Private Sub Service_NotInList(NewData As String, Response As Integer)
Dim Db As Database
Dim Rs As Recordset
Dim Msg...
I do have a replicated spilted database
Crm.mdb is replicated database with replicas
user.mdb contain all forms,report,queries and is linked to CRM.mdb
I want to make a button in local copy of user.mdb that would Synchronize replicas.
So the button should:Get the path to linked CRM.mdb...
I have tables
Firms:Number,name
CoWorkers:ID;Firm(linked to previuos table);Name
Contact_result:Code,Firm(as number,selected from the table Firms),Result
Contacts: Number, Code (linked to the parent),Contact person,Details
I made a form to work with them
in main form I am getting the values...
Both fields are comboboxes
But the variant you advice doesn't work- it select the data only for the first enty you open and then uses it to all next rows.
I have a Subform Contacts wich has fields :Firm,Contact peron
I want the RowSource for the Firld Contact person to be Selected form the SoWorkers table on Firm field
Please help me to do that.
Thanks alot
Arseniy
I am usingAfterUpdate function.
I check the added value with a function fcheck, and if fcheck=true I want to delete the added record.
How can I delete it?
Thanks Arseniy
I know that the answer is really very simple, but I can't get it.
I maade a procedure Fcheck to make a check for duplication in a table.
I want that when the new data is added in the form, it is checked with this procedure, and if the procedure=True than not allow to add it or delete the added...
I have a form with a subform.Both are in table mode.
In a parent form there is a filed named Firm (number of the firm)
In the Subform there is a field name ContactPerson.
I want the RowSource for the ContactPerson to be the data selected from the table CoWorkers,where Firm=Firm in a parent form...
Dear Robert
On your advice I made such code:
But it is adding only one filed,bespite of the fact that there are 5 or more.Btw, it add the second one.
How could be made, that it goest through all of them?
Thanks
Public Sub Addrecord(Field, Sem, Man As Variant)
Dim db As Database
Dim rs1 As...
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.