Recent content by finberg

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

Thanks a lot.That helped. Arseniy